菜鸟,实现不了的tbitmap问题(20分)

  • 主题发起人 主题发起人 crossbannyli
  • 开始时间 开始时间
C

crossbannyli

Unregistered / Unconfirmed
GUEST, unregistred user!
要在窗口画三个矩形,分别用红色,蓝色,绿色填充,再标上文字,1,2,3
怎么弄?帮忙
 
用Panel或者Label都可以,设定Top,Left,Width,Height,Color就可以了。
 
我用了TLabel,不过文字只能显示一部分,例如“扭矩曲线”只能显示“扭矩",设置了宽度还是不行
 
比如这个
form1.Canvas.Pen.Color = clwhite;
form1.Canvas.Rectangle(x1,x2,y1,y2) //画矩形的
form1.Canvas.TextOut(x1,,1) //再根据位置写上数值
 
Canvas.Brush.Color := rgb(255,0,0);//红色rgb(255,0,0),绿色rgb(0,255,0);兰色rgb(0,0,255),
Canvas.Rectangle(10,10,60,60);
canvas.TextOut(35,35,'红色');
 
textout()不行
我要三中颜色都输出
brush.color或pen.color存在时,编译不过;另外,当repaint时,color控制不了
还是用creation-zy兄的方法,加panel
郁闷啊
 
//我用了TLabel,不过文字只能显示一部分,例如“扭矩曲线”只能显示“扭矩",设置了宽度还是不行
你把字体设置设成宋体9号
 
hygsxy的方法是可行的啊
写在Form.Onpaint方法中
 
很多人已经回答了!我就不说了,是通过CANVAS来画出来的
 
多人接受答案了。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
I
回复
0
查看
614
import
I
I
回复
0
查看
613
import
I
I
回复
0
查看
712
import
I
后退
顶部