Вниз
Скачать: CL | DM;

TextHeight без TCanvas   Найти похожие ветки 

← →
ZEE ©   (2003-11-04 15:09) [0]

Привет народ.
Как средствами WinApi определить высоту текстовой строки
т.е. аналог TextHeight у TCanvas

полазил в Graphics.pas - нашел там исходники этой ф-ции:

function TCanvas.TextExtent(const Text: string): TSize;
begin
RequiredState([csHandleValid, csFontValid]);
Result.cX := 0;
Result.cY := 0;
Windows.GetTextExtentPoint32(FHandle, PChar(Text), Length(Text), Result);
end;

function TCanvas.TextHeight(const Text: string): Integer;
begin
Result := TextExtent(Text).cY;
end;


и все вроде бы ОК, но непонятно что делает RequiredState, без нее не работает, а как у себя сделать что-нить подобное непонятно.

Вобщем F1 плиз


← →
ZEE ©   (2003-11-04 15:11) [1]

вот плохо что тут сообщений нельзя редактировать - нажал не ту кнопычку и теперь это не код, а подчеркнутый текст :(


← →
Игорь Шевченко ©   (2003-11-04 15:15) [2]

ZEE © (04.11.03 15:11)

В соседней ветке я привел код фцнкции для определения ширины строки, если заменить Result := TextSize.cx на Result := TextSize.cy, то получится высота.


← →
ZEE ©   (2003-11-04 15:16) [3]

> Игорь Шевченко ©
да спасибо - уже видел - все получилось
просто в FHandle надо было HDC липить, а я HWND запихивал...



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

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



Память: 0.45 MB
Время: 0.021 c
1-11976
Intro
2003-12-17 23:19
2004.01.05
SaveDialog - как сним боротся?


11-11843
SerB
2003-04-14 07:30
2004.01.05
SizeGrip???


1-11919
Magician
2003-12-21 10:07
2004.01.05
Прокрутка коипонента


1-11949
ASt
2003-12-20 00:06
2004.01.05
Параметры запуска приложения


14-12035
IronHawk
2003-12-08 18:19
2004.01.05
Глюки VB6! Как лечить?




   Наверх