[Properties (by Name)] [Methods (by Name)] [Events (by Name)]
Source position: tatools.pas line 330
type TPanDragTool = class(TBasicPanTool) |
||
strict protected |
||
procedure Activate; override; |
|
|
procedure Cancel; override; |
|
|
procedure Deactivate; override; |
|
|
public |
||
constructor Create(); override; |
|
|
procedure MouseDown(); override; |
|
|
procedure MouseMove(); override; |
|
|
procedure MouseUp(); override; |
|
|
published |
||
property ActiveCursor: TCursor; |
|
|
property Directions: TPanDirectionSet; [rw] |
|
|
property EscapeCancels: Boolean; |
|
|
property MinDragRadius: Cardinal; [rw] |
|
|
end; |
|
||
| | | ||
|
||
| | | ||
|
||
| | | ||
TObject |
| CT Web help |
| CodeTyphon Studio |