Ver Mensaje Individual
  #2  
Antiguo 06-07-2018
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola.


Habiendo declarado el campo blob del tipo correcto y estando el archivo ya cargado en él, una opción es:
Código PHP:
void __fastcall TForm1::btnSaveCurrBlobFldToFileClick(TObject *Sender)
{
  
TStreamStream = new TFileStream((AnsiString)cPath cNomArchfmCreate);
  
TBlobField *Bf static_cast<TBlobField*>(IBTableAplic->FieldByName("ARCHIVO"));

  
__try 
  
{
    
Bf->SaveToStream(Stream);
  }
  
__finally 
  
{
    
delete Stream;
  }

Saludos
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita