TIEGlobalSettings.VScrollWidth

Declaration

property VScrollWidth: integer;

Description

Returns the System scrollbar width.

Read-Only

Example

// Make thumbnails match the width of the TImageEnMView
procedure TForm1.ImageEnMView1Resize(Sender: TObject);
var
  w: integer;
begin
  w := ImageEnMView1.ClientWidth;
  if ImageEnMView1.CurrentScrollBars in [ ssVertical, ssBoth ] then
    dec( w, IEGlobalSettings().VScrollWidth );
  ImageEnMView1.SetThumbnailSize( w , MulDiv( w, 4, 3) );
end;

---