Board logo

Subject: 关于AATEXT使用的一个难 [Print This Page]

Author: weijxin    Time: 2005-12-7 13:14     Subject: 关于AATEXT使用的一个难

请各位前辈帮帮忙,小弟当前在使有AAFONT的控件组,使用AATEXT的控件,这是个可支持多行文件的LABEL,且可以设置每一行文字的字体和大小,风格等。但当我想在程序里动态生成时,却发现以上说的那些功能都不能使用,请各位指点指点。在线等待。程序如下:
tmpaatext:=TAAText.Create(self);
   tmpaatext.Parent:=self;
   tmpaatext.Left:=10;
   tmpaatext.Top:=10;
   tmpaatext.Text.Lines.Add('新标签1');
   tmpaatext.Text.Lines.Add('新标签2');
   tmpaatext.Text.Lines.Add('新标签3');
   tmpaatext.Show;
   tmpaatext.Fonts[0].Font.size:=18;//出错,不可以使用
  请问,动态创建AATEXT控件时,怎样才能可以控制多行文本中的任行的字体的大小,颜色.
Author: zjy    Time: 2005-12-7 14:11

tmpaatext.Fonts[0].Font.size:=18;
这一句不应该这样用。因为在运行期动态创建 AAText,不会自动创建字体列表,Fonts[0] 访问不到有效的字体定义。

可以在这一句之前插入一行:
tmpaatext.Fonts.Add;

也可以改成类似这样的代码:
tmpaatext.Fonts.AddItem('Title1', '黑体', 12, clBlack, [fsBold], True, 2, 2);
Author: weijxin    Time: 2005-12-7 15:14

先谢了,
但还有一个问题。
为什么我加进去的如下:
tmpaatext:=TAAText.Create(self);
   tmpaatext.Parent:=self;
   tmpaatext.Left:=10;
   tmpaatext.Top:=10;
   tmpaatext.Text.Lines.Clear;
   tmpaatext.Fonts.AddItem('Title1', '黑体', 12, clBlack, [fsBold], True, 2, 2);
   tmpaatext.Fonts.AddItem('Title2', '黑体', 14, clBlack, [fsBold], True, 2, 2);
   tmpaatext.Fonts.AddItem('Title3', '黑体', 16, clBlack, [fsBold], True, 2, 2);

   tmpaatext.Text.Lines.Add('<titel1>新标签1');
   tmpaatext.Text.Lines.Add('<titel2>新标签2');
   tmpaatext.Text.Lines.Add('<titel3>新标签3');
   tmpaatext.Show;
为什么我的程序还是没有办法控制三个标签的大小。
Author: zjy    Time: 2005-12-7 16:58

检查一下标签名的拼写:)
Author: weijxin    Time: 2005-12-8 13:35

明白.太感谢了.




Welcome to CnPack Forum (http://bbs.cnpack.org/) Powered by Discuz! 5.0.0