Сейчас делаю так:

Шрифт при запуске проги копируется, тестер его видит в системной папке шрифтов, но после закрытия приложения шрифт из Fonts исчезает... Я понимаю, если бы я вместо FileCopyприменил бы ExtractFile- это еще было бы объяснимо... Есть идеи?

HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Fonts

В системе Windows 95 шрифты для подстановки определяются не в Реестре, а в файле win.ini

Начиная с платформы Windows NT эта ветка выглядит так:

HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Fonts

А система у тестера: Win XP. Поэтому пока не заморачивался определением операционной системы. Но реализовать разные записи в реестр при разной системе не сложно.

Добавлено (28 Январь 2010, 03:27)
---------------------------------------------
Перерыл весь интернет, не встретил похожую проблему с установкой шрифта, чтобы он после копирования сам исчезал из директории... Установка шрифта должна ограничиваться копированием в системную папку шрифтов и прописыванием в реестр.

Может быть это сама NB убирает файл шрифта после закрытия приложения? Прибирается, так сказать. Может быть NB особо щепетильна в отношении системных папок вообще? Чтобы всякие вирусы не писали с ее помощью, например.
Есть информация на этот счет?

В общем, на моем компе вообще другая картина. Т.е. шрифт даже в папку шрифтов не может программно скопироваться . Вообще там не появляется. А появляется сообщение "Аccess denied!".

Наверное это от дополнительных настроек безопасности системы зависит.
А после нажатия ОК в реестр данные заносятся без проблем. В реестр значить пускають, а к шрифтам ни ногоЙ!

Т.е. видимо вся сложность именно в том, чтобы программно разрешить проекту доступ к системной папке. Наверное это как-то и делают с помощью API?
Инсталляторы также работают?

Если кому интересно - исходник в прикреплении (весь код на одной кнопке), плюс там же один испанский шрифт AntoniousJ Jencom (TrueType). Он используется исходником. Может кому заодно и понадобится, например, справку читать по плагину Эсперальты .
Код тот же самый, что я привел выше, только шрифт испанский указан.

Добавлено (28 Январь 2010, 07:03)
---------------------------------------------
Да, может стоит предупредить. Что запись в реестр будет верна для систем выше Windows 98.
Интересно, кто-то пользуется Win 9x?

Добавлено (28 Январь 2010, 07:20)
---------------------------------------------
Нет, все верно! Появляется! Точнее в папке Fonts шрифт КАК БЫ появляется, но на самом деле его там нет.
Т.е. благодаря записи в реестре в системной папке появляется запись имени шрифта, но если по этому имени щелкнуть правой кнопкой мыши и выбрать "свойства", то виндовс выдаст ошибку, что такой файл шрифта не найден (и покажет имя файла, а не имя шрифта).

Ну, хоть это узнал, что на самом деле файл даже и не появляется в папке Fonts.

В общем задача сейчас прояснилась - как скопировать файл шрифта в папку шрифтов виндовс.

Добавлено (28 Январь 2010, 07:35)
---------------------------------------------
А после закрытия приложения запись об имени шрифта из системной папки исчезает.
Но, что любопытно, теперь исчезает и запись в реестре, вслед за ней. Видимо так и было с самого начала, но я не заметил.

И запись в реестре все-таки (без реального шрифта в системной папке) не задерживается.

Попробовал вручную снять у папки Fonts атрибут "только чтение", но ни фига, он опять сам появился.

Добавлено (28 Январь 2010, 21:05)
---------------------------------------------
попробовал пару способов, чето не могу заставить шрифт заработать...

В общем, упорство в этот раз вознаградилось!

Проблема с установкой шрифта решена!
Мне удалось найти (собственно, они и не прятались) ДВА работающих способа контроля шрифта в проекте (ну, не считая стандартных для NB). Попробую подытожить основное нарытое по данной теме, так, чтобы народу полезнее было, в случае подобных трудностей. Поэтому опишу подробно.

