T tiger9382 Unregistered / Unconfirmed GUEST, unregistred user! 2003-08-12 #1 我想将JPG图象读入到Timage控件中的时候,将其格式转化为BMP,请问该怎么做?还有,我想实现截图的功能,即将读入到Image控件的图片,用光标截取后,能实现截取的部分放大到整个Timage控件的大小,请给点思路,或是相关的代码也可以!
我想将JPG图象读入到Timage控件中的时候,将其格式转化为BMP,请问该怎么做?还有,我想实现截图的功能,即将读入到Image控件的图片,用光标截取后,能实现截取的部分放大到整个Timage控件的大小,请给点思路,或是相关的代码也可以!
X xyf2001721 Unregistered / Unconfirmed GUEST, unregistred user! 2003-08-12 #2 TempJpg :TJpegImage;TempJpg := TJpegImage.Create; try TempJpg.LoadFromFile(OpenPictureDialog1.FileName); YBmp.Assign(TempJpg); TempJpg.Free; except TempJpg.Free; end; Image1.picture.bitmap := YBmp; 可能需要纪录截取的大小,映射到bmp图上的sourcerect,然后 Image1.canvas.copyRect(Image1.clientRect,ybmp,sourcerect);
TempJpg :TJpegImage;TempJpg := TJpegImage.Create; try TempJpg.LoadFromFile(OpenPictureDialog1.FileName); YBmp.Assign(TempJpg); TempJpg.Free; except TempJpg.Free; end; Image1.picture.bitmap := YBmp; 可能需要纪录截取的大小,映射到bmp图上的sourcerect,然后 Image1.canvas.copyRect(Image1.clientRect,ybmp,sourcerect);
Z zhoufujin Unregistered / Unconfirmed GUEST, unregistred user! 2003-08-12 #3 TempJpg :TJpegImage; TempJpg := TJpegImage.Create; try TempJpg.LoadFromFile(OpenPictureDialog1.FileName); Image1.picture.bitmap.Assign(TempJpg); Finally TempJpg.Free; end;
TempJpg :TJpegImage; TempJpg := TJpegImage.Create; try TempJpg.LoadFromFile(OpenPictureDialog1.FileName); Image1.picture.bitmap.Assign(TempJpg); Finally TempJpg.Free; end;
T tiger9382 Unregistered / Unconfirmed GUEST, unregistred user! 2003-08-13 #4 各位,好象不行耶,难道就没有人给我顶? 郁闷!
X xyf2001721 Unregistered / Unconfirmed GUEST, unregistred user! 2003-08-25 #6 不会吧,怎么个不行法,我就是这么做的,可以阿。