Zitat von
Noedel:
so kannst du die erste Zeile nicht schreiben, du musst wenn dann ne variable vom typ boolean in dem button anlegen, die dir sagt, dass der Button gedrückt wurde.
Oder du schreibst folgendes :
Delphi-Quellcode:
procedure TForm3.Timer1Timer(Sender: TObject);
begin
If TButton(Sender).Name = 'Button1' Then
panel1.Top := panel1.Top - 1;
end;