请问怎样可以得到字符串所占用的宽度？？

Question

我的问题并不是使用length(str)这样方式，因为这个只是字符长度，我要的是在一个edit.txt里面字符串所占用的宽度，我使用过label属性的autosize来获得长度，但当设为透明后就失效了，要刷新label才行但一刷新了就闪了呵。。请问有什么好办法?

Answer 1

在TForm1.FormCreate加上form1.DoubleBuffered:=true;
刷新了就不闪了

Answer 2

例如：
Edit2.Text := IntToStr(Canvas.TextWidth(Edit1.Text));
以象素为单位！