[Rock2roll]

Что не так:

Program LaFull;
Var int:image;
bulLogin:boolean;

Procedure login;
begin
drawImage(int,0,0);

repaint;
delay(-1);
end;

Procedure data;
begin
bulLogin:=true;

if (bulLogin=true) then login;

int:=LoadImage('/int.png');
end;

begin
data;
end.
?????
Всё компилит, а экран белый!