[SergArmy]

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

Если файлы Bmp одинакового размера то можно ещё попробовать так обьявить структуру:

Код:

Const
 R = 100433; // Размер рис.
Type
 MyStrukt = Record // Наша структура для записи в свой файл
  S: String[32]; // имя рисунка
  n: Integer; // ещё чтото 
  // и т. д. скоко надо параметров к рисунку.
  Bmp: Array [0..R] of Byte; // массив с байтами рисунка.
 end;

Вот так считываем из структуры на Image нашу картинку

Код:

var
 Ms: TMemoryStream;
 Str: MyStrukt;
begin
 Ms:= TMemoryStream.Create;
 Ms.Write(Str.Bmp, R);
 Image1.Picture.Bitmap.LoadFromStream(Ms);
 Ms.Free;
end;

Так же массив из MyStrukt можно легко сохранить в файл и читать от туда.
Записать рис. в нашу структуру тоже легко. Просто переписываем побайтно из рис. в массив Bmp: Array [0..R] of Byte;
Дома буду соченю пример если непонятно а то щяс на работе.

Отлично! Огромнейшее спасибо! Это прямо то что я и искал! Но пытался опробывать и что то не совсем получается, где то ошибся.
Cкажите что я ЗДЕСЬ.7z сделал не так?