Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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

Anh © (2002-06-12 19:28:00)
Помогите!!!
Нужно узнать размер симввола, т.е. прямоуголтника в который вписывается данный символ!

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

ZiX (2002-06-14 19:01:00) [1]
Я читал МСДН!!! Эти ф-ии возвращают не совсем то...
Т.е. все эти ф-ии возвращают высоту не только символа но межстрочного интервала.... Ну объястять это долго. Легче прочитать.. Но я уже сделал... Правда извращенным способом но все пашет :-))

KaPaT (2002-06-13 19:00:00) [2]
>ZiX
а я думаю MBO прав! а если вписать один символ? никтож не просит всю строку вычислять....

MBo (2002-06-13 07:09:00) [3]
пример

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;

Song (2002-06-12 22:45:00) [4]
Посмотрите GetSystemMetrics. Я не помню, может там есть...

ZiX (2002-06-12 20:27:00) [5]
Это не то...
Эот что то вродеесли бы я написал символ на Лабели
и знал ее ширину и высоту... А там высота учитывает и межстрочый интервал... и тд

MBo (2002-06-12 19:30:00) [6]
Canvas.TextWidth, TextHeight

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »