Delphi VCL GIF 动画

2017-04-08 20:15:41来源:CSDN作者:pcplayer人点击

Delphi XE10 的 VCL 已经内置支持 GIF,不需要第三方控件。


uses Vcl.Imaging.GIFImgprocedure TForm2.Button1Click(Sender: TObject);begin  Image1.Picture.LoadFromFile('E:/tt/abc.gif');  TGIFImage(Image1.Picture.Graphic).Animate := True;  //加上这句话,图就能动。end;


最新文章

123

最新摄影

微信扫一扫

第七城市微信公众平台