Судя по приведеному коду в BLOB записываются имена файлов, а не сами изображения.
Не зная деталей могу только обрисовать схему как я записываю картинки в блоб.
переменная типа TPicture,
- создается: Pct := TPicture.Create;
- в нее загружается изображение из файла:
Pct.LoadFromFile(OpenPictureDialog1.FileName);
Далее можно картинку сохранить в TMemoryStream (кстати, ее вообще можно загрузить и без TPicture: MemStream.LoadFromFile(OpenPictureDialog1.FileName )).
"Передвинуть" битовый образ картинки в String (проще будет передавать как параметр) и записать в базу.
Move(S[1], MemStream.Buffer, MemStream.Size);
DM.IBQuery2.Params[4].AsBlob:= S; //S : string;
Для работы с блоб полями можно воспользоваться специальным потоком для записи в блоб (и последующего чтения):
S := TBlobStream.Create(<FieldBlob1>, bmReadWrite)];
|