procedure TForm1.cxImage1Click(Sender: TObject); begin if OpenDialog1.Execute then begin cxImage1.Picture.LoadFromFile(OpenDialog1.FileName); end; end;本回答被提问者和网友采纳
delphi 用cxImage控件打开电脑上的图片 begin if OpenDialog1.Execute then begin cxImage1.Picture.LoadFromFile(OpenDialog1.FileName);end;end;