Developing.ru

Как-то недавно я спрашивал про Graph, но к сожалению прога так и не запустилась, может проблема с компьютером? Незнаю. Новая прозьба: просто попробуйте запустить эту программу и напишите работает или нет? Спасибо.

Текст программы(Turbo Pascal):

Program graphika;
Uses crt, graph;
var GraphDriver, GraphMode : integer;
Begin
clrscr;
GraphDriver:=detect;
InitGraph(GraphDriver, GraphMode, '');
SetColor(4);
Rectangle(300,300,600,600);
SetFillStyle(8,10);
FloodFill(301,301,4);
Readln;
CloseGraph;
End.

&quot писал(а):SetColor(4);

&quot писал(а):SetFillStyle(8,10);

а вот что это за константы в параметрах? может тупо яркости монитора не хватает

зы. не проверял, ТП не имею

Поди, BGI-файлы при запуске не находятся.
Старые, многими наступанные грабли.

программа виснет на стадии подключения модуля. Никаких сообщений об ошибке не выводит.