TCustomTrackBar

type TCustomTrackBar = class(TWinControl)

  class procedure WSRegisterClass; override;

WSRegisterClass - Register this Class for the current Widget Set

protected

  procedure ApplyChanges;

ApplyChanges - implement any pending changes

  procedure Changed; virtual;

  procedure DoChange(); message;

DoChange - system message to implement changes

  procedure FixParams();

protected

  class function GetControlClassDefaultSize; override;

GetControlClassDefaultSize - returns its own defaults, overriding the inherited values

protected

  procedure InitializeWnd; override;

InitializeWnd - initialise the window for this control

  procedure Loaded; override;

Loaded makes a number of checks, using client size if specified, and copying appropriate flags, fonts, text etc, makes list of child controls to notify them of any changes, then calls inherited Loaded

public

  constructor Create(); override;

Create - constructor for TCustomTrackBar: calls inherited Create then initialises style, position, size and bounds

  procedure SetTick();

SetTick - set the interval for ticks on the taskbar (integer)

published

  property Frequency: Integer; [rw]

Frequency - how frequently the position of the slider is to be read and updated (currently unsupported)

  property LineSize: Integer; [rw]

Line-Size - increment for slider position when an arrow key is pressed

  property Max: Integer; [rw]

Max - the value corresponding to full movement of the slider. Default = 10

  property Min: Integer; [rw]

Min - the value associated with the minimum slider position. Default = 0

  property OnChange: TNotifyEvent; [rw]

OnChange - action to be taken on change in the slider position

  property Orientation: TTrackBarOrientation; [rw]

Orientation - horizontal or vertical

  property PageSize: Integer; [rw]

PageSize - increment for slider position when PageUp or PageDown key is pressed

  property Position: Integer; [rw]

Position - the location of the slider along the track bar. Represents the Return value from the control

  property Reversed: Boolean; [rw]

  property ScalePos: TTrackBarScalePos; [rw]

ScalePos - whether scaling label appears at top, bottom, left or right

  property SelEnd: Integer; [rw]

  property SelStart: Integer; [rw]

  property ShowSelRange: Boolean; [rw]

  property TabStop;

Is the control in the sequence of controls accessed by successive presses of the Tab key?

  property TickMarks: TTickMark; [rw]

Tickmarks - whether the ticks are above/left, below/right, or both

  property TickStyle: TTickStyle; [rw]

TickStyle - none, produced automatically, or calculated manually

end;

TCustomTrackBar

TCustomTrackBar - the base class for TTrackBar

TWinControl

TControl

TLCLComponent

TLCLComponent - base class for LCL components

TComponent,IUnknown,IInterfaceComponentReference

TPersistent

TObject