怎么才能让Tedit控件自适应控件大小？ ( 积分: 5 )

M

mill666

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-25

• #1

我想在程序运行的时候生成Tedit类的文本显示框，因为其字体大小是变动的，而且文本的内容也是变动的，现需要让文本框的大小能够完全显示出其内容而不需要移动光标才能看到文本后面的内容，请问应当怎么设置Tedit的widht和height？
因为width和height是以pixel为单位的，而文本的length是字符的长度，之间的关系不知道要怎么换算，所以才有这个问题。

 

M

mill666

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-25

• #2

我想在程序运行的时候生成Tedit类的文本显示框，因为其字体大小是变动的，而且文本的内容也是变动的，现需要让文本框的大小能够完全显示出其内容而不需要移动光标才能看到文本后面的内容，请问应当怎么设置Tedit的widht和height？
因为width和height是以pixel为单位的，而文本的length是字符的长度，之间的关系不知道要怎么换算，所以才有这个问题。

 

V

vpanel

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-10-10

• #3

用TCanvas的两个函数：
如
Str := '我们的祖国似花园';
Edit1.Width := Form1.Canvas.TextWidth(Str);
Edit1.Height := Form1.Canvas.TextHeight(Str);