КАК ПРОГРАММНО УСТАНОВИТЬ НУЖНЫЙ ПРОЕКТУ ШРИФТ В СИСТЕМУ ПОЛЬЗОВАТЕЛЯ

Если текст в Вашей программе отображается неправильно, не тем шрифтом (например, у пользователя шрифт "разбегается", изменен характер его начертания, жирность и пр.), или если Ваша программа использует не системный шрифт и Вы опасаетесь того, что Windows подставит совсем не подходящий шрифт, то решить эту проблему можно.

Основное решение – стандартное, в настройках проекта NB (во время компиляции проекта) проставить галочку "все шрифты…" или галочку "только эти…" (и выбрать свои используемые нестандартные шрифты).

Однако может случиться так, как случилось у меня – почему-то NB не смогла дать системе пользователя знать, что использовать нужно тот шрифт, который я прикрепил к проекту (Calibri True Type), либо она этот шрифт к проекту не прикрепила, в общем, что-то пошло не так... Выход в этом случае – установить нужный шрифт программно, наверняка.

Для этого мы делаем две основных вещи:
1) Проверяем наличие нужных шрифтов на наличие в системе (во время запуска нашего проекта). Если их нет, то копируем туда свои из "багажа" дистрибутива нашего проекта (соответственно нужный шрифт мы в "багаж" заранее складываем, при компиляции).
2) Прописываем скопированные шрифты в реестр системы пользователя (тем самым регистрируем шрифты, чтобы они отображались в программах, обнаруживались системой и любыми программами).

Пишем код

Покажу на примере своего проекта, шрифт "Калибри" имеет 4 начертания, каждому соответствует свой файл шрифта, поэтому и в "багаж" мы сложим все 4 файла, после установки программы они окажутся в той же папке, где и исполняемый файл нашего проекта. Можно, конечно, добавить в код проверку на корректность установки шрифта, но наверное это уже лишнее. Надо все-таки доверять NB :).

Просто скопировать файл шрифта в системную папку C:\Windows\Fonts стандартными командами FileCopy или ExtractFile (или FileToVar / FileWrite через буфер обмена, с помощью глобальной переменной [Clipboard]) не получится, поскольку данная системная папка защищена - шрифт исчезнет сразу после закрытия Вашего приложения и программа просто не успеет им насладиться. Кроме того, новый шрифт становится доступным для программ только после перезагрузки системы, в противном случае проги его просто не увидят, даже если Вы шрифт скопировали и прописали в реестре.

Однако, скопировать в системную папку можно нестандартными командами. В частности это таки оказалось возможно, но с помощью команды npCopiarArchivos плагина NeoDouble Давида Эсперальты. В ниже приведенном коде не учтена проверка версии Windows, но проверить, определить платформу Windows (95, 98, ME, NT, 2000, XP) можно посредством глобальной переменной [WindowsPlatform] или командой npVersionWindows плагина NeoDouble.[/b]

После копирования с помощью этого плагина шрифт остаётся в системной папке и после закрытия приложения, а после перезагрузки компьютера становится виден всем программам (проверял на Word). Видимо копирование тут реализовано как-то иначе, "под столом", что-ли… :).

Второй способ контроля (установки) шрифта значительно проще.
Шрифт никуда можно не копировать, можно оставить в папке проекта (в моем примере так и есть), а в реестре прописать абсолютный путь для него. Тогда, программы, обновляющие список шрифтов при запуске, обнаружат что шрифт с таким-то названием находится там-то.

В соответствующей ветке реестра "параметр" – это имя шрифта, а значение – это путь до него. Если вместо абсолютного пути к файлу в значении указано просто имя файла (не путать с именем шрифта!), то подразумевается, что шрифт находится в системной папке Fonts. Именно там его программа и будет искать. А если указан абсолютный путь, то будет искать именно по этому абсолютному пути.

Пример кода:
(дает пользователю выбор – каким из двух способов устанавливать шрифт)

Но Вы можете и определить место для копирования своего шрифта произвольно.Главное, в реестре потом не забыть указать где программам этот самый шрифт искать. Если копировать, то, по всей видимости, логичнее копировать через команду FileCopy (когда файлы идут "багажом") и командой ExtractFile (если файлы были вложенными в проект). Второй вариант не совсем удобен тем, что увеличивает вес самого исполняемого файла, а не только дистрибутива. Но всё зависит от целей. Если нужен просто экзешник, без установочной программы и файлы должны работать только вместе с проектом, то этот вариант подойдет больше первого.

Внести изменения в реестр пользователя можно и другим способом.
Этот способ может понадобиться, в случае, если программа уже установлена и Вам срочно нужно помочь исправить ситуацию без переустановки программы пользователем.
Для этого нам нужно сначала сделать файл .reg, а затем запустить его на компьютере пользователя (например, отправив рег-файл архивом ему на почту).
Чтобы создать такой reg-файл, заходим в редактор реестра (клавиши Win+R, команда regedit), находим нужный ключ и раздел реестра (для Windows выше 98-й):

Делаем экспорт данных с раздела Fonts в реестре (для этого нажимаем по ней правой кнопкой мыши и выбираем "экспорт", выбираем место сохранения, задаем имя файлу, например, Calibri.reg и жмем ОК). Можно и вручную набрать нужное содержание этого рег-файла, но экспортом и быстрее, и мало шансов ошибиться, а ведь ошибка в одной букве может заставить Ваш компьютер удалить все программы, а затем взорваться… Шучу. Но таки, как известно, ошибаться в реестре не нужно все равно, поэтому вместо того, чтобы списывать путь в реестре - всегда копируйте его).
Далее открываем получившийся рег-файл через любой Блокнот и удаляем все лишние строки, оставив только саму шапку рег-файла, имя ключа и четыре (в моем случае) строки нужных нам параметров с их значениями. В блокноте результат в моем случае выглядит так:

Для установки в системную папку

Для регистрации шрифта в любой папке, например в папке проекта:

Теперь Вы можете, там где это нужно, запустить рег-файл вручную, программно или отправить его пользователю и попросить его запустить просто дважды щелкнув по нему и согласившись с изменениями (потому, что появится окно выбора).

Если нужно сэкономить на размере дистрибутива.
Если для Вас критичен размер проекта, а нужный файл(ы) шрифтов весит довольно много (к примеру, 4 файла Calibri весят 1,36 Мб, а это весьма заметно и для кого-то может быть критичным), то вместо того, чтобы инсталлировать шрифт можно просто управлять подстановкой шрифтов. Вы просто создаете правило, на случай, если нужного шрифта в системе нет, тогда она будет пользоваться тем шрифтом, который Вы ей определите сами (не отдавая этот выбор на волю лихого случая в геймерской машине… …). Для этого "химичим" точно также, но уже в этой ветке реестра:

Программно (или рег-файлом) создаем нужные параметры со значениями, где (в данном ключе реестра - FontSubstitutes) параметр – это шрифт по умолчанию, а значение – это тот шрифт, который должен использоваться для подстановки. Например, раскрыв в редакторе реестра раздел FontSubstitutes, вы заметите, что шрифт Arial Cyr образуется из шрифта Arial с использованием таблицы преобразования 204.

Рег-файл (с именем: "вашеимя.reg") в этом случае выглядел бы так:

А команда записи в реестр командой NB выглядела бы так:

В более щепетильных случаях (и, пожалуй, так будет правильнее) можно организовать сначала проверку на наличие того параметра значение которого вы собираетесь создать (или поменять, ежели оно есть). А вдруг это правило смертельно необходимо какой-то проге пользователя? Для этого логично использовать команду чтения значения реестра. И если таковой параметр уже есть (например, для этого шрифта уже правило создано) и Вы его менять не собираетесь, то можно предусмотреть для этого случая выбор другого правила. И так хоть до посинения, пока имя параметра или хотя бы его значение не окажется свободным.

