Страница 1 из 1

Набрался наглости. :)

Добавлено: 19 янв 2006, 18:17
Tony
Я, конечно, понимаю, что это глупо с моей стороны, но...
Впервые увидел человека, который так рубит в VB. И вот она, обещанная наглость - прошерстил все, что только смог, в инете и, откровенно говоря, удивился: на VB никто не делал и, похоже, не знает как сделать такую штуку - вытащить информацию из TTF-файла не устанавливая его. Имеется в виду "Полное название шрифта" и т. п.
А ведь на С++ это сделано - http://www.codeproject.com/gdi/fontnamefromfile.asp

Может Вас заинтересует сделать что-то подобное для VB? Для такого продвинутого программиста это, наверное, не очень долго и сложно...
Заранее прошу прощения - написал так, наудачу. Я, конечно, понимаю, что у людей и свои дела есть. :)

Добавлено: 19 янв 2006, 18:18
Atomix
Постараюсь этот вопрос проработать.

Добавлено: 19 янв 2006, 18:19
Гость
Вот, буквально сегодня увидел такую инфу:
Готовый проект "Fontinfo", который делает примерно то, что нужно. Но далеко не всегда корректно. То не показывает инфы (а она там 100% присутствует), то переполнение идет.
http://bbs.vbstreets.ru/download/file.php?id=3603 (3 кб)
Плюс док-файл к нему.
http://bbs.vbstreets.ru/download/file.php?id=3604 (83 кб)
Но с моими скромными познаниями все равно не переделать в нормальный, корректный пример.

Добавлено: 19 янв 2006, 18:19
Tony
Блин, прошу прощения за невежливость - забыл написать имя в предыдущем посте.

Добавлено: 19 янв 2006, 18:20
Atomix
Написал, пробуй, тестируй...

Добавлено: 19 янв 2006, 18:20
Tony
Просто нет слов! И главное - ничего лишнего. Пример того, как компактно, без избыточности скрипта, решаются сложные задачи.
Все те шрифты, в которых глюковал запощенный мною пример, отражаются полностью корректно.
Проверил около 50 шрифтов с проблемными инфо, которые глючат или не отображаются в плагине для ТС TTFViewer (несмотря на то, что при считывании инфо из файла он его временно устанавливает). Отразил все!
Я пытался найти ответ на этот вопрос на паре VB-форумов, но там не смогли решить его (а может те, кто мог это сделать, просто и не пытались). Можно дать там ссылку на твое решение? Или не стоит?

Большое спасибо за отзывчивость!

Добавлено: 19 янв 2006, 18:21
Tony
Вот, все-таки нашелся шрифт, инфо которого не подхватывается...
http://fast.filespace.org/Rush/font.zip

Добавлено: 19 янв 2006, 18:22
Atomix
Размещай если хочешь, мне не жалко.

Да кстати обновил пример, теперь читается и этот шрифт.
Просто у него верное имя почему то только в unicode записано а в не ascii формате

Добавлено: 20 янв 2006, 01:15
Tony
Да кстати обновил пример, теперь читается и этот шрифт.
Просто у него верное имя почему то только в unicode записано а в не ascii формате
Теперь вообще идеально! Тем более, что в своих шрифтах нашел такой, где информация есть только в юникоде. А раз есть один у меня (а вполне возможно, что и далеко не один - все-то не проверял), значит в природе их немало.
Размещай если хочешь, мне не жалко.


Спасибо. Уверен, что немало народу порадуются такому модулю (тем более, что на VB в исходниках подобных больше нет).