delphi 播放GIF动画
摘要:
use GIFImg procedure TForm1.Button1Click(Sender: TObject); var pic_path:string; begin pic_path := ExtractFilePath(ParamStr(0)) + 'img\gif\loading.gif' 阅读全文
posted @ 2023-04-13 22:16 六十五度 阅读(109) 评论(0) 推荐(0) 编辑