Ver Mensaje Individual
  #5  
Antiguo 19-04-2015
Avatar de anubis
anubis anubis is offline
Miembro
 
Registrado: mar 2007
Posts: 863
Reputación: 20
anubis Va por buen camino
Gracias a todos,

Funcionar funciona perfecto como dice AgustinOrtu . gracias.

Respecto a los campos blob, quiza no se deban usar, la verdad no lo sabia, pero tengo que usarlos para almacenar las facturas y poder traerlas de forma remota cuando se necesitan. Si bien es cierto que cada factura puede tener un tamaño en pdf diferente en cada caso, quiza me podais decir el por qué no se deba usar aunque imagino que en algun momento me pueda corromper la base de datos al no tener un tamaño definido el campo.

Para guardar un factura lo que hago es lo siguiente y usando tambien lo que puso el amigo AgustinOrtu.
Código Delphi [-]
var
  campoblob:tstream;
begin
campoblob:=tfilestream.create(opendialog1.filename,fmopenread);
with AlgunObjetoQuery do begin   
  SQL.Text := ' INSERT INTO LaTabla (numcheque, factura) VALUES (:numcheque, :factura) ';   
  ParamByName('numcheque').AsIntreger := NumeroChequeNuevo;   
  ParamByName('factura').AsBlob := loadfromstream(campoblob,ftblob); 
  // ni idea, nunca use campos blob, pero supongo que esto ya lo sabes no?   
  ExecSQL; 
end;
Gracias de nuevo

Última edición por Casimiro Noteví fecha: 19-04-2015 a las 09:46:41.
Responder Con Cita