Animate Window wirkungslos??

[Mackhack]

Zitat von Ben-G:

Abgesehen davon wird das Fenster nicht komplett aufgebaut, unten fehlt ein Abschnitt von schätzungsweise 150 pixeln.

Soweit ich weis werden die Controls auf dem Fenster durch die Animate-Function etwas durcheinandergebracht. Du muesstst dann eben mit Control.Count eben druchhuschen im OnPaint/OnRePaint.

//Edit: Sorry, hab meine Augen grad erst aufgemacht aus dem Bett. Natuerlich im OnShow folgendes aufrufen:

Delphi-Quellcode:

...
SetFocus;
for count := 0 to Pred(ControlCount) do
  if Controls[Count].Visible then
    Controls[Count].Repaint;