本程序設(shè)計界面及運行界面如下圖所示。

該程序的功能是：用戶在界面上的兩個編輯框（Edit1、Edit2）內(nèi)分別輸入兩個正整數(shù)M和N（M<N），單擊“計算”按鈕（Button1），程序求出M~N之間所有能被3整除的數(shù)，并在Memo1對象中依次顯示。
請編寫單擊“計算”按鈕的事件處理程序。

本程序由主窗體form1和子窗體form2組成，設(shè)計界面如下圖所示：

主窗體上建立的對象有Image1、Button1（加載圖片）、Button2（退出）、OpenDialog1。子窗體上建立的對象有Label1、BitBtm1（Yes）、BitBtm2（No）。
單擊“打開文件”按鈕（Button1），會彈出打開文件對話框。用戶指定一個圖像文件后，圖像加載到Image1顯示區(qū)中。
單擊“退出”按鈕，會彈出確認(rèn)對話框（Form2）。如果用戶按“Yes”鍵，程序結(jié)束；如果按“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.