Mediaplayer neue Datei zuweisen

rakker · Beiträge: 32

Hallo Leute

Ich moechte in meinem Programm einem Mediaplayer eine neue Datei zuweisen. Und zwar auf einen Pfand den das Programm zuerst ermittelt.

Mein Text ist jetzt folgender:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:

procedure Tformintro.FormCreate(Sender: TObject);
begin
programmpfad:=ExtractFilePath(Application.ExeName);
videoplayerintro.FileName.loadfromfile(programmpfad+'ASF.asf');
end;

Die Variable programmpfad ist ein string.
videoplayerintro ist der Mediaplayer.
ASF.asf ist die Datei die geladen werden sollte.

Der Mediaplayer spielt ein kurzes Video ab, und ich habe nur die .asf Dateien zum laufen gebracht. Da ich wegen der .asf Datei im DeviceType vom Mediaplayer Autoselect haben muss (sonst spielt es nicht ab), gibt der PC mir immer eine Fehlermeldung wenn er die Datei nicht finden kann auf dem Pfad den ich dem Mediaplayer vorher gegeben habe. Wenn ich jedoch diesen Pfand loesche, kommt er auch mit einer Fehlermeldung.

Da ich noch Anfaenger bin brauche ich eine ziemlich ausfuehrliche Hilfe, und der Quelltext oben wird sicherlich auch nicht stimmen.

Ich hoffe ihr konntet begreifen was mein Problem ist und koennt mir helfen.

Schon im voraus mal Danke.
Rakker

P.S. ich hoffe ich habe die richtige Kategorie gefunden....

Moderiert von Gausi: Beitragsformatierung überarbeitet.
Moderiert von Gausi: Topic aus Dateizugriff verschoben am Fr 03.02.2006 um 22:09

Neidhard von Reuental · Beiträge: 268 XP BDS 2006 Prof

ne, is falsche dektion, gehört in den bereich multimedia

keine ahnung was für einen mediaplayer du verwendest, aber der standart TMediaPlayer ist es jedenfalls nicht. zumindest gibt es da keine procedure "videoplayerintro.FileName.loadfromfile(xxx); "
versuch es mal so:

markieren

Delphi-Quelltext

1:
2:
3:

  videoplayerintro.FileName:=ExtractFilePath(Application.ExeName)+'ASF.asf';
  videoplayerintro.Open;
  videoplayerintro.Play;

wenn die datei nicht gefunden wird gibt es natürlich eine fehlermeldung. die kannst du z.b. mit Except abfangen oder du prüfst vorher mit FileExists

rakker · Beiträge: 32

Hallo

Ja das ist ein Standart TMediaPlayer. Und auf die Idee mit dem LoadFormFile bin ich gakommen, da ich es so bei einem Bild gemacht habe. Habe aber auch schon ermutet dass es das nicht gibt.
Ich werde es mal so probieren wie du es vorgeschlagen hast. Die erste Zeile hatte ich auch schon, aber die 2 nächsten nicht.

Das solches in die Kategorie Multimedia gehöhrt weiss ich dann ab jetzt. Vielleicht können es die Admins verschieben? Ich galube nicht dass ich das kann.

Gruss
rakker

rakker · Beiträge: 32

Hallo Leute

Ich habe es geschafft. Danke fuer eure Hilfe.

Gruss
rakker

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme