Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Multimedia (https://www.delphipraxis.net/16-multimedia/)
-   -   Delphi TMediaPlayer gestartet? (https://www.delphipraxis.net/9932-tmediaplayer-gestartet.html)

Alex_ITA01 8. Okt 2003 08:08


TMediaPlayer gestartet?
 
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 8. Okt 2003 11:40

Re: TMediaPlayer gestartet?
 
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 8. Okt 2003 11:44

Re: TMediaPlayer gestartet?
 
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 8. Okt 2003 11:46

Re: TMediaPlayer gestartet?
 
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) :shock: !
Die ActiveX Controls scheinen erst zu initialisieren, wenn sie sichtbar im Vordergrund sind :? ...

Alex_ITA01 8. Okt 2003 11:48

Re: TMediaPlayer gestartet?
 
danke schön aber er ist im vordergrund zu sehen
aber werd ich mir trotzdem merken

Christian Seehase 8. Okt 2003 13:15

Re: TMediaPlayer gestartet?
 
Moin FriFra,

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

FriFra 8. Okt 2003 13:54

Re: TMediaPlayer gestartet?
 
Da hab ich mich wohl geirrt :oops: , aber er verhällt sich exact so wie jedes ActiveX Control...


Alle Zeitangaben in WEZ +1. Es ist jetzt 15:42 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