关联TControlCanvas啥意思,你用这个TControlCanvas在什么时候、什么地方画东西,贴代码看看
解决方案 »
- 我该学delphi还是学.net?
- 程序移植到另一台电脑上,出错打不开程序,该怎么办,我用的是ODBC数据连接
- StringGrid1: TAdvStringGridPRO; 这个控件如何分页显示数据?
- 请问大家,怎样修改 DBGrid 列的 Caption 属性啊!
- 初学delphi请各位大哥赐教。
- 关于控件注册
- 请问如何在显示日期型字段时只显示年~急!
- 昨天喝多了..庆幸没有吐出来..散分庆贺...
- 关于image copyRect Resize,很急在线等待!!大虾救命呀!!!
- 准有ADO的补丁?我的是DELPHI5。5 用ADO+SQLSERVER 在边接上老是有些
- 如何实现程序运行时 用户自已定义窗体和组件,并在保存后下次运行时载入?
- 如何获取tif文件的分辨率、压缩品质等??
不过提示一下,在所有绘图完成后,
最后再调用TControlCanvas.textout(1,1,richedit1.text); 把文字再画上去
‘关联TControlCanvas啥意思“var
cc:TControlCanvas;
begin
cc.Control:=RichEdit
然后用pen画图,
再然后在richEdi输入文字,结果之前画的图都变了
如果处理richedit的windowproc,在里面处理WM_PAINT消息时画的,那画完其他东西,最后把这个richedit的txet再画上去,用textout
var
cc:TControlCanvas;
begin
cc.Control:=RichEdit;
.... 画图行
cc.TextOut(1,1,RichEdit.text);// 最后画文字
你需要继承richedi,处理它的wm_pain消息,或者用上面的4#说的方法,说一千道一万,最后你进行完绘图后,最后一步把richedi上的文字从新绘制一遍
FoxMail编写邮件时可以选择背景,我想要的就是这样的效果。sololie能给指点一下吗
http://pan.baidu.com/s/1CI0dn