Prozedur gegen sich selbst absichern

[DelphiManiac]

Wenn ich das so mache habe ich aber leider ein Problem:


Ich habe ja gesagt, dass ich z.B.: die Methode im Button aufrufe,

Delphi-Quellcode:

procedure TMainGUI.btnSaveDichteDampClick(Sender: TObject);
begin
  Screen.Cursor:=crHourGlass;
  if not(TuWas() = 0)) then
  begin
//  Fehler ausgeben
  end;
  Screen.Cursor:=crDefault;
end;

Jetzt wird ja im Prinzip durch das zurücksetzen des Cursors signalisiert, dass die Methode fertig ausgeführt wurde, wenn ich das jetzt im Thread mache, habe ich diese direkte Rückkopplung nicht...

Dann müsste ich wieder auf den Thread warten...
//edit : Delphicode geändert