Hola:
Yo utilizo esto, pero es para cargar de una en una (puedes adaptarlo a tu caso), y guardo el formato en otro campo porque a veces son .jpg y otras .bmp, si las tuyas son siempre .jpg no necesitarás este dato.
Te pongo el código por si es esto lo que quieres y te sirve de algo adaptándolo a tus necesidades.
Código Delphi
[-]
procedure TFPalabras.TBCargaFotoClick(Sender: TObject);
var
m, f: TStream;
s: string;
begin
if dlgOpenPicture.Execute then
begin
DM.IBDSPalNue.Edit;
m:= DM.IBDSPalNue.CreateBlobStream(DM.IBDSPalNueFOTO, bmWrite);
f:= TFileStream.Create(dlgOpenPicture.filename, fmOpenRead);
m.CopyFrom(f, f.Size);
s:= AnsiUpperCase(ExtractFileExt(dlgOpenPicture.FileName));
if s='.JPEG' then
s:= '.JPG';
DM.IBDSPalNueFORMATOFOTO.AsString:= Copy(s,2,3);
DM.IBDSPalNue.Post;
f.Free;
m.Free;
end
end;
Para mostrar la imagen lo hago con un TImage. Si te interesa saber como me lo dices.
Un saludo.