Witam.
Mam problem z media playerem wydanym przez Lord Dr. Andrei J. Sagura II von Orechov czy jakos tak.
Chodzi o to ze jak uruchamiam zrobiony przez autora demo player to wszysto gra ale jak otworze nowy document w delphi i poloze na formatke Panel, jakis przycisk do rozpoczecia odtwarzanie lub po prostu informowania czy plik sie wczytal, dodam kod pas z demo programu autora to przy probie odtworzenia pliku video dostaje za kazdym razem komunikat "Error loading file". Dodam ze do katalogu gdzie mam wszystkie pliki projektu dodaje pliki: MediaInterface.pas, mediaplr.dll i plik video.
Co jest nie tak bo juz zglupialem. Ponizej zamieszczam kod z mojego pliku pas ktory po prostu ma informowac czy plik zostal zaladowany.

unit player;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, Buttons, ExtCtrls, SHFolder, MediaInterface;

type
  TForm1 = class(TForm)
    Panel1: TPanel;
    SpeedButton2: TSpeedButton;
    procedure SpeedButton2Click(Sender: TObject);
  private
    { Private declarations }
  public

  end;

var
  MediaFileName : shortString = 'zegar.wmv';
  Form1: TForm1 = nil;

implementation

{$R *.dfm}
 
procedure TForm1.SpeedButton2Click(Sender: TObject);
begin
 ShowMessage(aboutMediaPlayer);
 ShowMessage(loadMediaFile(MediaFileName, Panel1.Handle));
end;

end.