Mega Code Archive

 

Categories / Delphi / VCL

 

How to detect if the scrollbars of a TStringGrid are visible

Title: How to detect if the scrollbars of a TStringGrid are visible 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!');