button disablen ne funktion ausführen und wieder enablen?

[Delphi Star]

wo muss ich Application.ProcessMessages hinmachen ich habs einfach mal an das Ende oder den Anfang geschrieben, bringt aber nix, was mach ich falsch