AnimateWindow(..) zerstört VCL-Stile

[Der schöne Günther]

Zum nachvollziehen:

1) Neue VCL-Anwendung
2) Projekt->Optionen->Erscheinungsbild: Beliebigen Stil hinzufügen und als Standardstil setzen
3) TButton hinzufügen und onClick:

Delphi-Quellcode:

AnimateWindow(Button1.Handle, 100, AW_HOR_POSITIVE or AW_HIDE);
   sleep(100);
   AnimateWindow(Button1.Handle, 100, AW_HOR_POSITIVE);

Siehe Bilder.


Ich kann den Button1 jetzt nehmen und Invalidate(), Repaint() oder sonstwas aufrufen, aber doof ist es trotzdem. Vor allem da es für die Dauer der Animation natürlich immer noch nicht stimmt. Gibt es einen Ausweg?

[jaenicke]

Zitat von Der schöne Günther:

Gibt es einen Ausweg?

• Keine API-Aufrufe, die an der VCL vorbei auf die GUI zugreifen
• Keine VCL Styles
• Firemonkey inkl. dessen Animationen

Ich frage mich, ob man diese API-Funktionen überhaupt groß beeinflussen kann, selbst wenn Embarcadero das in den Styles einbauen wollen würde...

[Der schöne Günther]

Das ist wirklich schade, denn ich sehe zur WinAPI-Methode AnimateWindow() keine Alternative. Controls mit mehreren Kindelementen manuell über den Bildschirm schieben würde (ohne es getestet zu haben) sicher zu einer einzigen Flacker- und Ruckelorgie verkommen.

Am ehesten würde ich auf die Styles verzichten, was aber relativ schade ist. Denn mit praktisch Null Aufwand lässt sich das Erscheinungsbild rabiat ändern. Und die meisten sehen wirklich toll aus...

FireMonkey ist leider noch keine Option, da bsp. der TeeChart viele Dinge auf FireMonkey noch nicht kann. Sobald sich das ändert stürze ich mich drauf

[jaenicke]

Zitat von Der schöne Günther:

Das ist wirklich schade, denn ich sehe zur WinAPI-Methode AnimateWindow() keine Alternative. Controls mit mehreren Kindelementen manuell über den Bildschirm schieben würde (ohne es getestet zu haben) sicher zu einer einzigen Flacker- und Ruckelorgie verkommen.

Wenn du es so machst, ja.
Du kannst aber auch einfach einen Screenshot von dem Bereich machen und nur den animieren. Das klappt problemlos und ohne ruckeln...
Sprich: Screenshot, PaintBox drüber, Controls verstecken, animiert ausblenden, fertig.

Du kannst sogar ein Bild nehmen, auf das du den Screenshot legst und das mit AnimateWindow ausblenden. Aber wie gesagt würde ich darauf bei Styles eher verzichten.

[Der schöne Günther]

Ich hatte (und habe) keine Ahnung, wie man Controls inkl. ihrer Kinder abfotographieren könnte, deshalb habe ich direkt die eigentlichen Komponenten animiert.

Wenn man einfach das Bild abfotographiert, dann wäre doch auch mit den Styles kein Problem. Warum sollte man denn dann trotzdem drauf verzichten?