Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

извлечение информаций из фонта [D7, Win2k]


nika_ufc ©   (2004-08-15 07:01:00) 

Здравствуйте. Подскажите как можно извлечь информацию из фонта ?
Я хочу узнать:
1. число символов в фонте
2. является ли этот фонт Unicode или нет
Делаю так:
procedure TCustomConvertForm.TntFormCreate(Sender: TObject);
begin
    ComboBox1.Items.Assign(Screen.Fonts);
end;

procedure TCustomConvertForm.ComboBox1Change(Sender: TObject);
var i: integer;
   TextParams : TTextMetric;
   MyFont : TFont;
begin
    MyFont := TFont.Create;
    MyFont.Name := ComboBox1.Text;
    GetTextMetrics(MyFont.Handle, TextParams);
...........
здесь должен бить код которыи распечатает 1. число символов в фонте И 2. является ли этот фонт Unicode или нет например на  ListBox.
...........
end;

вобшем я уже в панике ничего не могу уже придумать помогите пожалуйста.


TUser   (2004-08-15 10:49:00) [1]

Посмотри GetTrueTypeFont. К сожалению в sdk эта ф-ция описана крайне скудно (что для sdk вообще-то не характеро). Тут кто-то недавно с этим делом разбирался.


Наверх

Титульная страница Поиск, карта сайта Написать письмо