求画布一个简单图象方法,高人指导,在线等! 请教DELPHI画布一个简单‘8’字型画法!谢谢高人! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure TForm1.FormPaint(Sender: TObject);begin Canvas.Font.Size:= 300; Canvas.Font.Color:= clred; Canvas.TextOut(0,0,'8');end; 这个是图片的:procedure TForm1.FormCreate(Sender: TObject);begin image1.Align:= alclient; image1.Canvas.Font.Size:= 300; image1.Canvas.Font.Color:= clred; image1.Canvas.TextOut(0,0,'8');end; ★张家界 这个季节好玩吗???就这几天!哪里有更多的咨询? Delphi7.0+ADO+Access日期时间查询问题 XML简单问题:这样的XML如果有多个<book>,我想取第2个<BOOK>里的内容如何做?-THX 三层结构中的错误处理程序 学习Delphi程序的效率问题! ★★★★★★ 我的个人主页申请成功,散分 ★★★★★★ SHBrowseForFolder爆了 Delphi的EXE 如何把这段JAVA转换为delphi 我的另一个帐号没了,但是我不自己给分用,是以前为了提前帖子用的 dbgrid 如何显示带有子表的表 学习《delphi算法与数据结构》遇到的一个问题
begin
Canvas.Font.Size:= 300;
Canvas.Font.Color:= clred;
Canvas.TextOut(0,0,'8');
end;
begin
image1.Align:= alclient;
image1.Canvas.Font.Size:= 300;
image1.Canvas.Font.Color:= clred;
image1.Canvas.TextOut(0,0,'8');
end;