Var Img: TImageData;
tm: TMemoryStream;
tm := TMemoryStream.Create;
InitImage(Img);
LoadImageFromFile('Z:\xx.dds', Img);
SaveImageToStream('.png',tm,Img);
tm.SaveToFile('z:\xxx.png');
tm.free;
FreeImage(Img);
Page created in 0.032 seconds with 19 queries.