批量图片格式转换工具

易语言 2020-09-25 15:26:47

批量图片格式转换工具

GdipLoadImageFromFile (A2W (图片 [i]), Image)
.如果真 (GetEncoderClsid (多项选择 (组合框1.现行选中项 + 1, “image/bmp”, “image/jpeg”, “image/gif”, “image/tiff”, “image/png”), Clsid) ≠ -1)
GdipSaveImageToFile (Image, A2W (图片 [i] + 多项选择 (组合框1.现行选中项 + 1, “.bmp”, “.jpg”, “.gif”, “.tif”, “.png”)), Clsid, 0)
.如果真结束
GdipDisposeImage (Image)