Animation eines Formulars

[luckystar85]

Moin, moin!!!
Wie kann ich ein fenster animieren. Das einfache anzeigen ist mir zu langweilig.
Da ich Delphi 5 verwende geht AlphaBlending und AnimateWindow leider nicht. Habt ihr andere vorschläge?

[Jens Schumann]

Hallo,
auch ich habe noch D5. In meiner Windows.pas ist AnimateWindow vorhanden. Also kein Problem.
In der Not könnte man selber die dll einbinden und die Funktion importieren bzw. deklarieren.

[himitsu]

Also gehen tut das in jeder 32Bit-Delphi-Version, das AlphaBlending und AnimateWindow nicht vom Delphi, sonder von Windows gehandhabt wird, du mußt nur die entsprechenden Functionsaufrufe bei dir implementieren und dann diese nur richtig aufrufen

Hab hier aber kein Delphi, und kann dir deßhlab nichts geben, aber die anderen könnten dir ja dabei etwas behilflich sein.

Außerdem sollte im MSDN zu den Funktionen auch noch eine Menge stehen

[luckystar85]

Ja es ist compilierfähig und läuft auch. Aber die Animation sieht total doof aus, da es nicht richtig läuft.

[Jens Schumann]

Zitat von luckystar85:

Ja es ist compilierfähig und läuft auch. Aber die Animation sieht total doof aus, da es nicht richtig läuft.

Dann hast Du scheinbar etwas falsch gemacht. Das ist definitiv nicht abhängig von der Delphiversion.

Wenn ich es recht erinnere sind beiden API's SetLayeredWindowAttributes und UpdateLayeredWindow
für das Aplhablending zuständig.

[luckystar85]

Ja, mehr als reinschreiben kann ich nicht. Ich habe das auch mal einen Kumpel gegeben und der hat Delphi 7 nachdem er das bei ihm compillierte sah das AnimateWindow richtig super aus. Das muss doch auch für Delphi 5 gehen.

[himitsu]

Also wie gesagt, an der Compilerversion sollte es nicht liegen ... aber was habt ihr beide denn für ein Betriebssystem und wie sieht der Code dafür bei dir aus...?

[luckystar85]

AnimateWindow(Splashform.Handle, 3000, AW_BLEND); beide Windows XP - Service Pack 2