| Class TSplitterPanel (unit SplitterPanel) |
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
destructor Destroy;
procedure Hide;
procedure RegistryLoad(Key: HKey; Path: String);
procedure RegistrySave(Key: HKey; Path: String);
procedure Show;
procedure AdjustPanes;
procedure DragCheck(var Pos: Integer);
procedure DragDone(X,Y: Integer);
procedure DragInit(X,Y: Integer);
procedure DragMove(X,Y: Integer);
procedure DragPaint(Pos: Integer);
procedure DragResize(Pos: Integer);
procedure EditSplitt(Pane: TSplitterPanel);
function HigherPane(Pos: Integer): TSplitterPanel;
procedure InsertPane(Pane: TSplitterPanel);
function LowerPane(Pos: Integer): TSplitterPanel;
procedure MakeSplitt(Pane1,Pane2: TSplitterPanel; Splitt: TSplittDirection);
procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X,Y: Integer);
procedure MouseMove(Shift: TShiftState; X,Y: Integer);
procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X,Y: Integer);
procedure RemovePane(Pane: TSplitterPanel);
function SplitterHit(X,Y: Integer): Boolean;
function SplitterSize: Integer;
procedure UpdatePane;
procedure WMMove(var Message: TWMMove);
procedure WMSetCursor(var Message: TWMSetCursor);
procedure WMSize(var Message: TWMSize);
procedure WorkspaceChange(Cause: TWorkspaceChange);
function GetDirection: TSplittDirection;
function GetPanePos: Integer;
function GetPaneSize: Integer;
function GetSplittCount: Integer;
function GetSplittPanes(Index: Integer): TSplitterPanel;
function GetWantedSize: Integer;
function IsPane: Boolean;
function IsSplitter: Boolean;
procedure SetBarWidth(Value: Byte);
procedure SetMinimumSize(Value: Integer);
procedure SetSplitter(Value: TSplitterPanel);| Properties |
property Align :
property BarStyle : TSplittBarStyle
property BarWidth : Byte
property BevelInner :
property BevelOuter :
property Border :
property CursorHorz : TCursor
property CursorVert : TCursor
property MinimumSize : Integer
property Splitter : TSplitterPanel
property Visible :
property Wallpaper :
property Direction : TSplittDirection
property PanePos : Integer
property PaneSize : Integer
property SplittCount : Integer
property SplittPanes : TSplitterPanel
property SplittState : TSplittDirection
property WantedSize : Integer| Events |
event OnResize : | Variables |
FAllowEdit : Boolean;
FBarStyle : TSplittBarStyle;
FBarWidth : Byte;
FCursorHorz : TCursor;
FCursorVert : TCursor;
FDragBar : Integer;
FDraging : Boolean;
FDragPane : TSplitterPanel;
FDragStart : Integer;
FDragStop : Integer;
FMinimumSize : Integer;
FPanePos : Integer;
FPaneSize : Integer;
FSplitter : TSplitterPanel;
FSplittPanes : TList;
FSplittState : TSplittDirection;
FWantedSize : Integer;| Constructors |
constructor Create(AOwner: TComponent);- TSplitterPanel -------------------------------------------------------------
| Functions |
destructor Destroy;
procedure Hide;
procedure RegistryLoad(Key: HKey; Path: String);
procedure RegistrySave(Key: HKey; Path: String);stored IsSplitter
procedure Show;
procedure AdjustPanes;
procedure DragCheck(var Pos: Integer);
procedure DragDone(X,Y: Integer);
procedure DragInit(X,Y: Integer);
procedure DragMove(X,Y: Integer);
procedure DragPaint(Pos: Integer);
procedure DragResize(Pos: Integer);
procedure EditSplitt(Pane: TSplitterPanel);
function HigherPane(Pos: Integer): TSplitterPanel;
procedure InsertPane(Pane: TSplitterPanel);
function LowerPane(Pos: Integer): TSplitterPanel;
procedure MakeSplitt(Pane1,Pane2: TSplitterPanel; Splitt: TSplittDirection);
procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X,Y: Integer);
procedure MouseMove(Shift: TShiftState; X,Y: Integer);
procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X,Y: Integer);
procedure RemovePane(Pane: TSplitterPanel);
function SplitterHit(X,Y: Integer): Boolean;
function SplitterSize: Integer;
procedure UpdatePane;
procedure WMMove(var Message: TWMMove);
procedure WMSetCursor(var Message: TWMSetCursor);
procedure WMSize(var Message: TWMSize);
procedure WorkspaceChange(Cause: TWorkspaceChange);
function GetDirection: TSplittDirection;
function GetPanePos: Integer;
function GetPaneSize: Integer;
function GetSplittCount: Integer;
function GetSplittPanes(Index: Integer): TSplitterPanel;
function GetWantedSize: Integer;
function IsPane: Boolean;Pane functionality
function IsSplitter: Boolean;Splitter functionality
procedure SetBarWidth(Value: Byte);
procedure SetMinimumSize(Value: Integer);
procedure SetSplitter(Value: TSplitterPanel);| Properties |
property Align : republished
property BarStyle : TSplittBarStyle
property BarWidth : Byte
property BevelInner :
property BevelOuter :
property Border :
property CursorHorz : TCursor
property CursorVert : TCursor
property MinimumSize : Integer
property Splitter : TSplitterPanel
property Visible :
property Wallpaper :
property Direction : TSplittDirection
property PanePos : Integer
property PaneSize : Integer
property SplittCount : Integer
property SplittPanes : TSplitterPanel
property SplittState : TSplittDirection
property WantedSize : Integer| Events |
event OnResize : | Variables |
FAllowEdit : Boolean;
FBarStyle : TSplittBarStyle;
FBarWidth : Byte;
FCursorHorz : TCursor;
FCursorVert : TCursor;
FDragBar : Integer;
FDraging : Boolean;
FDragPane : TSplitterPanel;
FDragStart : Integer;
FDragStop : Integer;
FMinimumSize : Integer;
FPanePos : Integer;
FPaneSize : Integer;
FSplitter : TSplitterPanel;pane functionality
FSplittPanes : TList;
FSplittState : TSplittDirection;splitter functionality
FWantedSize : Integer;