AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Multimedia Delphi film direkt in exe einbinden
Thema durchsuchen
Ansicht
Themen-Optionen

film direkt in exe einbinden

Ein Thema von rob60 · begonnen am 12. Mai 2009 · letzter Beitrag vom 14. Mai 2009
 
Mike_on_Tour

Registriert seit: 16. Aug 2007
195 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#6

Re: film direkt in exe einbinden

  Alt 14. Mai 2009, 11:10
Hallo,

ich habe das vor langer Zeit (2003) auch mal gebraucht. Leider habe ich momentan kein Code-Beispiel zur Hand (liegt alles zu Hause), aber AVI-Dateien (oder auch andere) lassen sich wie folgt als Ressource in ein Programm einbinden:

1. eine Textdatei AVIFILM.RC mit folgenden Inhalt anlegen:AVIVideo RCDATA MEINFILM.AVI 2. eine Textdatei AVIFILM.BAT mit folgenden Inhalt anlegen (Hinweis: evtl. den kompletten Pfad für BRC32 angeben !!!):BRC32 -r AVIFILM.RC 3. die Datei AVIFILM.BAT mit Doppelklick ausführen
4. wenn alles richtig war, existiert jetzt eine Datei AVIFILM.RES
5. Diese Datei AVIFILM.RES kannst du mit {$R AVIFILM.RES} in das Form einbinden, wo das AVI angezeigt werden soll.
6. Der Multimedia-Komponente (z.B. TAnimate) den Namen der Ressource mitteilen und abspielen:
Delphi-Quellcode:
Aminate1.ResName := 'AVIVideo';
Animate1.Play;
Evtl. gehört noch etwas mehr Code dazu. Aber wie gesagt, ich habe das alles zu Hause. Das Ergebnis kannst Du im Anhang sehen.

mfG
Mike
Angehängte Dateien
Dateityp: exe bowlingmanager_391.exe (1,15 MB, 23x aufgerufen)
Programmieren ist wie das Wandeln auf dem schmalen Pfad zwischen Wahnsinn und Intelligenz.
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 11:47 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz