Размер символа

← →
Anh (2002-06-12 19:28) [0]

Помогите!!!
Нужно узнать размер симввола, т.е. прямоуголтника в который вписывается данный символ!

И еще где найти сырцы векторного редактора? любого, но не используя никаких допомпонент.
Помогите!!!

← →
MBo (2002-06-12 19:30) [1]

Canvas.TextWidth, TextHeight

← →
ZiX (2002-06-12 20:27) [2]

Это не то...
Эот что то вродеесли бы я написал символ на Лабели
и знал ее ширину и высоту... А там высота учитывает и межстрочый интервал... и тд

← →
Song (2002-06-12 22:45) [3]

Посмотрите GetSystemMetrics. Я не помню, может там есть...

← →
MBo (2002-06-13 07:09) [4]

пример

procedure TForm1.Button3Click(Sender: TObject);
var
h:hDC;
TTM:TTextMetric;
savefont:hfont;
begin
h:=GetWindowDC(memo1.handle);
SaveFont := SelectObject(h, Font.Handle);
GetTextMetrics(h, ttm);
SelectObject(h, SaveFont);
label2.caption:=inttostr(ttm.tmHeight);
DeleteDC(h);
end;

← →
KaPaT (2002-06-13 19:00) [5]

>ZiX
а я думаю MBO прав! а если вписать один символ? никтож не просит всю строку вычислять....

← →
ZiX (2002-06-14 19:01) [6]

Я читал МСДН!!! Эти ф-ии возвращают не совсем то...
Т.е. все эти ф-ии возвращают высоту не только символа но межстрочного интервала.... Ну объястять это долго. Легче прочитать.. Но я уже сделал... Правда извращенным способом но все пашет :-))

Размер символа Найти похожие ветки