[steelik]

Program Ex_1;

Uses Graph;

Var Gd, Gm: integer;

Begin
Gd:=VGA;
Gm:=VGAhi;
Initgraph(Gd,Gm,'');

if GraphResult = grOk then
begin
line(0,0,639,479);
Readln;
CloseGraph;
end;

End.

Вообщем жму CTRL+F9, собирается, блынкает черный экран и обратно. Жму ALT+F5, ничего особенного, то есть никаких ошибок не возникает, в чем может быть дело? Всё это под XPSP2 стоит.