发信人: wwawa()
整理人: windfire(2000-12-05 18:37:54), 站内信件
|
【 在 bigjack (树熊) 的大作中提到: 】
: 我用TCanves.Textout在Canves上输出了一行文字
: 请问如何在程序中把这行文字清除?
在Form 中加入两个button
button1用于在Form.canvas 上输出'abc'
在button1的click 中输入
canvas.font.color:=clblack;
canvas.brush.color:=color;
canvas.textout(10,10,'abc');
button2用于在form.canvas 上清除'abc'
在button2的click 中输入
canvas.font.color:=color;
canvas.textout(10,10,'abc');
这样按button1在form中显示'abc',按button2 将使'abc'消失
--
************************
欢迎光临娃娃天地
http://wwawa.yeah.net
Delphi邮件组成立欢迎订阅
※ 来源:．月光软件站 http://www.moon-soft.com．[FROM: 199.166.210.220]
|
|