Einzelnen Beitrag anzeigen

shebang

Registriert seit: 7. Feb 2020
131 Beiträge
 
Delphi 11 Alexandria
 
#2

AW: FMX-Android - Kein Hinweis "busy" möglich?

  Alt 7. Jul 2023, 12:58
Eine Möglichkeit wäre das Verschieben der Arbeit in einen anonymen Thread.
Delphi-Quellcode:
procedure TForm1.btn_createLocalDatasClick(Sender: TObject); // Aufruf aus dem Menü
begin
  lbl_hinweis.Text := 'erzeuge lokale Daten...';
  TThread.CreateAnonymousThread(procedure begin
    createLocalDatas;
    TThread.Synchronize(nil, procedure begin
      lbl_hinweis.Text := 'fertig';
    end);
  end).Start();
end;
  Mit Zitat antworten Zitat