Wait dialog oder sanduhr fuer Android/IOS

[Darlo]

Zitat von Sir Rufo:

Zitat von Darlo:

Das Ding heißt TAniIndicator und den musst Du in einem eigenen Thread laufen lassen.

Doch wohl eher anders herum

Den ausführenden Code packt man in einen eigenen Thread

Jo, so wird dann ein Schuh draus....

Delphi-Quellcode:

  AniIndicator1.Enabled := true;
  Application.ProcessMessages;

  TThread.CreateAnonymousThread(procedure ()
    begin
      try
        ergebnisse := frmWebservice.getPkx(id.ToInteger,geb,beginn,ablauf, port);

      finally
        TThread.Synchronize (TThread.CurrentThread,
          procedure ()
          begin
            createProduktuebersicht(ergebnisse);
            AniIndicator1.Enabled := false;
          end);
      end;
  end).Start;