TMediaPlayer gestartet?

[Alex_ITA01]

hallo erstmal,
ich hab mal ne frage wie fragt man ob, ob der TMediaPlayer gestartet wurde? Ich weiß die procedure heißt .play aber kann ja schlecht abfragen if mediaplayer.play = true then... also kann mir da mal jemand ein tip geben
danke alex

[Gandalfus]

IF mediaplayer.filename <> '' then
Playeristgestartet


PS eine Abfrage von Mediaplayer.status führt zu einem Fehler wenn de Mediaplayer noch nicht mit open geöfnet wurde.

[Alex_ITA01]

danke habs schon hinbekommen

Delphi-Quellcode:

if Form1.MediaPlayer1.Mode = mpPlaying then
begin
...
end;

//und vorher abfragen ob er geöffnet wurde

if Form1.MediaPlayer1.Mode = mpOpen then
begin
...
end;

danke alex

[edit=Daniel B]Delphi-Tags eimgefügt. Mfg, Daniel B[/edit]

[FriFra]

Aber Vorsicht: Wenn der TMediaPlayer nicht sichbar ist, z.B. auf einem Tabsheet im Hintergrund, können Zugriffe zu OLE-Fehlern oder Schutzverletzungen führen (Das gleiche Problem hat übrigens auch TWeBrowser) !
Die ActiveX Controls scheinen erst zu initialisieren, wenn sie sichtbar im Vordergrund sind ...

[Alex_ITA01]

danke schön aber er ist im vordergrund zu sehen
aber werd ich mir trotzdem merken

[Christian Seehase]

Moin FriFra,

welchen TMediaPlayer hast Du?
Bei mir ist das kein ActiveX Control, sondern eine Kapselung des MCI.

[FriFra]

Da hab ich mich wohl geirrt , aber er verhällt sich exact so wie jedes ActiveX Control...