не компилируется код

Question

компилятор лазарус. ошибка - Error: Call by var for arg no. 2 has to match exactly: Got "LongInt" expected "SmallInt" 
 
Uses graph ; 
Var D, m : integer ; 
Begin 
 D := detect ; 
 InitGraph ( d, m ,'D:	p7\BGI '); 
 If GrapfResult=0 then 
 begin 
line(120,50,180,50); 
line(180,50,180,60); 
line(180,60,120,60); 
line(120,60,120,50); 
closeGraph ; 
 end 
else writeln ('proisoshla osibka'); 
end.

Евгений Миргаязов · Accepted Answer

Var D, m, integer ; 
 
или 
 
var D; 
integer m;