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

[size=-2]------ Добавлено в 22:42
что то грустно стало, в кой веки задумал что то для себя состряпать и все так дружно отккликнулись, вот не за что не поверю что у колег по конструированию таких проблем не возникало...

проблем возникало, но.. решения пока не возникло.

Я использую вот ето code_2073.txt . Ессно не то, но хоть что-то..

Спасибо Андрей конечно, но это совсем не то что нужно, мне нужно получить свойства шрифта из стандартного диалога выбора шрифтов, ищю скрипт пока...

Интересная задача. Такого компонента у нас нет, надо подумать и попытаться сделать. Думаю, что можно.

У нас и "конвертора локалей нет"

Это я только последние посты смотрю
Который, кстати говоря, может быть сделан как пара параметрических преобразований String2Wide -> Wide2String
Параметр - номер локали. Скажем первое utf8, а второе - 1251. Можно 866, можно - наоборот
Первое - ты уже сделал

Galkov, ну вот, и еще одна задача появилась
------------ Дoбавленo:

Galkov, а у тебя, случаем, констант локалей не имеется или ссылка завалящая, а то опять в инэтэ время тратить на поиски, отсеивая шелуху?

MSDN, windows.pas - других нет

Да уж, windows.pas сильный источник, константы 3-ей локали-то там нету, да и многих других, тоже. Остается шерстить MSDN.

------------ Дoбавленo:


Ну вот, я добавил свойство FontDialog в стандартный компонент Font

Странно, почему этого никто не сделал раньше

Обновление можно взять здесь:

[svn]Font.pas[/svn]

Обновилась, также, иконка по адресу: http://hiasm.googlecode.com/svn/elements/delphi/icon/ -- файл Font.ico

------------ Дoбавленo:

Забыл добавить, что в Share.pas была обнаружена небольшая бажка под FPC, в плане некоректной обработки зачерткнутого шрифта (lfStrikeOut)

nesco - СПАСИБО БОЛЬШОЕ! всё работает, очень рад , очень удобно стало шрифт выбирать!

Касательно локалей: у MSDN есть один, но неприяный недостаток - там далеко не всегда приводятся численные значения констант. Для того, чтобы узнать численные значения, надо брать соответствующий h-файл из Windows SDK. Это чюдо вести немало, потому предлагаю свою посильную помощь - могу по запросу выкладывать оттуда файлы. Для затравки - WinNls.h, где описаны константы, связанные с кодировками.