Вниз  MIDlet Pascal
<< 1 ... 43 44 45 46 47 ... 160 >>
- 10.01.2013 / 14:37
#231519
Maxxxl123
  Пользователь
Maxxxl123 
Сейчас: Offline
BegzoDchik,
  1. begin
  2. while(true) do begin
  3. fillrect(0,0,screenwidth,screenheight);
  4. drawimage("",a,50);
  5. a:=a+1;
  6. repaint();
  7. end;

- 10.01.2013 / 14:38
#231521
Maxxxl123
  Пользователь
Maxxxl123 
Сейчас: Offline
BegzoDchik, сойдет?
- 10.01.2013 / 14:41
#231523
BegzoDchik
  Пользователь
BegzoDchik 
Сейчас: Offline
ща заценю
- 10.01.2013 / 14:43
#231526
Maxxxl123
  Пользователь
Maxxxl123 
Сейчас: Offline
ток FillRect
DrawImage
- 10.01.2013 / 14:45
#231529
BegzoDchik
  Пользователь
BegzoDchik 
Сейчас: Offline
getwidth,getheight не надо?
- 10.01.2013 / 14:46
#231531
Maxxxl123
  Пользователь
Maxxxl123 
Сейчас: Offline
getwidth,getheight не надо? как хочеш, вместо них свои размері екрана подставь :)
- 10.01.2013 / 15:23
#231547
vl@volk
  Пользователь
vl@volk 
Сейчас: Offline
  1. program name;
  2. var
  3. x:integer;
  4. begin
  5. x:=0;
  6. while true do begin
  7. x:=x+2;
  8. setcolor(0,0,255);
  9. fillrect(x,5,50,50);
  10. delay(200);
  11. repaint;
  12. if x>200 then x:=0;
  13. if getkeyclicked=KE_KEY5 then break;
  14. end;
  15. end.
вот наподобе такого что-то попробуй
__________________
 знает толк
- 10.01.2013 / 16:14
#231585
gtasase
  Пользователь
gtasase 
Сейчас: Online
как сделать пиксельный движок?
- 10.01.2013 / 16:20
#231589
Maxxxl123
  Пользователь
Maxxxl123 
Сейчас: Offline
gtasase, по подробнее что именно ты собрался делать
- 10.01.2013 / 16:35
#231595
vl@volk
  Пользователь
vl@volk 
Сейчас: Offline
Я там чуть в растановке ошибся. И как очистку экрана в мп делать?
__________________
 знает толк
<< 1 ... 43 44 45 46 47 ... 160 >>
Наверх  Всего сообщений: 1594
Фильтровать сообщения
Поиск по теме
Файлы топика (72)