¿Como Guardar un Bmp/Jpg en un campo BLOB desde Delphi?

[LuCkY_007]

Ok ya lo tengo! Aqui pongo un ejemplo pa si alguien lo leyera mas tarde

Código Delphi [-]
procedure TFmconfiguracionprincipal.ImagenClick(Sender: TObject);
var
  Grafico : TGraphic;
  bS  : TStream;
Begin
  If Dialogo.Execute Then
  Begin
    // GUARDAR LOGO EN BD
    TTabla.Edit;
    TTablaLogo.LoadFromFile(Dialogo.Filename);
    // CARGAR LOGO EN IMAGEN
    try
      bS := TTabla.CreateBlobStream(TTablaLogo,bmread);
      Grafico := TJPEGImage.Create;
      Grafico.LoadFromStream(bS);
      Imagen.Picture.Graphic := Grafico;
      Grafico.free;
      bS.Free;
    except
      Grafico.free;
      bS.free;
    End;
  End;
end;

Gracias x la ayuda !

PD: Por cierto el campo de la tabla lo ideal es que sea LONGBLOB, por que al principio me comi la cabeza por que la imagen me salia a medias y luego vi que el campo tenia muy poco tamaño (mb).