【地址报错问题】

Question

这是个书本上很简单的 播放器例子，
按钮的代码如下：（应该没有问题） 
procedure TForm1.btn1Click(Sender: TObject);
begin
 //对打开框初始化
 Opendialog1.Filter:='声音文件(*.wav)|*.wav|Midifiles(*.mid)|*.mid|AVI 文件(*.avi)|*.avi';
 if Opendialog1.Execute then
 begin
   edt1.Text :=Opendialog1.FileName ;
   mp1.FileName :=Opendialog1 .FileName ;
   mp1 .AutoOpen :=True;
   mp1.Open ;
   mp1.Notify :=True ;
   //指定播放窗口大小
   mp1.DisplayRect:=Rect(3,3,panel1.Width-6,panel1.Height-6);
 end;
end; 但是现在编译完后 点按钮BUTTON ，就会报错acess violation at address 00404890 in ... write of address 00000068.我该怎么改还是问题不是在这段代码上，还是怎么怎么的
学习delphi才一个多月。虚心求教、

Answer 1

代码没有问题，可能是你机器的问题。

Answer 2

代码没有问题，可能是你机器的问题