Delphi XE und Windows 7 BMP -> AVI

[fishbrain]

Hallo,

In mein Fraktal Programm soll eine Video Funktion eingebaut werden.

Habe jetzt den TAviWriter_2 getestet, aber beim ausführen des SampleProjekts kommt der Fehler:
Failed to create AVI video file. Err. $80040154

Danach hab ich das BMPtoVideo aus der Delphi-Praxis getestet. Fehler:
Konnte AVI Datei nicht erstellen. Festplatte voll oder Datei in Benutzung?

Beim DSPack ist mir nicht ganz klar wie ich ein Video aus BMP dateien erstellen kann. Gibts da irgendwie ein tutorial?

Ich weiß das ist der x-te Thread zu dem Thema aber in anderen Threads finde ich keine Lösung. Meist sind diese schon mehrere Jahre alt weshalb ich darauf schließe, dass es entweder mit DelphiXE oder Win7 zu tun hat.

Würde mich freuen, wenn jemand eine einfache schnelle Lösung parat hätte

[fishbrain]

Gibt es echt keine Lösung oder funktioniert das nur bei mir nicht?
Hab mich schon so gefreut auf meine Zoom Videos

[fishbrain]

Ok ich habe das Problem jetzt weiter einschränken können.
Die Methode AVIFileOpen aus der unit VFW. Bzw aus der dll AVIFIL32.DLL.

Allerdings weiß ich jetzt auch nicht genau was das Problem ist. Beziehn sich die Codes vllt auf ältere Versionen der AVIFIL32.DLL? Wenn ja wo krieg ich raus auf welche Version?

[Pussyranger]

Ich habe exakt das gleiche Problem. Ich habe auch Win7, Delphi XE und arbeite auch an einem Fraktalprogramm und möchte Zoomvideos direkt im Programm erstellen. Bmp2AVI habe ich mir auch schon angesehen. Leider klappt dies bei mir auch nicht. In Delphi 7 funktioniert dagegen alles wunderbar.
Hast du das Problem mittlerweise lösen können?
Oder hat jemand anders vielleicht eine Idee?

Das Programm Bmp2AVI findet sich übgrigens hier.

Über Hilfe wäre ich sehr dankbar.
LG,

Pussyranger

[ChrisE]

Hallo,

es hilft vielleicht nicht viel, aber ich kann das Projekt Bmp2Avi problemlos mit Delphi 2007 erzeugen und es tut was es soll
(das ganze unter Windows 7).

Ich würde also mal nach (schwach)stellen Suchen die mit String/Char zu tun haben. Da gab es ja die große Umstellung auf Unicode (jetzt 2Byte pro Char).

Gruß, Chris

[EDIT]Du hast aber schon schreibrechte für das Verzeichnis, in dem Du das Video erstellen willst?[/EDIT]

[Pussyranger]

Danke für die schnelle Antwort! Es ist gut möglich, dass es an der Umstellung auf Unicode liegt, denn an einer Stelle musste ich den Quellcode deshalb schon ändern, damit der Code überhaupt kompiliert wurde:AVIFileOpen(pfile, PAnsiChar(WorkFile), OF_WRITE or OF_CREATE, nil) Was mache ich denn mit den anderen Stellen, die mit String/Char zu tun haben?