Глюк с массивом.

[Gector]

Если скомпилить jar файл этого кода то ошибки лог не выдаст. Но но в эмуляторе и на телефоне приложение намертво виснет. Чуть не свихнул думалку пока соображал в чем проблема. Нашел. Пришел к выводу, что прога виснет на создании массива изображений(layer1:array). Вопрос. Можно ли создать такой массив и есть ли альтернатива?

program Scarlet_Trace;
uses sensor;

var x, y, xline, yline, pointer_x, pointer_y, first_pointer_x, first_pointer_y, pointer_time, pe: integer; 
    keyCode: integer;
Logo: Image;

Layer1:Array[0..9,0..5] of Image;
Layer2:Array[0..9,0..5] of Image;
Layer3:Array[0..9,0..5] of Image;
Level: integer;
procedure Controls;
begin
        If pe>0 then begin
            first_pointer_x:=pointer_pressed_x;
            first_pointer_y:=pointer_pressed_y;
            pointer_x:=pointer_dragged_x;
            pointer_y:=pointer_dragged_y;
            DrawLine(first_pointer_x,first_pointer_y,pointer_x,pointer_y);
            //DrawText('+',pointer_x,pointer_y);        
        end;
end;

begin
    sensor.init;
    Debug('=====');
  repeat
        SetColor(255, 0, 0);
    FillRect(0, 0, GetWidth, GetHeight);
    SetColor(255, 0, 0);
    keyCode:= GetKeyPressed;
        pe:=pointer_state;
        Controls;
    Repaint;
  until false;
 End.

[cherepets]

С картинками вродь только квадратные можно массивы (9х9 например)

[Gector]

Спасибо. Заработало.)
Точнее не заработало. Но теперь хоть до дебага доходит)

[Igor]

Если хочешь создать двухмерный неквадратный массив,
можно объявить одномерный массив переменных своего типа данных, а свой тип данных является одномерным массивом чего-нить.

[Gector]

Да тут уже другая проблема). Out Of Memory).

[Igor]

f:image;
...
f:=nil;
Вроде как экономит память.
Или сделать массив строк, в них прописать названия файлов (a:array [1..9,1..9] of string) и использовать более медленный способ.
drawimage(loadimage(a[b,c]),x,y);

[cherepets]

"Более медленный способ" приведет к аутОфМемори еще быстрее..

[Igor]

У меня хватало и по-нормальному, так я ещё не пробовал.
а почему?

[cherepets]

Создаются временные переменные, а удаляются только при system.gc() и то если повезет.
Я раньше пробовал так делать, довольно быстро выкидывало.

[Gector]

Да тут даже дело не в этом. Дело в колличестве. Грузятся по сути 180 изображений 32х32(и не спрашивайте зачем))) Я час тупил с этими массивами, а когда исправил - понял, что дурак))).

[odd]

Легче все твои 180 изображений поместить на одну картинку и выводить на экран только кадр из этой большой картинки. Либо использовать библиотеку спрайтов + эта большая картинка.

[Gector]

Сообщение от odd

Легче все твои 180 изображений поместить на одну картинку и выводить на экран только кадр из этой большой картинки. Либо использовать библиотеку спрайтов + эта большая картинка.

Я уже исправил. Теперь выводятся предзагруженные картинки. Короче тайловая карта.)
Я даже себя не узнаю). Как мог так ступить).
Кстати а каким образом их можно поместить на одно изображение?