VCL-Form aktualisieren obwohl Maschine ausgelastet ist

[Furtbichler]

Gegen mehrmaliges Aktivieren hilft ein einfaches

Delphi-Quellcode:

Procedure TMyForm.myButtonClick(Sender : TObject);
Begin
  If myButton.Tag=0 then 
    try
      myButton.Tag := 1;
  // Und hier was extrem lahmes mit Application.ProcessMessages zwischendurch
    finally
     myButton.Tag := 0;
  end
end;

Wobei.. myButton.Enabled := False ist irgendwie ... naheliegender