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?