Ну вот нет у TLabel такого ивента [D6, WinXP]
S_Dimon © (2002-11-11 23:34:00)
Я делаю только первые шаги в программировании на Delphi, но
мне хотелось бы сделать вот что: на форме есть Label, в него
периодически выводится некоторая информация. Причём, Label.AutoSize
:= False. Как мне отловить те моменты, когда выводимый текст не
полностью помещается в Label (обрезается)? Можно, конечно, взять
моноширинный фонт и подсчитывать число символов, но это не гибко и
не красиво... Может кто подскажет свои соображения?
Заранее благодарен!
^Sanya (2002-11-12 00:46:00) [1]
см. Tlabel->TCanvas-> TextWidth:
"Returns the width, in pixels, of a string rendered in the
current font.
function TextWidth(const Text: string): Integer;
function TextWidth(const Text: WideString): Integer;"
Наверх 
ЧАТ |
Орешник |
|
