Вниз  MobPascal
<< 1 ... 27 28 29 30 31 ... 123 >>
- 26.12.2011 / 21:08
#126039
XakepPRO
  Модератор форума
XakepPRO 
Сейчас: Offline
Magatino (26.12.2011/16:36)
XakepPRO, Сейчас попробую,но почему в учебнике два раза так написано в разделах var и array,плюс к этому в исходниках видел.В каком учебнике и в каких исходниках? Pascal и MidletPascal все-таки различаются.
- 26.12.2011 / 21:13
#126043
XakepPRO
  Модератор форума
XakepPRO 
Сейчас: Offline
kiriman, на твой пост (26.12.2011 / 19:10) отвечу, что есть не очень хорошо. Для мидлет паскаля.
- 26.12.2011 / 21:32
#126067
dihan
  Пользователь
dihan 
Сейчас: Offline
ай ай, в mobpascal нет двухмерных массивов - it's no good!
- 26.12.2011 / 21:42
#126071
Magatino
  Администратор
Magatino 
Сейчас: Offline
XakepPRO, Вот тут всё написано
dihan,а в учебнике говориться о 10 мерных массивах :gg:
Изменено Magatino (26.12 / 21:45) (всего 2 раза)

Прикрепленные файлы:
arrays.txt (1.32 кб.) Скачано 511 раз
- 26.12.2011 / 22:41
#126095
XakepPRO
  Модератор форума
XakepPRO 
Сейчас: Offline
Magatino, Значит, это для другого паскаля.

Дихан, а разве создать запись (структуру), в которой будет лежать линейный массив, и создать массив этих записей нельзя?
- 26.12.2011 / 23:02
#126099
Magatino
  Администратор
Magatino 
Сейчас: Offline
XakepPRO, В смысле для другого,там чёрно по белому написано что речь идёт о MP,надо будет подправить некоторые ошибки в учебнике :)
- 27.12.2011 / 17:55
#126259
Magatino
  Администратор
Magatino 
Сейчас: Offline
Помогите пожалуйста,я вот решил сделать простую анимацию с передвижением,но при установки приложения вышла вот такая ошибка:
Array Index Out Of Bounds
java/lang/ArrayIndexOutOfBounds Exception
  1. var
  2. x,y,s,d,t,i:integer;
  3. an:array[12] of image;
  4. begin
  5. for i:=1 to 12 do
  6. an[i]:=loadimage('/'+chr(48+i)+'.gif');
  7. x:=200;
  8. y:=100;
  9. s:=1;
  10. d:=1;
  11. t:=0;
  12. begin
  13. repeat
  14. t:=t+1;
  15. if t>6 then
  16. begin
  17. t:=0;
  18. d:=d+1;
  19. end;
  20. if (d>12) then d:=1;
  21. if (d=3) or (d=5) or (d=10) then x:=x-1;
  22. sc(255,255,255);FR(0,0,240,320);
  23. drawimage(an[d],x,y);
  24. delay(10);
  25. repaint;
  26. until false;
  27. end;
  28. end.

- 27.12.2011 / 17:56
#126260
P@bloid
  Пользователь
P@bloid 
Сейчас: Offline
Magatino, массивы нумеруются с 0
- 27.12.2011 / 18:02
#126261
limil
  Пользователь
limil 
Сейчас: Offline
P@bloid, я могу пользоватся этой программой на k750i и где мне пробить учебник и как соберать всё это?
- 27.12.2011 / 18:10
#126262
Magatino
  Администратор
Magatino 
Сейчас: Offline
P@bloid, Если я даже сделаю так,то ничего не измениться,уже пробывал:
  1. an:array[11] of image;

<< 1 ... 27 28 29 30 31 ... 123 >>
Наверх  Всего сообщений: 1221
Фильтровать сообщения
Поиск по теме
Файлы топика (97)