[Alegun]

Аналогично но посмотрите вот это, должно точно помочь.

З.Ы. Вот рабочий пример на ADO под базу Access

Код:

procedure TForm1.Button1Click(Sender: TObject);
 var
  jpg: TJPEGImage;
  bmp: TBitmap;
begin
 if OpenDialog1.Execute then
  begin
   jpg:= TJPEGImage.Create;
   bmp:= TBitmap.Create;
  try
   jpg.LoadFromFile(OpenDialog1.FileName);
   bmp.Assign(jpg);
   ADOTable1.Edit; 
   ADOTable1.FieldByName('scan').Assign(bmp); 
   ADOTable1.Post; 
  finally
   jpg.Free;
   bmp.Free;
  end;
 end;{execute}
end;

а по другому, не смотря на множество примеров в сети загрузить так и не получилось (да и надоело базы разных форматов клепать), не знаю, может у меня провайдер мелкомяконький кривой, может компонентов каких не хватает, поэтому и фиаско, всё может быть