02.11.2011, 20:36
|
#6
|
Оператор ЭВМ
Регистрация: 01.11.2011
Сообщений: 35
Написано 0 полезных сообщений (для 0 пользователей)
|
Ответ: Помогите исправить ошибку
program loadcar;
var
progress,i,S:Integer;
begin
progress:=1;
S:=1;
SetColor(0,0,0);
FillRect(1,1,240,320);
SetColor(200,170,0);
DrawText('Loading',100,130);
DrawRect(70,155,100,10);
for i:=0 to 96 do
begin
FillRect(72,157,progress,7);
progress:=progress+1;
drawImage(loadImage('/car.png')S,200);
S:=S+2;
repaint;
delay(20);
end;
end.
|
Должна идти загрузка и ехать внизу машина, но при компиляции выскакивает "error, parameter list is too short"
Что на этот раз не так?
|
(Offline)
|
|