| Class TForm1 (unit Demo) |
TForm
| Constructors |
| Functions |
procedure FormCreate(Sender: TObject);
procedure Panel1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
procedure Rouler1Paint(Sender: TObject);| Properties |
| Events |
| Variables |
Panel1 : TPanel;
Rouler1 : TRouler;
Rouler10 : TRouler;
Rouler11 : TRouler;
Rouler12 : TRouler;
Rouler13 : TRouler;
Rouler2 : TRouler;
Rouler3 : TRouler;
Rouler4 : TRouler;
Rouler5 : TRouler;
Rouler6 : TRouler;
Rouler7 : TRouler;
Rouler8 : TRouler;
Rouler9 : TRouler;
OldX : integer;
OldY : integer;| Constructors |
| Functions |
procedure FormCreate(Sender: TObject);
procedure Panel1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
procedure Rouler1Paint(Sender: TObject);| Properties |
| Events |
| Variables |
Panel1 : TPanel;
Rouler1 : TRouler;
Rouler10 : TRouler;
Rouler11 : TRouler;
Rouler12 : TRouler;
Rouler13 : TRouler;
Rouler2 : TRouler;
Rouler3 : TRouler;
Rouler4 : TRouler;
Rouler5 : TRouler;
Rouler6 : TRouler;
Rouler7 : TRouler;
Rouler8 : TRouler;
Rouler9 : TRouler;
OldX : integer;Private-Deklarationen
OldY : integer;