Скачать: CL | DM;

Ну вот нет у 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;"

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.44 MB
Время: 0.012 c