На главную Наши проекты:
Журнал   ·   Discuz!ML   ·   Wiki   ·   DRKB   ·   Помощь проекту
ПРАВИЛА FAQ Помощь Участники Календарь Избранное RSS
msm.ru
В этом разделе можно создавать темы, которые относятся к поколению 32-битных компиляторов.
Здесь решаются вопросы портирования кода из старого доброго Турбо Паскаля в FPC, TMT, VP, GPC компиляторы, а также особенностей программирования на них для Windows/Linux и других ОС.
Указывайте тип компилятора, его версию, а также платформу (Windows/Linux/..) компиляции, другими словами, Target.
Модераторы: volvo877
  
> Подключение chr-шрифтов в fpc 2
    1. Не подключаются. Лежат в той же папке, что и программа. Хотя просмотрев исходники Graph'а, увидел, что поддержка chr-шрифтов есть.
    2. Не совсем понятно, как пользоваться bin2obj
    bin2obj.exe GOTH.CHR GOTH.obj GothicFontProc
    не отрабатывает
      Цитата Оззя @
      2. Не совсем понятно, как пользоваться bin2obj
      bin2obj.exe GOTH.CHR GOTH.obj GothicFontProc
      не отрабатывает

      :no: У bin2obj другой формат вызова... По-моему, так:
      ExpandedWrap disabled
        bin2obj -ogoth.pp -c GothicFontProc goth.chr
      Получаешь pp-файл, который можешь при-Include-ить к программе... А вот что с этим дальше делать :wacko:
        Да, pp-файлик получился. Смысла то в нем нет?
        Если п. № 1 не отрабатывает -
        Цитата
        1. Не подключаются. Лежат в той же папке, что и программа. Хотя просмотрев исходники Graph'а, увидел, что поддержка chr-шрифтов есть.
          Вот что у меня получилось под виндой.
          см. аттач.
          Прикреплённый файлПрикреплённый файлfont_ex.zip (70.55 Кбайт, скачиваний: 151)
            e-moe
            Ага, спасибо!
            До меня ночью тоже дошло!
            :whistle:
              Не работает, если {$apptype GUI}, только в режиме console

              Добавлено
              ExpandedWrap disabled
                {$apptype GUI}
                Uses
                  Windows,WinCrt,Graph;

              Ошибка 103
                Можешь пример показать?
                  Цитата Romtek @
                  Можешь пример показать?

                  Пример от e-moe.
                  Изменен только заголовок
                  ExpandedWrap disabled
                    {$ifdef Win32}
                     {$apptype GUI}
                    {$endif}
                    Uses
                     {$ifdef Win32}
                      Windows,
                      WinCrt,
                     {$else}
                      Crt,
                     {$endif}
                     Graph;
                  0 пользователей читают эту тему (0 гостей и 0 скрытых пользователей)
                  0 пользователей:


                  Рейтинг@Mail.ru
                  [ Script execution time: 0,0251 ]   [ 16 queries used ]   [ Generated: 5.12.22, 08:42 GMT ]