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

Вниз

извлечение информаций из фонта   Найти похожие ветки 

 
nika_ufc ©   (2004-08-15 07:01) [0]

Здравствуйте. Подскажите как можно извлечь информацию из фонта ?
Я хочу узнать:
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) [1]

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



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

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

Наверх




Память: 0.46 MB
Время: 0.026 c
3-1093791919
ghrup
2004-08-29 19:05
2004.09.26
Как сделать, чтобы TTable позволял редактировать запись, но не по


1-1095069887
ORMADA
2004-09-13 14:04
2004.09.26
BPL


3-1093863664
Aleksandr.
2004-08-30 15:01
2004.09.26
Можно ли как-то в RT бороться с Directory is busy?


14-1094394558
Voland
2004-09-05 18:29
2004.09.26
Народ а как из битмапа иконку сделать?


14-1094193758
Ренат
2004-09-03 10:42
2004.09.26
Сообщения в SIM