[MAKS 24]

Как видишь Артем на твой топик не кто даже ответить не может.

[Prisoner]

MAKS 24, нарушение ОПК 3.7. В следущий раз будет замечание.
PS Я рад, что ты меня узнал, но форум не для разговора, он ТЕМАТИЧЕСКИЙ, прошу тебя соответствовать... пожалуйста

[[mzd]]

Попробуй это, может поможет (если звук выводить через TMediaPlayer):

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];
* *{ Note we must reset the Notify property to True }
* *{ so that we are notified the next time the }
* *{ mode changes }
* *Notify := True;
*end;
end;


[s]Исправлено: [mzd], 16:43 6-11-2003[/s]

[Prisoner]

[mzd]
В том-то и дело, что не через TMediaPlayer. Итог: за попытку помочь - спасибо, но будь чуточку внимательнее .