Появилась такая проблема:
В Паскале перестал пахать графический режим. Опишу подробнее:
Возьмем наипростейший пример:

Program lines;
Uses
Graph, Crt;
Var
GraphDriver, GraphMode, i, n: integer;
Begin
GraphDriver := Detect;
GraphMode := 0;
InitGraph(GraphDriver, GraphMode, '');
n := 50;
For i:= 1 to 10 do
begin
PutPixel(n, 100, Red);
n := n+1;
end;
SetBkColor(White);
ReadKey;
CloseGraph;
end.

Компилируется эта прога нормально, а когда запускаешь выдаёт ошибку:
"BGI Error: Graphics not initialized (use InitGraph)".
Использую я Free Pascal. Пробовал на Turbo Pascal - аналогичная ситуация.
Как быть?

Var
GraphDriver, GraphMode, i, n: integer;
Begin
GraphDriver := Detect;
GraphMode := 0;
InitGraph(GraphDriver, GraphMode, '');

замени кусок на

Var
  i, n: integer;
 
GraphDriver, GraphMode:smallint;

Begin
GraphDriver := d8bit;
GraphMode := m800x600;
InitGraph(GraphDriver, GraphMode, '');

и компилируй под win 32.
номер ошибки скажи если будет .

p.s. в uses вместо crt - wincrt.

Это как? Всмысле 32 битным компилятором?

Сделал как посоветовал.
При компиляции выдал такую ошибку:
Error 3: Unknown identifier.
При этом указывает на:

GraphDriver, GraphMode: smallint;

Нет так мы тебе помогать не будем.
Мне нужно ТОЧНО значть:
КОМПИЛЯТОР
ВЕРСИЯ КОМПИЛЯТОРА
ПЛАТФОРМА ПОД КОТОРУЮ КОМПИЛИРУЕШЬ
пока этой информации не будет, диалога не будет!

Turbo Pascal 7.01, version Haypo (0.91 BETA).
Free Pascal Version 1.0.6.
Платформу под которую компилирую не знаю.
А какие платформы вообще бывают? Какие лучше?

Выбери что-то одно!
Программы для одного не совместимы на 100% с другим.

ДОС или ВИН ?
Ты все еще в облаках витаешь,
если ты работаешь только с 16 битами, забудь о FPC и живи в прошлом веке, иначе выбрасывай TP и юзай только FPC ... но скачай более новую версию.
Хорошо дальше, ты точно должен щас сказать какой компилер берешь и платформу под котрую компилишь.
Дело в отм что в ВИн приложениях не нужен BGI, раз у тебя ошибка такая, значитв FPC ТЫ НЕ КОМПИЛИРУЕШЬ!!! (ТАм такой ошибки быть не может)
оооххх..

Я уже разобрался...
Компилю я под Вин.
Скачал нормальную 32 битную версию Free Pascal 2.0.
Теперь всё ОК.

Что такое - smallint?

А что за d8bit?

тип данных. целочисленный.

стандарт задания видеодрайвера. 8 битный цвет (256 цветов)

Спасибо Altair...
Извини за гимор...

Orlangur , да ты брсь, заходи еще, мы тут как раз за тем что бы отвечать на вопросы

Привет, скажите плиз как писать текст в ГРАФ режиме.
пишу вроде как надо:
settextstyle (0,0,2);
outtextxy (20,20,'...');
нажимаю CTRL F9 программа работает,а еулсеф нету

Дима, какой компилятор у тебя? Какой-то из 32-битных или обычный TP? И, кстати, приведи программу полностью...

uses graph;
var graphdriver, graphmode: integer;
Begin
graphdriver:= detect;
Initgraph (graphdriver, graphmode,'c:/tp/bgi');
setbkcolor

а че дальше то?
помогите плз

рисуночек нужен

Зарегистрируйся и получишь возможность прикреплять рисунки