TcpCoord -
TcpSpeedButton -
Register -
TCoordEvent
TCroixstyle
CM_CHANGECOORD
CM_CHANGECOORDX
CM_CHANGECOORDY
procedure Register;
TCoordEvent = procedure (Sender:TObject; x,y:integer) of object
TCroixstyle=(csCross, csCircle, csDiamond, csSquare, csCoordinates);
CM_CHANGECOORD = WM_USER + 2002
CM_CHANGECOORDX = WM_USER + 2000
v 1.0 : 30-11-1997
Freeware component for Delphi 3 (D2 ?) by Christian Poisson.
Send any comments to christian.poisson@hol.fr.
Color : only in the corners.
ColorCoord : backcolor if ThumbStyle is csCoordinates.
ColorFlatButton : Color of the buttons only if the Flat property is True (otherwise buttons' color is the default one).
ColorZone : in the coordinates zone.
CoordFormat : the text (using the Font property) that appears if ThumbStyle is csCoordinates.
- [x] means XCoordinate
- [y] means YCoordinate
Xmax, Xmin, XStep, Ymax, Ymin, YStep :
(Xmin,Ymin) correspond to the left-top corner of te coordinates zone and
(Xmax,Ymax) to the bottom-right corner.
XStep is the difference between 2 consecutives Xcoordinates.
if Xmax
CM_CHANGECOORDY = WM_USER + 2001