Nö dann gehts normal, hab ich aber auch unverständlich geschrieben
Liegt am Enabled true, false
Klar ich kann auch
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
if Button1.Tag=1 then exit;
Button1.Tag:=1;
Sleep(100);//hier das, was button1 tuen soll
Button1.Tag:=0;
end;
machen um eine erneute Ausführung von Button1 zu verhindern, aber wenn man den deaktiviert, weiss der User "button1 kann ich nicht anklicken"