проблема с модулем граф

[tinton]

Доброй ночи. Нужна помощь ребят. При попытке запустить граф модуль ну всмысле нарисовать что угодно пусть даже просто линию, паскаль комплирует-ошибок нету, затем темный экран разворачивается на долю секунды во весь экран и паскаль закрывается.Винда стоит полностью чистая все дрова на видео вручную ставил никаких проблем с этим нету. Подскажите как это можно исправить или может что пишу не так. вот пример программы:

USES		Graph;
VAR  		Device, Mode	: Integer;
BEGIN
	WriteLn('   ');

	ReadLn;
	Device:=0;
	InitGraph(Device,   Mode,  'D:/tp70/bgi');
	Circle(100,80,50);
	ReadLn;

	CloseGraph;
	WriteLn('    ');
	ReadLn
END.

[BDA]

Попробуйте так:

Device:=detect;
Mode:=0;
InitGraph(Device,   Mode,  'D:/tp70/bgi');

Попробуйте скомпилировать вот это графическое меню http://codetemple.ru/index.php?itemid=5
Еще можно попробовать не закрывать графику и перезагрузить компьютер

[tinton]

Сообщение от BDA

Попробуйте так:

Device:=detect;
Mode:=0;
InitGraph(Device,   Mode,  'D:/tp70/bgi');

Попробуйте скомпилировать вот это графическое меню http://codetemple.ru/index.php?itemid=5
Еще можно попробовать не закрывать графику и перезагрузить компьютер

перепробовал все.. вышибает из паскаля при попытки работы с графикой..

[BDA]

Радикальный вариант (у вас, скорее всего, вин7):
Установить виртуальную машину
В нее установить вин хр
В нее установить паскаль

Менее радикальный способ:
Установить досбокс и запускать паскаль из него

Еще менее радикальный:
Скачать другой паскаль (проследить, чтобы в пути не было русских букв)

[tinton]

у меня вин хп...). через досбокс. тоже вышибает только паскаль не разворачивается перед этим на весь экран, а просто закрывается окно. скачал паскаль.. таже песня...

[BDA]

Попробуйте SchoolPak
Похожая проблема в теме 2009 года
http://programmersforum.ru/showthread.php?t=48131

[Землянин]

Думаю, все-таки проблема в том, что машина не принимает путь к bgi. Попробуйте так:

(Код Си)

initgraph(&driver,&gmode,"..//BGI");

Моя аналогичная проблема была устранена этим способом.