| Class TFrmMoveText (unit MoveText) |
TForm
| Constructors |
| Functions |
procedure Image1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
procedure Image1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
procedure Image1MouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);| Properties |
| Events |
| Variables |
Image1 : TImage;
Label1 : TLabel;
FCurX : integer;
FCurY : integer;| Constructors |
| Functions |
procedure Image1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
procedure Image1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
procedure Image1MouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);| Properties |
| Events |
| Variables |
Image1 : TImage;
Label1 : TLabel;
FCurX : integer;Private declarations
FCurY : integer;