[FERNANDO]

Привет всем.
У меня вопрос к вам. Можно ли компонентом медиаплеер воспроизвести звук и видео в форматах мр3 и ави? И как заставить кнопкам чтобы они работали? открыть, плай, стоп и т д. Самое главное это кнопка открыть. Потом я сам буду разбирать)))) Например я на форме добавил компонентов медиаплеер и панель и хочу добавить видео или мп на этот панель и из этой панели кнопки плай, стоп и т д будут взять данные.

[NumLock]

Код:

type
  TForm1 = class(TForm)
    MediaPlayer1: TMediaPlayer;
    ButtonOpen: TButton;
    OpenDialog1: TOpenDialog;
    procedure ButtonOpenClick(Sender: TObject);
...
procedure TForm1.ButtonOpenClick(Sender: TObject);
begin
  if OpenDialog1.Execute then
  begin
    MediaPlayer1.FileName:=OpenDialog1.FileName;
    MediaPlayer1.Open;
  end;
end;

остальныен кнопки уже есть. TMediaPlayer воспроизведет любой формат, если соотв. кодек установлен в системе.