у меня сейчас дипломная работа на паскале,я в форме

d:=detect;
initgraph(d,m,' ');
if graphresult<>0 then halt;