社区
Delphi
帖子详情
大家看看这三句代码为什么会出现这样的情况
Linux2001
2002-01-23 09:00:10
Label1.Canvas.TextOut(0,0,'Linux2001');
Label1.Font.Color:=RGB(255,0,0);
Label1.Canvas.TextOut(1,1,'Linux2001');
为什么我要单击两次,Label控件上才会显出字呢
...全文
147
14
打赏
收藏
大家看看这三句代码为什么会出现这样的情况
Label1.Canvas.TextOut(0,0,'Linux2001'); Label1.Font.Color:=RGB(255,0,0); Label1.Canvas.TextOut(1,1,'Linux2001'); 为什么我要单击两次,Label控件上才会显出字呢
复制链接
扫一扫
分享
转发到动态
举报
AI
作业
写回复
配置赞助广告
用AI写文章
14 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
childbaby
2002-01-23
打赏
举报
回复
保证你绝对可以
Label1.canvas.Font.Color:=RGB(255,0,0);
Label1.Canvas.TextOut(0,0,'Linux2001');
ihihonline
2002-01-23
打赏
举报
回复
TO : Linux2001(准备升级中...)
不需要那么复杂
1:
label1.Caption :='Linux2001';
Label1.canvas.Font.Color:=RGB(255,0,0);
Label1.Canvas.TextOut(2,2,'Linux2001');
2:
Label3.Canvas.TextOut(0,0,'Linux2001');
Label3.canvas.Font.Color:=RGB(255,0,0);
Label3.Canvas.TextOut(2,2,'Linux2001');
bigysw
2002-01-23
打赏
举报
回复
将 Label1.canvas.Font.Color:=RGB(255,0,0);
这句话提前初始化就行了。
然后像zswang(伴水)(需要充充电) 说的那样做!
juqiang
2002-01-23
打赏
举报
回复
using Repaint()
iBear
2002-01-23
打赏
举报
回复
在你进行canvas的操作后,最好刷新一下,结果才会显示出来
王集鹄
2002-01-23
打赏
举报
回复
//建议用两个TLabel
//否则你还要注意写重绘事件
//Label2在Label1下方
begin
Label1.Transparent := True;
Label2.Caption := Label1.Caption;
Label2.Font.Color := clRed;
Label2.Left := Label1.Left + 1;
Label2.Top := Label1.Top + 1;
end;
liuchang_wh
2002-01-23
打赏
举报
回复
同意楼上
sailerbai
2002-01-23
打赏
举报
回复
应该update或refresh一次
china_lyz
2002-01-23
打赏
举报
回复
Label1.Canvas.TextOut(0,0,'Linux2001');
Label1.canvas.Font.Color:=RGB(255,0,0);
Label1.Canvas.TextOut(1,1,'Linux2001');
halfdream
2002-01-23
打赏
举报
回复
其中
Label1.Font.Color:=RGB(255,0,0);
改成
Label1.Canvas.Font.Color:=RGB(255,0,0);
Linux2001
2002-01-23
打赏
举报
回复
代码已经全部贴上来了,我要的是打印出两种颜色的字,就是阴影字,前面一种颜色,后面一种颜色
greenspan
2002-01-23
打赏
举报
回复
我把Label1.Font.Color:=clRed;放在
TForm1.FormCreate(Sender: TObject);
begin
Label1.Font.Color:=clRed;
end;
就行了,我也不知道为什么?
panch
2002-01-23
打赏
举报
回复
你不如这样:
Label1.Canvas.Text="Linux2001";
kylincn
2002-01-23
打赏
举报
回复
把代码贴全看看!
如何判断计算机硬盘坏,电脑硬盘坏了
会
出现
什么
情况
?怎么判断电脑是不是硬盘坏了...
一般,硬盘坏了
会
出现
5种
情况
,大家可以根据这5种
情况
判断是不是电脑硬盘损坏。第一种
情况
,系统显示蓝屏,蓝屏上
会
显示三种
代码
,分别代表着三种不同的损坏,比如说磁头损坏,扇区损坏等。根据
出现
的不同
代码
,可以...
Python
代码
为什么有下划波浪线?Python
代码
在Pycharm中
出现
波浪线的解决方法
方法一、找到
出现
波浪线的地方,将鼠标光标移到
代码
的波浪线上面,此时在页面中
会
出现
提示,我们点击“ReFormat the File”的提示的话,Pycharm
会
自动的将我们编写的
代码
变成规范操作,看到提示的旁边,也
会
有一个...
如何看懂源
代码
--(分析源
代码
方法)
网路上有一篇关于分析看
代码
的方法,做为程序设计师的您,不妨参考
看看
,换个角度来分析。也能更有效率的解读你想要的
代码
片段。六个章节:( 1 )读懂
代码
,使心法皆为我所用。( 2 )摸清架构,便可轻松掌握全貌。...
80004005错误
代码
_电脑
出现
错误
代码
0x80004005的解决方法
通常
情况
下,我们在使用电脑的过程中,部分用户
会
遇见这样一种
情况
,如果电脑没有正确注册某些动态链接库文件,或者计算机和Internet之间存在不允许的HTTPS连接的防火墙,电脑系统就可能
会
出现
0x80004005错误
代码
,...
计算机蓝屏
代码
c2,Win7系统
出现
0x000000c2蓝屏故障的解决方法
当我们的电脑
出现
蓝屏的时候,就
会
显示一系列的蓝屏
代码
,供大家去分析
看看
是哪里出的问题。最近,Win7系统用户的电脑遇到蓝屏,提示错误
代码
:0x000000c2,要如何解决这个问题呢?下面小编就给大家介绍一下Win7蓝屏...
Delphi
5,927
社区成员
262,932
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章