"Unendlicher Progressbar"

[stahli]

Zitat von skoschke:

Beim ersten Panel / Dokument ca. 3 sec, alle weiteren gehen schneller (ca. 1 sec)

Ciao
Stefan

Steuerst Du jedes erzeugen/laden selbst?

Dann würde ich wieder bei einem Label oder Panel landen...

Angenommen Du lädst 10 Komponenten, dann

Label.Caption := '1/10';
Label.Update;
Dokument1Laden;
Label.Caption := '2/10';
Label.Update;
Dokument2Laden;
...
Label.Caption := '10/10';
Label.Update;
Dokument10Laden;

Label.Visible := False;

Dann würde der Nutzer ja ausreichend sehen, dass sich etwas tut.

Alles andere wäre deutlich aufwendiger und würde nicht mehr bringen.

[himitsu]

Statt Update ein Label.Repaint oder eventuell Label.Parent.Repaint benutzen
oder eventuell ein TStaticText statt TLabel versuchen.

TLabel hat keinen eigenen Canvas und lässt sich von seinem Parent zeichnen.

Und Update zeichnet nur das neu, als vorher als "veraltet" gekennzeichnet wurde.
Ein Repaint macht dagegen Invalidate + Update.