Тема: Массивы
Показать сообщение отдельно
Старый 03.04.2012, 21:18   #2
Rock2roll
Знающий
 
Аватар для Rock2roll
 
Регистрация: 14.05.2010
Сообщений: 297
Написано 13 полезных сообщений
(для 13 пользователей)
Ответ: Массивы

Program massive;
var  
a:array [1..3of image;
i:integer;
begin
i
:=1;
a[i]:=loadImage('/pic.png'); i:=i+1;
a[i]:=loadImage('/pic2.png'); i:=i+1;
a[i]:=loadImage('/pic3.png');

drawImage(a[2],0,0);
drawImage(a[3],30,30);
repaint;
end
__________________
G502, GT S5230w user!
(Offline)
 
Ответить с цитированием
Сообщение было полезно следующим пользователям:
Amigo888 (04.04.2012)