填空题本程序由主窗体form1和子窗体form2组成,设计界面如下图所示: 主窗体上建立的对象有Image1、Button1(加载图片)、Button2(退出)、OpenDialog1。子窗体上建立的对象有Label1、BitBtm1(Yes)、BitBtm2(No)。 单击“打开文件”按钮(Button1),会弹出打开文件对话框。用户指定一个图像文件后,图像加载到Image1显示区中。 单击“退出”按钮,会弹出确认对话框(Form2)。如果用户按“Yes”键,程序结束;如果按“No”键,返回主窗体。 下面是Unit1的代码部分,请在下划线处完成程序填空。 implementation {$R*.dfm} uses (①) procedure TForm1.Button1Click(Sender:TObject); 加载图片 begin if(②)then Image1.Picture.LoadFromFile(③) end procedure TForm1.Button2Click(Sender: TObject) 退出 begin if(④)=mrYes then(⑤) end; end.