image和openpicturedialog和 savepicturedialog合用，怎么实现图片的载入和保存

Question

image和openpicturedialog和 savepicturedialog合用，怎么实现图片的载入和保存
怎么清空image1,利用二进制流的形式保存，我现在急需解答，给我源代码，我给100分

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
begin
  if form1.OpenPictureDialog1.Execute then
  begin
    form1.Image1.Picture.LoadFromFile(form1.OpenPictureDialog1.FileName);
  end;
end;procedure TForm1.Button2Click(Sender: TObject);
begin
  if form1.SavePictureDialog1.Execute then
  begin
    form1.Image1.Picture.SaveToFile(form1.SavePictureDialog1.FileName+'.bmp');
  end;
end;

Answer 2

OpenPictureDialog1 打开
  if OpenPictureDialog1.Execute then
    Image1.Picture.LoadFromFile(OpenPictureDialog1.FileName);SavePictureDialog1 保存
  if SavePictureDialog1.Execute then
    Image1.Picture.SaveToFile(SavePictureDialog1.FileName);清空
  Image1.Picture.Assign(nil);

Answer 3

在窗体上放个imagelist控件，导入你需要的图片，将需要导入图片的控件的images属性设置为imagelist1，然后在窗体的oncreate事件中输入（以mainmenu为例）：
MainMenu1.Items[0].Items[0].ImageIndex:=1;
就可以导入你所需要的图片了。