![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
как get fontname из не установленного шрифта
hero © (2006-07-31 12:15:00)я хочу следать смотрелку шрифтов простую, мне понятную, все что находил в инете меня не устраивает, чтобы быстро можно было понять есть в шрифте русский или нет.
Вобчем допустим у меня есть CD с шрифтами и мне нужно посматреть
Делаю так
addfontresource('E:\CoolFont.ttf');
Объект.font.name:= ?;
removefontresource('E:\CoolFont.ttf');
так вот как узнать какое название шрифта ведь название шрифта и имя файла могуть быть разными
Помогите пожалуйста
hero (2006-08-01 11:50:00) [1]Отдельное спасибо easy и Rouse_
hero (2006-08-01 04:13:00) [2]Спасибо всем
DprYg (2006-07-31 20:17:00) [3]Вот например загрузка списка шрифтов, доступных на данном компьютере, в ComboBox1 и применение данного шрифта в RichEdit1
ComboBox1.Items := Screen.Fonts;
ComboBox1.ItemIndex := ComboBox1.Items.IndexOf(RichEdit1.DefAttributes.Name);
Установка шрифта в RichEdit1 в зависимости от выбора в ComboBox1
RichEdit1.SelAttributes.Name := ComboBox1.Items[ComboBox1.ItemIndex];
vidiv (2006-07-31 17:12:00) [4]AddFontResource, потом нажимай кнопочку Group и смотри функции для работы со шрифтами =)
easy (2006-07-31 15:22:00) [5]uses yandex;
http://www.megalib.com/books/923/837.htm
hero (2006-07-31 14:37:00) [6]Undeclared identifier: 'GetFontResourceInfo'
в хелпе тоже нет
uses ?
Rouse_ (2006-07-31 14:24:00) [7]GetFontResourceInfo