Erscheinen

[Mackhack]

Oder die AnimateWindow Funktion nutzen!

[Schwedenbitter]

Hallo,

Zitat von Mackhack:

Oder die AnimateWindow Funktion nutzen!

da ich genau mit dieser Funktion Probleme habe, nehme ich das Thema mal wieder auf.

Ich habe mal meinen Beispielcode angefügt. In diesem wird das MainForm einmal mit meiner Routine aus- und per Timer wieder eingeblendet und ein weiteres Mal mit AnimateWindow. Es besteht das Problem, dass bei Verwendung von AnimateWindow die Controls nach dem Einblenden nicht zu sehen sind.
Da ich nicht weiß, ob es am Code oder meinem Compiler (TurboDelphi) liegt, ist die exe auch mit dabei.

AnimateWindow wäre mir - da kürzer und wegen API resourcenschonender - lieber.
Wie kann ich das Problem mit den Controls lösen?

Gruß und Dank, Alex

[DeddyH]

Versuch doch nach Ende der Animation mal ein Refresh.

[Schwedenbitter]

Zitat von DeddyH:

Versuch doch nach Ende der Animation mal ein Refresh.

Danke für die Antwort. Leider klappt das auch nicht. Ich habe Refresh/Repaint/Update probiert; leider alles ohne Erfolg.

Ich habe hier noch ein altes Delphi 6. Wenn ich den Code damit compiliere, dann klappt es. Allerdings verstehe ich das insoweit nicht, als sowohl Turbodelphi als auch Delphi 6 für AnimateWindow die API-Funktionen benutzen und laut Quellcode beide dieselbe Routinen mit denselben Parametern benutzen

Gruß, Alex

[DeddyH]

Tja, merkwürdig. Ich bin nur auf das Refresh gekommen, da die Controls nach einem Verschieben des Fensters außerhalb des sichtbaren Bildschirmbereiches und wieder zurück dann sichtbar waren.

[Schwedenbitter]

Zitat von DeddyH:

... die Controls (waren) nach einem Verschieben des Fensters außerhalb des sichtbaren Bildschirmbereiches und wieder zurück dann sichtbar ...

Das hatte ich auch schon festgestellt, bin aber nicht auf Refresh & Co. gekommen.

Danke für das Probieren! Hast Du die exe probiert oder auch den Quelltext mal compiliert? Wie gesagt: mich deprimiert, dass es mit Delphi 6 anstandslos klappt. Ich wollte aber gern in ein bestehendes, großes Projekt ein- und ausblendende Fenster einbauen. In diesem werden viele Funktionen verwendet, die es anno Delphi 6 nicht gab. Ich kann das daher nicht einfach mit Version 6 compilieren

Gruß, Alex

[DeddyH]

Ich hatte nur das Kompilat laufen lassen. Im Moment bin ich unter Linux on, kann aber morgen gern einmal das Projekt kompilieren und dann noch einmal schauen (Delphi 2007).