Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Firebird e Interbase (https://www.clubdelphi.com/foros/forumdisplay.php?f=19)
-   -   ¿Cómo meter imágenes en tabla Firebird? (https://www.clubdelphi.com/foros/showthread.php?t=82505)

bulc 13-03-2013 16:08:04

¿Cómo meter imágenes en tabla Firebird?
 
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 Noteví 13-03-2013 16:35:01

Mira los enlaces del final de página.

Neftali [Germán.Estévez] 13-03-2013 17:18:17

Cita:

Empezado por bulc (Mensaje 456653)
¿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 13-03-2013 18:44:05

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 13-03-2013 20:37:23

Meter imágenes desde el porteador de windows
 
Me vale. Intentaré adoptarlo para recoger la imagen del porteador de windows. Supongo que seré capaz.
Muchas gracias.

ecfisa 13-03-2013 22:01:13

Cita:

Empezado por bulc (Mensaje 456653)
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 14-03-2013 21:40:33

Bien. Intentaré adaptarla al Clipboard
 
Muy claro. Gracias.


La franja horaria es GMT +2. Ahora son las 05:07:42.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi