Canvas不能操作..怎么办??? :-( 操作jpeg要用jpeg.dcu在uses里加上"jpeg". 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 要把Jpeg首先放到Bitmap里才能操作,完成后回写到Jpeg, 例如:var JImg: TJPEGImage; BImg: TBitmap;begin JImg := TJPEGImage.Create; JImg.LoadFromFile('c:\aa.jpg'); BImg.Assign(JImg); BImg.Canvas.Font.Color := clRed; BImg.Canvas.TextOut(0, 0, 'HELLO'); JImg.CompressionQuality := 80; JImg.Assign(BImg); JImg.Compress; JImg.SaveToFile('c:\bb.jpg');end; 谢谢上面两位大仙!! 我的问题未讲的清楚.我的目的是: 1.两个JPEG图片放在TIMAGE中,一前一后显示出来.(已经实现). 2.这两个JPEG图片实际是某地的地理图,一大一小.小的是简图,大的是详细图.小的在前面.大的在后面. 3.我需要在前面的小图上让用户用鼠标选择一块区域(虚线框住). 4.根据比例,显示大图在前面.小图不可见. 未采用放大方式,是因为放大后效果不好. 但我不能实现 第 3 步 的功能,不能在TIMAGE 上画虚线框.. ether的方法是在编辑图片,谢谢指教. 对bokei的提醒表示感谢. 我想给问题加分怎么加(21+20=41).. :-) IdTCPServer和IdTCPClient传输数据的例子 三年没来了 关于SQL2000中的视图 ACCESS导出为TXT格式的方法有哪些?????????????急 高分求教(C/S) 文本框中输入类型判断的两个问题 请问那里有注册的fastreport下载? 在线请教关于小屏幕控制问题!!!! Borland编程大赛的试题! 有用过sp_AddLinkedServer的请帮忙一下,谢谢! 关于MDI窗体的一个小问题 如何对窗体发送最小化消息 ,谢!
JImg: TJPEGImage;
BImg: TBitmap;
begin
JImg := TJPEGImage.Create;
JImg.LoadFromFile('c:\aa.jpg');
BImg.Assign(JImg);
BImg.Canvas.Font.Color := clRed;
BImg.Canvas.TextOut(0, 0, 'HELLO');
JImg.CompressionQuality := 80;
JImg.Assign(BImg);
JImg.Compress;
JImg.SaveToFile('c:\bb.jpg');
end;
我的问题未讲的清楚.我的目的是:
1.两个JPEG图片放在TIMAGE中,一前一后显示出来.(已经实现).
2.这两个JPEG图片实际是某地的地理图,一大一小.小的是简图,
大的是详细图.小的在前面.大的在后面.
3.我需要在前面的小图上让用户用鼠标选择一块区域(虚线框住).
4.根据比例,显示大图在前面.小图不可见. 未采用放大方式,是因为放大后效果不好.
但我不能实现 第 3 步 的功能,不能在TIMAGE 上画虚线框..
ether的方法是在编辑图片,谢谢指教.
对bokei的提醒表示感谢.
我想给问题加分怎么加(21+20=41).. :-)