Class TCustomScrollPanel (unit ScPanel)

Inherits from

TScrollingWinControl

Delphi 3.0 or higher } {$ENDIF} {$ENDIF} {$ENDIF

Constructors


constructor Create(AOwner: TComponent);



Functions

destructor Destroy;

TCustomPanel

procedure AlignControls(AControl: TControl; var Rect: TRect);


procedure CreateParams(var Params: TCreateParams);

TCustomPanel

TCustomControl


procedure Paint;

TCustomControl

procedure PaintWindow(DC: HDC);

From TCustomControl //

procedure Resize;


procedure CMCtl3DChanged(var Message: TMessage);


procedure CMIsToolControl(var Message: TMessage);


procedure CMTextChanged(var Message: TMessage);

TCustomPanel

procedure SetAlignment(Value: TAlignment);

DrawText(Handle, PChar(Caption), -1, Rect, (DT_EXPANDTABS or DT_VCENTER) or Alignments[FAlignment]);

procedure SetBevelInner(Value: TPanelBevel);


procedure SetBevelOuter(Value: TPanelBevel);


procedure SetBevelWidth(Value: TBevelWidth);


procedure SetBorderStyle(Value: TBorderStyle);


procedure SetBorderWidth(Value: TBorderWidth);


procedure WMPaint(var Message: TWMPaint);

TCustomControl

From TCustomControl //


procedure WMWindowPosChanged(var Message: TWMWindowPosChanged);


Properties

property AutoScroll :

TScrollingWinControl

property Alignment : TAlignment

TCustomPanel

property BevelInner : TPanelBevel


property BevelOuter : TPanelBevel


property BevelWidth : TBevelWidth


property BorderStyle : TBorderStyle


property BorderWidth : TBorderWidth


property Canvas : TCanvas


property Color :


property FullRepaint : Boolean


property Locked : Boolean


property ParentColor :


Events

event OnResize : TNotifyEvent


Variables

FAlignment : TAlignment;


FBevelInner : TPanelBevel;

TCustomPanel

FBevelOuter : TPanelBevel;


FBevelWidth : TBevelWidth;


FBorderStyle : TBorderStyle;


FBorderWidth : TBorderWidth;


FCanvas : TCanvas;

TCustomControl

FFullRepaint : Boolean;


FLocked : Boolean;


FOnResize : TNotifyEvent;



Constructors


constructor Create(AOwner: TComponent);


Functions


destructor Destroy;

TCustomPanel


procedure AlignControls(AControl: TControl; var Rect: TRect);


procedure CreateParams(var Params: TCreateParams);

TCustomPanel

TCustomControl


procedure Paint;

TCustomControl


procedure PaintWindow(DC: HDC);

From TCustomControl //


procedure Resize;


procedure CMCtl3DChanged(var Message: TMessage);


procedure CMIsToolControl(var Message: TMessage);


procedure CMTextChanged(var Message: TMessage);

TCustomPanel


procedure SetAlignment(Value: TAlignment);

DrawText(Handle, PChar(Caption), -1, Rect, (DT_EXPANDTABS or DT_VCENTER) or Alignments[FAlignment]);


procedure SetBevelInner(Value: TPanelBevel);


procedure SetBevelOuter(Value: TPanelBevel);


procedure SetBevelWidth(Value: TBevelWidth);


procedure SetBorderStyle(Value: TBorderStyle);


procedure SetBorderWidth(Value: TBorderWidth);


procedure WMPaint(var Message: TWMPaint);

TCustomControl

From TCustomControl //


procedure WMWindowPosChanged(var Message: TWMWindowPosChanged);


Properties


property AutoScroll :

TScrollingWinControl


property Alignment : TAlignment

TCustomPanel


property BevelInner : TPanelBevel


property BevelOuter : TPanelBevel


property BevelWidth : TBevelWidth


property BorderStyle : TBorderStyle


property BorderWidth : TBorderWidth


property Canvas : TCanvas


property Color :


property FullRepaint : Boolean


property Locked : Boolean


property ParentColor :


Events


event OnResize : TNotifyEvent


Variables


FAlignment : TAlignment;


FBevelInner : TPanelBevel;

TCustomPanel


FBevelOuter : TPanelBevel;


FBevelWidth : TBevelWidth;


FBorderStyle : TBorderStyle;


FBorderWidth : TBorderWidth;


FCanvas : TCanvas;

TCustomControl


FFullRepaint : Boolean;


FLocked : Boolean;


FOnResize : TNotifyEvent;