Ayuda con variable tipo File

[[nlsgarcia]]

JerS,

Empezado por JerS

...tengo almacenado en mi base de datos una plantilla de tipo blob y quiero asignarla a una variable tipo file esto es posible?...

Entiendo que en tu BD tienes un campo Blob y quieres almacenar en este un archivo binario.

Empezado por JerS

...tengo unas SDK de identificación biometrica pero funciona guardando las huellas o templates en archivos, pero me gustaria manejarlo con Base de Datos...

Corolario de lo anterior.

Revisa estos links:

Working With BLOBs Using Delphi:
http://www.onlinedelphitraining.com/...ters/blobs.htm

How save a file in BLOB and use later:
http://www.scalabium.com/faq/dct0141.htm

Espero sea útil

Nelson.

[JerS]

Amigos en mi ignorancia a la hora de manejar archivos queria saber que se hace exactamente en esta función:

Código Delphi [-]
 BlockRead( fPtr, PChar( lpRec.data )^, dSize, rdTotal );
   if DWORD( rdTotal ) <> dSize then
   begin
      CloseFile( fPtr );
      FreeRecordMem( lpRec );
      GetRecord := nil;
      Exit;
   end;

para hacer lo mismo pero con mi variable TMemory

[ecfisa]

Empezado por JerS

Amigos en mi ignorancia a la hora de manejar archivos queria saber que se hace exactamente en esta función:
...

Hola JerS.

Me parece que la explicación es mas clara comentando el código:

Código Delphi [-]
 { BlockRead lee uno o mas registros lógicaos a partir de la
   posición actual del archivo y los almacena en una variable }
   BlockRead(fPtr,               // file
             PChar(lpRec.data)^, // variable
             dSize,              // nro de registros
             rdTotal);           // registros leidos

   { Si el número de registros leidos difiere de los solicitados ...}
   if DWORD(rdTotal) <> dSize then
   begin
      CloseFile(fPtr);           // cerrar file
      FreeRecordMem(lpRec);      // ?? (supongo libera puntero a record)
      GetRecord := nil;          // pone a nulo el puntero GetRecord
      Exit;                      // sale del procedimiento/funcion
   end;

Saludos.