ПРИМЕЧАНИЯ:

В системе Windows 98 нужные разделы реестра будут называться чуть иначе (без NT):

В системе Windows 95 шрифты для подстановки определяются не в Реестре, а в файле win.ini (раздел FontSubstitutes), что, в принципе, тоже самое.

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

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

Дополнительно о роли разных ключей реестра можно узнать тут (на примере Windows XP):
http://bit-bait.ucoz.ru/Reestr/reestr/right.htm

Если в папке "Шрифты" в панели управления отсутствуют в меню специфичные для неё пункты (например, "Установить новый шрифт"), то причина может быть одной из перечисленных:

* атрибут "Системный" не установлен на каталог FONTS;
* файл FONTEXT.DLL отсутствует или повреждён;
* файл DESKTOP.INI в каталоге WINDOWS\FONTS отсутствует или повреждён.

Для восстановления системного атрибута на каталоге FONTS перейдите в сеанс MS-DOS, в каталоге WINDOWS выполните команду ATTRIB FONTS +S и перезагрузите компьютер.

Для восстановления файлов FONTEXT.DLL и DESKTOP.INI их необходимо извлечь из инсталляционного комплекта с помощью программы EXTRACT.
Кстати, DESKTOP.INI – весьма интересный инструмент! С его помощью можно управлять всеми файлами в папке как определенным типом файлов и делать разные другие вещи.

hpwDllCall v1.03 - плагин обеспечивающий вызов DLL для NeoBook. Возможно, его применение позволило бы средствами самой NB (без плагинов) установить шрифт в системную директорию. Но это лишь гипотеза. Сам плагин, если кому нужно, лежит здесь:
http://www.neosoftware.com/neobook....&lid=13

Добавлено (29 Январь 2010, 11:18)
---------------------------------------------
так я не понял, ты решил проблему с установкой шрифта?

Сейчас я доработал код, но по прежнему все 4 начертания устанавливаются по очереди и фиксируется факт этой установки, а пользователь может выбрать каким способом устанавливать шрифты - с копированием в системную папку или нет. Разница для него лишь в том, что при деинсталляции моей программы исчезнут и шрифты (если они находились в папке программы и были просто прописаны в реестре, а не скопированы в системную папку шрифтов). Т.е. оба варианта решения рабочие и позволяют любым программам на компьютере использовать установленный шрифт. В тексте я рассмотрел еще третье решение - через создание правила подстановки похожих шрифтов, но не проверял на практике, ибо это какая-то половинчатая мера (ну, кроме случаев особенного желания сэкономить на весе дистрибутива).

Успокаивает то, что можно контролировать шрифты жестко, без фокусов и сюрпризов.

Добавлено (29 Январь 2010, 13:04)
---------------------------------------------
Однако! У другого тестера, у моего брательника, эта проблема тоже была, и тоже решена. НО! Есть другая фишка, тоже касается шрифтов - на кнопках в проекте не отображаются надписи! Вообще. Девственно чистые плашечки, а не кнопки. Работают, что надо делают, но надписей на них нет.

Кто-нибудь сталкивался с таким???

Не успел с одним разобраться, как новый фокус...

Как будто в "свойствах экрана\оформление\дополнительно" элемент "Рельефные объекты" выставлен с белым шрифтом, но там выставлен черный, я проверил. Давал инструкции, дистанционно.

Добавлено (30 Январь 2010, 05:13)
---------------------------------------------
Обсуждение проблемы отображения надписей на кнопках перенес в новую тему, поскольку тема эта не про шрифт, а, скорее, про объекты вообще (поскольку у тестера не отобразился еще и один чек-бокс, на что я не сразу обратил внимание). И, кроме того, шрифт на кнопках все равно должен быть системным, если я правильно понимаю.