Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.11.26;
Скачать: CL | DM;

Вниз

Узнать длину форматированого текста   Найти похожие ветки 

 
Krants   (2006-10-11 18:34) [0]

Как можно узнать длину строки(и.в. в пикселях) зная ее формат(шрифт, высота, и.т.д.)?


 
DrPass ©   (2006-10-11 18:43) [1]

GetTextExtentPoint32 для WinAPI. И соотв. метод у TCanvas


 
Krants   (2006-10-11 19:00) [2]

сенкс


 
Anatoly Podgoretsky ©   (2006-10-12 00:38) [3]

TextWidth


 
Krants   (2006-10-12 10:48) [4]

вот нашел примерчик примерчик:
var
 memDC : HDC;
 size : TSize;
 oldFont : HFONT;

 memDC := CreateCompatibleDC (0);
 oldFont := SelectObject (memDC, font.Handle);
 GetTextExtentPoint32 (memDC, PChar (st), Length (st), size);

а как с применением данных функций можно задать определенный шрифт, к примеру "Arial"?


 
DrPass ©   (2006-10-12 10:56) [5]

В данном примерчике устанавливаются параметры текущего шрифта формы (font.Handle). Какой шрифт в свойстве Font укажешь, тот и будет.


 
Krants   (2006-10-12 11:05) [6]

Понятно, но в моем случае я не испльзую никаких компонентов включающих данное свойство.
Что-бы было понятно, мне нужно это значение для указания ширины столбца таблицы в Word`е!


 
DrPass ©   (2006-10-12 12:19) [7]

Тебе нужно создать шрифт, настроить его параметры и подставить его дескриптор в SelectObject.
Либо CreateFont/CreateFontIndirect (для любителей WinAPI), либо (ИМХО, проще и удобнее) с помощью VCL:
var font: TFont;
font:= TFont.Create;


 
Desdechado ©   (2006-10-12 13:20) [8]

DrawText c параметром CALC_RECT



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

Текущий архив: 2006.11.26;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.028 c
6-1152182640
KLAUS
2006-07-06 14:44
2006.11.26
Ошибка в Webbrowser1


6-1150190015
Tempora
2006-06-13 13:13
2006.11.26
Проблема с Indy. Помогите найти ошибку.


2-1163170682
³²³
2006-11-10 17:58
2006.11.26
TTimer


2-1162978186
Megabyte
2006-11-08 12:29
2006.11.26
Как программно задавать/изменять системные переменные...


15-1163079933
help_me)
2006-11-09 16:45
2006.11.26
Microsoft SQL server 2000