перенос кода, Internal error 200309141 |
перенос кода, Internal error 200309141 |
compiler |
13.05.2007 19:53
Сообщение
#1
|
Человек Группа: Пользователи Сообщений: 1 050 Пол: Мужской Реальное имя: Станислав Репутация: 3 |
Добрый день!
незнаю правильно ли я выбрал раздел, но проблема такая есть код на TP демонстрирующий работу модуля Crt, хотелось бы перенисти код на FP, да возникает проблемма Internal error 200309141 как от нее избавиться? Заранее благодарен. Прикрепленные файлы 09.pas ( 644 байт ) Кол-во скачиваний: 189 -------------------- Спасибо!
Удачи! |
volvo |
13.05.2007 19:59
Сообщение
#2
|
Гость |
Название программы поменяй - FPC не разрешает такого... Например, на TheWindows ...
|
compiler |
13.05.2007 20:17
Сообщение
#3
|
Человек Группа: Пользователи Сообщений: 1 050 Пол: Мужской Реальное имя: Станислав Репутация: 3 |
Название программы поменяй - FPC не разрешает такого... Например, на TheWindows ... спасибо..ну она стала по другому работать, раньше создавались новые <<окошки>>, а не строки.. -------------------- Спасибо!
Удачи! |
volvo |
13.05.2007 21:10
Сообщение
#4
|
Гость |
Ну да... Вообще-то в реализации Crt под FPC есть глюк: при использовании Write когда печать доходит до края текущего окна, очередные символы выходят за его границы (если это окно) или просто ВСЕ оставшиеся символы печатаются в одной позиции (если это граница экрана), в то время, как в Turbo Pascal очередной символ переносится на новую строку.
Именно это, насколько я понимаю здесь и происходит. |
compiler |
14.05.2007 17:04
Сообщение
#5
|
Человек Группа: Пользователи Сообщений: 1 050 Пол: Мужской Реальное имя: Станислав Репутация: 3 |
Именно это, насколько я понимаю здесь и происходит. еще не создаются новые окна...-------------------- Спасибо!
Удачи! |
volvo |
14.05.2007 17:56
Сообщение
#6
|
Гость |
Окна создаются, у тебя в программе просто опечатка, которая мешает нормальной работе:
Цитата X1 := Random(40)+1; А чтобы убедиться, что окна создаются - попробуй сделать (после того, как исправишь опечатку, разумеется): Window(X1, Y1, X2, Y2); |
compiler |
16.05.2007 17:17
Сообщение
#7
|
Человек Группа: Пользователи Сообщений: 1 050 Пол: Мужской Реальное имя: Станислав Репутация: 3 |
вроде разобрался... спасибо...
-------------------- Спасибо!
Удачи! |
Текстовая версия | 5.05.2024 2:53 |