Ну вот нет у TLabel такого ивента

← →
S_Dimon (2002-11-11 23:34) [0]

Я делаю только первые шаги в программировании на Delphi, но мне хотелось бы сделать вот что: на форме есть Label, в него периодически выводится некоторая информация. Причём, Label.AutoSize := False. Как мне отловить те моменты, когда выводимый текст не полностью помещается в Label (обрезается)? Можно, конечно, взять моноширинный фонт и подсчитывать число символов, но это не гибко и не красиво... Может кто подскажет свои соображения?
Заранее благодарен!

← →
^Sanya (2002-11-12 00:46) [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;"

Ну вот нет у TLabel такого ивента Найти похожие ветки