![]() |
![]() ![]() |
![]() |
Orlangur |
![]()
Сообщение
#1
|
![]() Новичок ![]() Группа: Пользователи Сообщений: 27 Пол: Мужской Реальное имя: Александр Репутация: ![]() ![]() ![]() |
Появилась такая проблема:
В Паскале перестал пахать графический режим. Опишу подробнее: Возьмем наипростейший пример: Program lines; Компилируется эта прога нормально, а когда запускаешь выдаёт ошибку: "BGI Error: Graphics not initialized (use InitGraph)". Использую я Free Pascal. Пробовал на Turbo Pascal - аналогичная ситуация. Как быть? |
Altair |
![]()
Сообщение
#2
|
![]() Ищущий истину ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 4 824 Пол: Мужской Реальное имя: Олег Репутация: ![]() ![]() ![]() |
Var Цитата Использую я Free Pascal. замени кусок на Var и компилируй под win 32. номер ошибки скажи если будет . p.s. в uses вместо crt - wincrt. -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
Orlangur |
![]()
Сообщение
#3
|
![]() Новичок ![]() Группа: Пользователи Сообщений: 27 Пол: Мужской Реальное имя: Александр Репутация: ![]() ![]() ![]() |
Цитата и компилируй под win 32 Это как? Всмысле 32 битным компилятором? |
Orlangur |
![]()
Сообщение
#4
|
![]() Новичок ![]() Группа: Пользователи Сообщений: 27 Пол: Мужской Реальное имя: Александр Репутация: ![]() ![]() ![]() |
Сделал как посоветовал.
При компиляции выдал такую ошибку: Error 3: Unknown identifier. При этом указывает на: GraphDriver, GraphMode: smallint; |
Altair |
![]()
Сообщение
#5
|
![]() Ищущий истину ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 4 824 Пол: Мужской Реальное имя: Олег Репутация: ![]() ![]() ![]() |
Цитата При компиляции выдал такую ошибку: Нет так мы тебе помогать не будем. Мне нужно ТОЧНО значть: КОМПИЛЯТОР ВЕРСИЯ КОМПИЛЯТОРА ПЛАТФОРМА ПОД КОТОРУЮ КОМПИЛИРУЕШЬ пока этой информации не будет, диалога не будет! -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
Orlangur |
![]()
Сообщение
#6
|
![]() Новичок ![]() Группа: Пользователи Сообщений: 27 Пол: Мужской Реальное имя: Александр Репутация: ![]() ![]() ![]() |
Turbo Pascal 7.01, version Haypo (0.91 BETA).
Free Pascal Version 1.0.6. Платформу под которую компилирую не знаю. А какие платформы вообще бывают? Какие лучше? |
Altair |
![]()
Сообщение
#7
|
![]() Ищущий истину ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 4 824 Пол: Мужской Реальное имя: Олег Репутация: ![]() ![]() ![]() |
Цитата Turbo Pascal 7.01, version Haypo (0.91 BETA). Free Pascal Version 1.0.6. Выбери что-то одно! Программы для одного не совместимы на 100% с другим. Цитата Платформу под которую компилирую не знаю. ДОС или ВИН ? Ты все еще в облаках витаешь, если ты работаешь только с 16 битами, забудь о FPC и живи в прошлом веке, иначе выбрасывай TP и юзай только FPC ... но скачай более новую версию. Хорошо дальше, ты точно должен щас сказать какой компилер берешь и платформу под котрую компилишь. Дело в отм что в ВИн приложениях не нужен BGI, раз у тебя ошибка такая, значитв FPC ТЫ НЕ КОМПИЛИРУЕШЬ!!! (ТАм такой ошибки быть не может) оооххх.. ![]() -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
Orlangur |
![]()
Сообщение
#8
|
![]() Новичок ![]() Группа: Пользователи Сообщений: 27 Пол: Мужской Реальное имя: Александр Репутация: ![]() ![]() ![]() |
Я уже разобрался...
Компилю я под Вин. Скачал нормальную 32 битную версию Free Pascal 2.0. Теперь всё ОК. Цитата GraphDriver, GraphMode:smallint; Что такое - smallint? Цитата Begin GraphDriver := d8bit; GraphMode := m800x600; InitGraph(GraphDriver, GraphMode, ''); А что за d8bit? |
Altair |
![]()
Сообщение
#9
|
![]() Ищущий истину ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 4 824 Пол: Мужской Реальное имя: Олег Репутация: ![]() ![]() ![]() |
Цитата Что такое - smallint? тип данных. целочисленный. Цитата А что за d8bit? стандарт задания видеодрайвера. 8 битный цвет (256 цветов) -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
Orlangur |
![]()
Сообщение
#10
|
![]() Новичок ![]() Группа: Пользователи Сообщений: 27 Пол: Мужской Реальное имя: Александр Репутация: ![]() ![]() ![]() |
Спасибо Altair...
Извини за гимор... ![]() |
Altair |
![]()
Сообщение
#11
|
![]() Ищущий истину ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 4 824 Пол: Мужской Реальное имя: Олег Репутация: ![]() ![]() ![]() |
Orlangur , да ты брсь, заходи еще, мы тут как раз за тем что бы отвечать на вопросы
![]() -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
Дима |
![]()
Сообщение
#12
|
Гость ![]() |
Привет, скажите плиз как писать текст в ГРАФ режиме.
пишу вроде как надо: settextstyle (0,0,2); outtextxy (20,20,'...'); нажимаю CTRL F9 программа работает,а еулсеф нету ![]() |
volvo |
![]()
Сообщение
#13
|
Гость ![]() |
Дима, какой компилятор у тебя? Какой-то из 32-битных или обычный TP? И, кстати, приведи программу полностью...
|
гость |
![]()
Сообщение
#14
|
Гость ![]() |
uses graph;
var graphdriver, graphmode: integer; Begin graphdriver:= detect; Initgraph (graphdriver, graphmode,'c:/tp/bgi'); setbkcolor а че дальше то? помогите плз рисуночек нужен ![]() |
Ozzя |
![]()
Сообщение
#15
|
![]() Гуру ![]() ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 1 220 Пол: Мужской Репутация: ![]() ![]() ![]() |
|
![]() ![]() |
![]() |
Текстовая версия | 29.06.2024 22:20 |