¿Cómo meter imágenes en tabla Firebird?

[bulc]

Cuando hago un UPDATE puedo cambiar los datos normales, pero ¿como se hace para hacerlo con un BLOB Subtype 0 que guarde gráficos?.
Sobre todo me refiero a cuando estos estan en un TImage. Quiero tener algún concepto antes de implementarlo con código.

[Casimiro Notevi]

Mira los enlaces del final de página.

[Neftali [Germán.Estévez]]

Empezado por bulc

¿como se hace para hacerlo con un BLOB Subtype 0 que guarde gráficos?

Si te refieres a que en la sentencia SQL no puedes añadir el valor del gráfico, como se hace con los INTEGER o los CHAR, para las imágenes debes utilizar parámetros en la sentencia.

[[duilioisola]]

Yo suelo utilizar streams para eso:

Código Delphi [-]
procedure CargarImagen(archivo: string);
var
  s : TStream;
begin
  s := TMemoryStream.Create;
  try
    s.LoadFromFile(archivo);
    s.Position := 0;
    Tabla.FieldByName('IMAGEN').LoadFromStream(s);
  finally
    s.Free;
  end;
end;

[bulc]

Me vale. Intentaré adoptarlo para recoger la imagen del porteador de windows. Supongo que seré capaz.
Muchas gracias.

[ecfisa]

Empezado por bulc

Cuando hago un UPDATE puedo cambiar los datos normales, pero ¿como se hace para hacerlo con un BLOB Subtype 0 que guarde gráficos?.
Sobre todo me refiero a cuando estos estan en un TImage. Quiero tener algún concepto antes de implementarlo con código.

Hola bulc.

Creo que este mensaje también te será útil.

Saludos.

[bulc]

Muy claro. Gracias.