| Class TASSwitcher (unit ASswitch) |
TCustomControl
| Constructors |
Constructor Create(AOwner:TComponent);----------- TASSwitcher ------------
| Functions |
Procedure Change;
Procedure DoEnter;
Procedure DoExit;
Procedure DrawFace;
Procedure DrawPointer;
Procedure DrawTicks;
Procedure KeyDown(var Key:Word;
Shift:TShiftState);
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 Paint;
Procedure CMMouseLeave(var Msg:TMessage);
Procedure GradToCoords_;
Procedure GradValues_;
Procedure SearchGradForPoint;
Procedure SetDrawFocused(Value:Boolean);
Procedure SetDrawTicks(Value:Boolean);
Procedure SetMax(Value:Integer);
Procedure SetMin(Value:Integer);
Procedure SetPosition(Value:Integer);
Procedure SetPrintValues(Value:Boolean);
Procedure SetResourceType(Value:String);
Procedure SetSoundChange(Value:String);
Procedure SetSoundType(Value:TWhereSoundStore);
Procedure TextValuesTicks;
Procedure WMGetDlgCode(var Msg:TWMGetDlgCode);| Properties |
property Color :
property DragCursor :
property DragMode :
property DrawFocused : Boolean
property DrawTicks_ : Boolean
property Enabled :
property HelpContext :
property Hint :
property Max : Integer
property ParentShowHint :
property PopupMenu :
property Position : Integer
property PrintValues : Boolean
property ResourceType : String
property ShowHint :
property SoundChange : String
property SoundType : TWhereSoundStore
property Visible :
property WaveOptions : TWaveOptions
property Min : Integer| Events |
event OnChange : TNotifyEvent
event OnClick :
event OnDragDrop :
event OnDragOver :
event OnEndDrag :
event OnEnter :
event OnExit :
event OnKeyDown :
event OnKeyPress :
event OnKeyUp :
event OnMouseDown :
event OnMouseMove :
event OnMouseUp : | Variables |
FDrawFocused : Boolean;
FDrawTicks_ : Boolean;
FMax : Integer;
FMin : Integer;
FOnChange : TNotifyEvent;
FPalyOptions : TWaveOptions;
FPosition : Integer;
FPrintValues : Boolean;
FResourceType : String;
FSoundChange : String;
FSoundType : TWhereSoundStore;
FWaveOptions : Word;| Constructors |
Constructor Create(AOwner:TComponent);Public declarations
----------- TASSwitcher ------------
| Functions |
Procedure Change;Protected declarations
Procedure DoEnter;
Procedure DoExit;
Procedure DrawFace;
Procedure DrawPointer;
Procedure DrawTicks;
Procedure KeyDown(var Key:Word;
Shift:TShiftState);
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 Paint;(TickCount);
Procedure CMMouseLeave(var Msg:TMessage);
Procedure GradToCoords_;
Procedure GradValues_;
Procedure SearchGradForPoint;2.5
Procedure SetDrawFocused(Value:Boolean);
Procedure SetDrawTicks(Value:Boolean);
Procedure SetMax(Value:Integer);
Procedure SetMin(Value:Integer);Can't lock resource
Procedure SetPosition(Value:Integer);
Procedure SetPrintValues(Value:Boolean);
Procedure SetResourceType(Value:String);
Procedure SetSoundChange(Value:String);
Procedure SetSoundType(Value:TWhereSoundStore);Offset:=40;
Procedure TextValuesTicks;ControlState := ControlState - [csCreating];
Procedure WMGetDlgCode(var Msg:TWMGetDlgCode);| Properties |
property Color :
property DragCursor :
property DragMode :
property DrawFocused : Boolean
property DrawTicks_ : Boolean
property Enabled :
property HelpContext :
property Hint :
property Max : IntegerPublished declarations
property ParentShowHint :
property PopupMenu :
property Position : Integer
property PrintValues : Boolean
property ResourceType : String
property ShowHint :
property SoundChange : String
property SoundType : TWhereSoundStore
property Visible :
property WaveOptions : TWaveOptions
property Min : Integer| Events |
event OnChange : TNotifyEvent
event OnClick :
event OnDragDrop :
event OnDragOver :
event OnEndDrag :
event OnEnter :
event OnExit :
event OnKeyDown :
event OnKeyPress :
event OnKeyUp :
event OnMouseDown :
event OnMouseMove :
event OnMouseUp : | Variables |
FDrawFocused : Boolean;
FDrawTicks_ : Boolean;
FMax : Integer;
FMin : Integer;Private declarations
FOnChange : TNotifyEvent;
FPalyOptions : TWaveOptions;
FPosition : Integer;
FPrintValues : Boolean;
FResourceType : String;
FSoundChange : String;
FSoundType : TWhereSoundStore;
FWaveOptions : Word;