Unit 'TATools'	Package
[Overview][Constants][Types][Classes][Procedures and functions][Variables][Index]	[#lz_tachart]

TZoomDragTool

Declaration

Source position: tatools.pas line 225

`type TZoomDragTool = class(TBasicZoomTool)`
`published`
`type`
`TRestoreExtentOn = (`
`zreDragTopLeft,`
`zreDragTopRight,`
`zreDragBottomLeft,`
`zreDragBottomRight,`
`zreClick,`
`zreDifferentDrag`
`);`
`TRestoreExtentOnSet = set of TRestoreExtentOn;`
`TZoomDragBrush = TClearBrush;`
`strict protected`
`procedure Cancel; override;`
`protected`
`function IsProportional; override;`
`public`
`procedure MouseDown(); override;`
`procedure MouseMove(); override;`
`procedure MouseUp(); override;`
`constructor Create(); override;`
`destructor Destroy; override;`
`procedure Draw(); override;`
`property SelectionRect: TRect; [rw]`
`published`
`property AdjustSelection: Boolean; [rw]`
`property Brush: TZoomDragBrush; [rw]`
`property DrawingMode: TChartToolDrawingMode;`
`property EscapeCancels: Boolean;`
`property Frame: TChartPen; [rw]`
`property RatioLimit: TZoomRatioLimit; [rw]`
`property RestoreExtentOn: TRestoreExtentOnSet; [rw]`
`property Transparency: TChartTransparency;`
`end;`