Чтение и запись карты.

[Beermonza]

До 100K карты считаются нормой, не важно какого размера, если более, то нужно сжимать, хотя бы в тот же ZIP-формат с заменой параметров и расширения.

Вот эта запись не нужна:

 UtextureX    :array[1..30,1..40] of boolean;     //Есть ли клетка или нет

...у вас есть:

 UInteger     :array[1..30,1..40] of integer;      //№ текстуры

...пусть 0 отвечает за "нет клетки", если больше 0, значит есть, и сразу это номер текстуры, ...сократится размер карты на треть.

Вот эту запись:

UProhodimost :array[1..30,1..40] of string[1]; //Вид проходимости (b - нельзя пройти, s - магазин, k - квест и.т.д.)

...переведите в формат Array of Byte, будите записывать код символа от 0 до 255, ...Ord(s) берет код, Chr({число}) переделывает в символ.

Переменная String длинной 1 будет занимать 2 байта.

[Alex Cones]

Переменная String длинной 1 будет занимать 2 байта.

Я думал это только в C... Разве в дельфи записывается терминатор?

[Beermonza]

Сообщение от Alex Cones

Я думал это только в C... Разве в дельфи записывается терминатор?

И в Delphi тоже есть 0-й байт.