PledgeCrest, AllyCrest -> Tbitmap

[vahes]

ну просто я посмотрел на твой Type

TFixPck = packed record case Integer of
    0:(ch:    array[Word] of Char);
    1:(bt:    array[Word] of Byte);
    2:(size: Word; id: Byte; dbt: array[0..65532] of Byte);

и решил заполнить все масивы с текста в Мемо, чтобы запись типа была полной (практического применения не предвиделось, просто для себя попрактиковаться хотел).
А по делу, я чет думал что нумерация элементов масива идет с 1цы, а не с 0. В этом скорее всего и ошибка. Спасибо за ответ.
Нет пока с 7й разбираюсь.