Inherits from
TForm
procedure FormCreate(Sender: TObject);
procedure Panel1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
procedure Rouler1Paint(Sender: TObject);
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;
procedure FormCreate(Sender: TObject);
procedure Panel1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
procedure Rouler1Paint(Sender: TObject);
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;