Sources
Delphi Russian Knowledge Base
DRKB - это самая большая и удобная в использовании база знаний по Дельфи в рунете, составленная Виталием Невзоровым

Отображаются ли полосы прокрутки для TStringGrid?

01.01.2007
if (GetWindowlong(Stringgrid1.Handle, GWL_STYLE) and WS_VSCROLL) <> 0 then
   
ShowMessage('Vertical scrollbar is visible!');
 
 
if (GetWindowlong(Stringgrid1.Handle, GWL_STYLE) and WS_HSCROLL) <> 0 then
   
ShowMessage('Horizontal scrollbar is visible!');

Взято с сайта: https://www.swissdelphicenter.ch