button disablen ne funktion ausführen und wieder enablen?

[Nikolas]

Warum nimmst du nicht einfach einen Boolean? So frei nach

Delphi-Quellcode:

Button.onclick
begin

if BinAmRechnen then 
  begin
    showmessage('Ich rechne noch');  
    exit;
  end;
else
  begin
    BinAmRechnen:=true;
    langeprocedure;
  end;

BinAmRechnen:=false;
end;

Damit wird jeder Klick ignoriert so lange gerechnet wird.