在程序启动画面播放AVI,在启动画面的AVI播放完毕后直接进入主程序,我开始用MediaPlayer时在form1中点击MediaPlayer1上的播放键显示:无法使用视频, 找不到“vids:dvsd”解压缩程序 ,后来我安装了WindowsMediaPlayer,可是WindowsMediaPlayer.URL:=path;这个路径是绝对的,请问怎么让它能打开相对路径的AVI文件呢?
调试欢乐多
下面是在工程代码中的设置,可是没有达到上面说的效果,只是闪了一下就进入主程序了
begin
Application.Initialize;
Application.Title := '测试';
form1:=tform1.Create(application);
form1.Show;
form1.Update ;
Application.CreateForm(TfrmMain, frmMain);
form1.Hide;
form1.Free;
Application.Run;
procedure TForm1.FormCreate(Sender: TObject);
begin
WindowsMediaPlayer1.URL:='.\llk.avi';
end;