TCustomControlBar.FVisiBandsEx variable

Member of TCustomControlBarprotectedIn unit ExtCtrls

Member with the visible bands on the control bar excluding a band being dragged.

Declaration

pascal

FVisiBandsEx: Array of TCtrlBand = class
private
 FControl: TControl;
 FControlHeight: Integer;
 FControlLeft: Integer;
 FControlTop: Integer;
 FControlVisible: Boolean;
 FControlWidth: Integer;
 FHeight: Integer;
 FInitLeft: Integer;
 FInitTop: Integer;
 FLeft: Integer;
 FTop: Integer;
 FVisible: Boolean;
 FWidth: Integer;
 function GetBandRect: TRect;
 function GetBottom: Integer;
 function GetRight: Integer;
 procedure SetBandRect(AValue: TRect);
 procedure SetRight(AValue: Integer);
public
 property BandRect: TRect;
 property Bottom: Integer;
 property Control: TControl;
 property ControlHeight: Integer;
 property ControlLeft: Integer;
 property ControlTop: Integer;
 property ControlWidth: Integer;
 property ControlVisible: Boolean;
 property Height: Integer;
 property InitLeft: Integer;
 property InitTop: Integer;
 property Left: Integer;
 property Right: Integer;
 property Top: Integer;
 property Visible: Boolean;
 property Width: Integer;
end

Description

Nothing more than the line above yet.

An experiment, built from development snapshots. Not the official Free Pascal or Lazarus documentation.