本文整理自网络,侵删。
varimgStream:TMemoryStream;MyImage:TMemoryStream;beginimgStream:=TMemoryStream.Create;MyImage:=TMemoryStream.Create;
Image1.Picture.SaveToStream(imgStream); imgStream.Position:=0;
MyImage.LoadFromStream(imgStream);
Image2.Picture.LoadFromStream(MyImage);
相关阅读 >>
Delphi xe 10.2.1 fmx平台 在图片上写字方法
Delphi 利用datasnap进行数据流(tstream)的传递
更多相关阅读请进入《Delphi》频道 >>