¿Como descomponer una un archivo en Bytes?
Necesito descomponer un archivo en bytes para insertarlo en una Base de Datos y enviarlo desde Delphi. Si alguien sabe como enviar un archivo desde delphi una base de datos como SQLServer o Oracle, le agradeceria mucho la ayuda que me pueda brindar.
no se mucho de delphi pero en builder se pueden usar dos objetos para hacerlo TFileStream y un array dinámico de bytes, cambia este código a delphi;
TFileStream *archivo=newTFileStream("c:\archivo.bin",fmOpen);
Byte *cadena;
int64 longitud,i;
longitud=archivo->Size;
cadena= new Byte[longitud];
archivo->Read(cadena,longitud);
****hacer cosas tuyas***
delete cadena;
delete archivo;
en hacer cosas tuyas tienes el archivo entero en forma de bytes en cadena y en longitud tienes el final;
TFileStream *archivo=newTFileStream("c:\archivo.bin",fmOpen);
Byte *cadena;
int64 longitud,i;
longitud=archivo->Size;
cadena= new Byte[longitud];
archivo->Read(cadena,longitud);
****hacer cosas tuyas***
delete cadena;
delete archivo;
en hacer cosas tuyas tienes el archivo entero en forma de bytes en cadena y en longitud tienes el final;
