Hi,
bist du sicher das du nur das willst?
Momentan sieht das so aus, als ob der Knopp bei jedem klick auch eine andere Aktion durchführen soll, also...
.. du kannst für solche dinge die Eigenschaft TAG des Buttons nutzen. Belege das einfach im Objektinspektor mit 0 vor
und dann machste so:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
case Button1.Tag of
1:
begin
Button1.Caption := 'Aktion3';
Button1.Tag := 2;
// hier weitere Dinge die beim ZWEITEN Klick passieren sollen;
end;
2:
begin
Button1.Caption := 'Aktion1';
Button1.Tag := 0; // Also beim nächsten klicken wieder Aktion 1
// hier weitere Dinge die beim DRITTEM Klick passieren sollen;
end;
else
begin
Button1.Caption := 'Aktion2';
Button1.Tag := 1;
// hier weitere Dinge die beim ERSTEN Klick passieren sollen;
end;
end;
end;