| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Высота текста с переносами [D6, D7, Win2k, WinXP]
П7 © (2004-10-15 13:16:00)Уважаемые Мастера!
Имеется некая строка. Имеется некий компонент в котором она отображается (TMemo, TLabel и т.д.). Так вот, строка в высоту компонента без переносов не вписывается, но делая переносы нужно увеличить высоту компонента, чтобы строка была видна полностью? Как найти общую высоту текста с переносами, если известен его шрифт, размер и т.д.?
panov (2004-10-16 00:03:00) [1]А что непонятно?
var
R: TRect;
MyStr: String;
begin
...
R.Top := 10;
R.Left := 10;
R.Right := 150;
MyStr := 'Тестовая строка для проверки переносов';
DrawText(Сanvas.Handle,PChar(MyStr),Length(MyStr),R,DT_WORDBREAK+DT_CALCRECT);
После выполнения в R.Bottom будет находиться нижняя граница области, необходимой для отображения текста целиком м переносами.
П7 (2004-10-15 23:49:00) [2]вопрос остаётся в силе! Мастера, неужели никто не знает? Подскажите, пожалуйста...
П7 (2004-10-15 16:15:00) [3]DrawText - это что? Это куда пишется? Мне нужно само значение узнать... Как? ):
panov (2004-10-15 13:43:00) [4]DrawText с параметрами
DT_CALCRECT+DT_WORDBREAK
| |
