Знакомая проблема!!!!!
Все очень просто!!!!!!
Поищи в папках Паскаля файлы: graph.tpu, graph.tpp, graph.int;
А вообще скопируй содержимое всех папок в одну, потом в options-> directories укажи эту папку во всех строчках,
и значит пишешь такое начало проги:
Код
program i;
uses graph;
gd,gm: integer;
begin
gd:=detect;
initgraph(gd,gm,'Здесь указываешь путь этой папки');
{Ну и рисуешь}
line(100,100,200,100);
readln;
closegraph;
end.
На экране появиться линия!!!!!! ;)