Aktuellen Status des MediaPlayers ermitteln!

[DelphiUser7]

Hallo!
Ich programmiere gerade einen AudioPlayer, und dazu benötige ich unter anderem die Information, wie ich den aktuellen Status des MediaPlayers ermitteln kann; :coder: (mit aktueller Stand ist gemeint, ob er gerade einen Song abspielt, oder sich im Pause- bzw. Stop-Modus befindet);

Weiß hier jemand einen Rat?;

Gruss
DelphiUser7

[Captnemo]

Hast du schon mal die Delphi-Hilfe konsultiert?

Delphi-Quellcode:

const

  ModeStr: array[TMPModes] of string = ('Not ready', 'Stopped', 'Playing', 'Recording', 'Seeking', 'Paused', 'Open');

procedure TForm1.MediaPlayer1Notify(Sender: TObject);

begin
  with Sender as TMediaPlayer do
  begin
    Form1.Caption := ModeStr[Mode];
    { Die Eigenschaft Notify muss auf true gesetzt werden, }
    { damit wir von den nächsten Modusänderungen }
    { benachrichtigt werden. }
    Notify := True;
  end;
end;

Markier mal in deinem Projekt den MediaPlayer, und drück dann mal auf F1. :mrgreen:

Ich gehe mal davon aus, das du das gemeint hat.

[edit=Daniel B]Delphi-Tags korrigiert. Mfg, Daniel B[/edit]

[DelphiUser7]

Wie kann ich den Zustand des Mediaplayers in eine if..then-Abfrage einbinden(if 'Zustand des Mediaplayers' then...)??

[Gandalfus]

Programmieren ist mehr als jedes kleien Problem im Forum zu erfragen.
Es geht doch darum selber Problemlösungen zu finde.

Delphi-Quellcode:

IF Mediaplayer1.Mode = mpOpen then 
.....

mpNotReady
mpStopped
mpPlaying
mpRecording
mpSeeking
mpPaused
mpOpen