怎样动态更改MID窗口背景

有2个FORM一个为MIDFROM（form1）另一个是普通的FROM(form2)。在普通的FORM里怎么才能更改MID窗口中Image组件里的图片？我的代码是
procedure TForm2.Button1Click(Sender: TObject);
var
s:string;
begin
s:=edit1.Text;
s:='\'+s+'.bmp';
form1.Image1.Picture.LoadFromFile(ExtractFilePath(Application.ExeName)+s);
end;
没有作用，为什么？