Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Теоретические вопросы _ Русский шрифт

Автор: sesa 14.05.2004 15:59

Возникли небольшие проблемы:
Стоит система-Win 2000.
1) Не отображается русские буквы в исходниках программ,скачанных из Инета.
Вместо них появляются непонятные знаки.
Даллее, если я пытаюсь набрать русский текст в программе, все равно упорно
печатается английский, даже если раскладка клавиатуры переключена на русский.
2) При использовании модуля CRT вылетает сообщение "Division by zero".
Я знаю в чем проблема-нужно исправить этот модуль.
Но не пойму как в него конкретно забраться. Он находится в файле Turbo.Tpl,
если я не ошибаюсь. Какой программой открывать этот файл?
3) При использовании модулей Graph и других появляется сообщение
"Unit not found". Адреса модулей в Directories я устанавливаю в правильные , но все равно он их не находит. При чем при каждой новой загрузке Turbo Puscal эти адреса почему-то не сохраняются.
Был бы благодарен за помощь.

Автор: BlackShadow 14.05.2004 16:41

1). Кодировка не совпадает. Есть куча прог, которые держат разные кодировки: KoEdit, Bred2, ну Lister из WindowsCommaner'а в конце концов.
2). Turbo.Tpl ничем не открывается. В I-Net'е сотни мест, где лежит он, только исправленный. А вообще там пару байт изменить надо, только я не помню где они находятся. Если не влом, то можешь открыть каким DisAssembler'ом (хоть Hiew), найти команду DIV CX (она там одна вроде) и заNOPить её, или изменить предшествующую ей MOV CX,n на MOV CX,2n.
3). Чтобы пути сохранялись, надо их сохранять. Для этого в меню Options есть пункт Save. А если ты правильно настроил пути, то остаётся только одно: нет у тебя там Graph.Tpu. Ещё один момент: я надеюсь ты не додумался в путях использовать длинные имена типа 'C:\Папка в которую я ставлю всё подряд\Папка в которую меня угораздило поставить паскаль от Борланда'?

Автор: APAL 14.05.2004 16:42

"Division by zero", "Unit not found" - взаимосвязанные проблемы.
Скачай новый TURBO.TPL и все будет в норме.

По поводу русского шрифта сначала почитай http://pascal.net.ru/forum/index.php?showtopic=779.


P.S.: К сожалению, у меня с работы закрыт доступ на narod.ru, а сам я не помню выкладывал ли я этот модуль на свой сайт или нет. Если не лениво загляни: http://www.apalprival.narod.ru в разделе "Архив".

Автор: BlackShadow 14.05.2004 17:18

APAL, я бы не был так уверен насчёт взаимосвязанности. На сколько я помню, Graph не принадлежит Turbo.Tpl, а идёт отдельно как Graph.Tpu. Так что Runtime Error 200: Division By Zero, так хорошо знакомый всем писателям-паскателям smile.gif , не имеет отношения к Graph'у и наоборот.

Автор: APAL 14.05.2004 18:30

Ладно, ладно - это уже исключения.... smile.gif А turbo.tpl поменять надо!

Автор: BlackShadow 14.05.2004 19:05

Turbo.Tpl по-любому поменять надо.
А русские шрифты (вроде бы все, что ставятся вместе с BP), можно скачать на http://pascal.sources.ru. По крайней мере, я их там видел, но вот до опробыания руки не дошли.

Автор: Altair 14.05.2004 19:53

А по моему эта тема уже раз n обсуждалась...

Автор: APAL 14.05.2004 20:14

Цитата(Oleg_Z @ 14.05.04 16:53)
А по моему эта тема уже раз n обсуждалась...

Цитата
помогая друг другу, мы справимся с любыми трудностями!

smile.gif

Автор: Altair 15.05.2004 18:16

Согласен. Но все -таки стоит занести это в FAQ.

Автор: APAL 15.05.2004 20:11

Цитата(Oleg_Z @ 15.05.04 15:16)
Но все -таки стоит занести это в FAQ.

Сделано.

Автор: P@sh@ 15.05.2004 22:22

По поводу файла turbo.tpl. Есть такая утилитка в составе Turbo/Borland Pascal, называется TPUMOVER. C помощью нее можно узнать, чего понапихано в TPL-файл (Turbo Pascal Library), достать ненужное и засунуть нужное - хоть Graph.tpu, хоть MySuperUnit.tpu.

Автор: Altair 26.05.2004 19:15

Цитата
Есть такая утилитка в составе Turbo

В составе TURBO ее нет!

Автор: BlackShadow 26.05.2004 22:35

В составе BP Она стабильно есть!

Автор: Altair 27.05.2004 10:52

Цитата
В составе BP Она стабильно есть!

Только что скачал и убедился, что действительно есть!

Автор: BlackShadow 27.05.2004 15:31

Ищите и обрящете smile.gif