Вниз  MobPascal
<< 1 ... 64 65 66 67 68 ... 123 >>
- 23.07.2013 / 16:57
#278690
lehaAKO
  Пользователь
lehaAKO 
Сейчас: Offline
ВитаминКО, блин спасибо тебе большое ато я думал да думал нифига не получалось
сейчас попробую напишу результат
Изменено lehaAKO (23.07 / 16:58) (всего 1 раз)
- 23.07.2013 / 17:12
#278693
lehaAKO
  Пользователь
lehaAKO 
Сейчас: Offline
ВитаминКО, блин у меня пишет процедура или функция drawimage(Ljava/land/String;II) не найдены
- 23.07.2013 / 17:15
#278694
lehaAKO
  Пользователь
lehaAKO 
Сейчас: Offline
вот сам код

Прикрепленные файлы:
Game.mpas (0.4 кб.) Скачано 767 раз
- 23.07.2013 / 17:22
#278698
Dimonik
  Пользователь
Dimonik 
Сейчас: Offline
lehaAKO (23.07.2013/17:15)
вот сам кодЭтот код не будет работать. Картинки же надо сначала загрузить командой loadimage('/kartinka.png')
- 23.07.2013 / 17:33
#278702
Dimonik
  Пользователь
Dimonik 
Сейчас: Offline
Посмотри этот код. Нарисуй 4 картинки танка(поворот вправо,влево,вверх,вниз) и собери прогу и посмотри что выйдет.

Прикрепленные файлы:
Tank.mpas (2.52 кб.) Скачано 822 раза
- 23.07.2013 / 17:40
#278704
lehaAKO
  Пользователь
lehaAKO 
Сейчас: Offline
Этот код не будет работать. Картинки же надо сначала загрузить командой loadimage('/kartinka.png')
 так ты что там не видел что ли там a:=li(i+".PNG") я там все массивами загружаю
- 23.07.2013 / 17:48
#278705
Dimonik
  Пользователь
Dimonik 
Сейчас: Offline
lehaAKO (23.07.2013/17:40)
так ты что там не видел что ли там a:=li(i+".PNG") я там все массивами загружаюЕсли этот код ты писал мобпаскале-то он сокращения не понимает. И там слеш надо ставить loadimage('/'+i+'.png') Могу ошибаться,но по-моему так надо писать.
- 23.07.2013 / 17:50
#278707
lehaAKO
  Пользователь
lehaAKO 
Сейчас: Offline
Dimonik, сейчас попробую, и он кстати сокращенный понимает потому что другие приложения работали и с сокращениями :)
- 23.07.2013 / 17:53
#278709
Dimonik
  Пользователь
Dimonik 
Сейчас: Offline
lehaAKO (23.07.2013/17:50)
Dimonik, сейчас попробую, и он кстати сокращенный понимает потому что другие приложения работали и с сокращениями :)Не сокращал никогда. Вторая твоя ошибка-в коде у тебя repaint нет.
- 23.07.2013 / 19:49
#278744
ВитаминКО
  Супермодератор
ВитаминКО 
Сейчас: Offline
Загрузка картинок в цикле:
  1. program TestLoad;
  2. var
  3.   imgArr: array[10] of Image;
  4.   i, x: Integer;
  5.  
  6. begin
  7.   for i:=0 to 9 do begin
  8.     imgArr[i]:=loadImage('/res'+i+'.png');
  9.   end;
  10.   x:=0;
  11.   for i:=0 to 9 do begin
  12.     drawImage(imgArr[i], x, 0);
  13.     x:=x+10;
  14.   end;
  15.   repaint;
  16.   delay(5000);
  17. end.
Грузит 10 картинок с именами res0.png, res1.png, ..., res9.png.
Затем выводит их друг за другом с шагом по Х с х=10 (ширина картинки) в буфер.
repaint выводит содержимое буфера на экран.
Если брать картинки 10х10, то все они будут на одной строке, общая высота=10, ширина=100
__________________
 わからない！！
<< 1 ... 64 65 66 67 68 ... 123 >>
Наверх  Всего сообщений: 1221
Фильтровать сообщения
Поиск по теме
Файлы топика (97)