JPG en codigo binario

JPG en codigo binario

Postby Willi Quintana » Thu May 31, 2007 12:23 am

Hola amigos.
Como convertir un archivo jpg a binario??

Salu2
User avatar
Willi Quintana
 
Posts: 1022
Joined: Sun Oct 09, 2005 10:41 pm
Location: Cusco - Perú

Postby Antonio Linares » Thu May 31, 2007 6:41 am

Willi,

Explica un poco más lo que quieres hacer y para que, gracias
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42203
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby Willi Quintana » Thu May 31, 2007 2:25 pm

La idea es almacenar un jpg en una tabla de mysql, convirtiendo el archivo en caracteres hexdecimales para que se guarde sin problemas, por el tema de los caracteres, y luego recuperarlos y volver a armar la imagen..
Salu2
User avatar
Willi Quintana
 
Posts: 1022
Joined: Sun Oct 09, 2005 10:41 pm
Location: Cusco - Perú

Postby JmGarcia » Thu May 31, 2007 4:19 pm

Willi Quintana wrote:La idea es almacenar un jpg en una tabla de mysql, convirtiendo el archivo en caracteres hexdecimales para que se guarde sin problemas, por el tema de los caracteres, y luego recuperarlos y volver a armar la imagen..
Salu2

Podias convertirlo a MIME como hacen los e-mail cuando mandan ficheros adjuntos.
Es una forma de convertir ficheros binarios a texto...
Mi abuelo decía: Los aviones vuelan porque Dios quiere, y los helicópteros ni Dios sabe porque vuelan.
FWH 16.02, xHarbour 1.2.3, Harbour 3.2.0, WorkShop 4.5, AJ Make 0.30, Borlan BCC 7.00, VisualStudio 2013
User avatar
JmGarcia
 
Posts: 654
Joined: Mon May 29, 2006 3:14 pm
Location: Madrid - ESPAÑA

Postby Willi Quintana » Thu May 31, 2007 7:09 pm

Y como se come eso??
;)
Salu2
User avatar
Willi Quintana
 
Posts: 1022
Joined: Sun Oct 09, 2005 10:41 pm
Location: Cusco - Perú

Postby JmGarcia » Thu May 31, 2007 7:45 pm

Willi Quintana wrote:Y como se come eso??
;)
Salu2

Jeje... esa es una buena pregunta.
Creo que hay una clase/funcion que pasa a MIME y al reves...

En FWH\source\function tienes dos programas mimeclip.prg y mime64.c que te aclararan el tema.
Tiene dos funciones fMimeEnc(cIn,cOut) y fMimeDec(cIn,cOut)
Mi abuelo decía: Los aviones vuelan porque Dios quiere, y los helicópteros ni Dios sabe porque vuelan.
FWH 16.02, xHarbour 1.2.3, Harbour 3.2.0, WorkShop 4.5, AJ Make 0.30, Borlan BCC 7.00, VisualStudio 2013
User avatar
JmGarcia
 
Posts: 654
Joined: Mon May 29, 2006 3:14 pm
Location: Madrid - ESPAÑA

Solucionado

Postby Willi Quintana » Sat Jun 02, 2007 3:18 am

Hola a todos
Veamos,, capturo un imagen por la webcam( clase tscanner de rafa ) luego la grabo en el disco en formato jpg, , la "leo" con el memoread, luego la convierto a hexadecimal, y el resultado lo cargo un una tabla mysql (campo tipo blob),

uso las funciones STRTOHEX y HEXTOSTR

Salu2
User avatar
Willi Quintana
 
Posts: 1022
Joined: Sun Oct 09, 2005 10:41 pm
Location: Cusco - Perú

Re: Solucionado

Postby JmGarcia » Sat Jun 02, 2007 10:55 am

Willi Quintana wrote:...uso las funciones STRTOHEX y HEXTOSTR...

No hace falta... usa fMimeEnc(cIn,cOut) y fMimeDec(cIn,cOut) que son MIME y es un estandar en conversion de binario a texto y viceversa.
No creo que las funciones que comentas "tragen" con variables de megas...
Si se fijas con el MIME te fabrica lineas con CRLF para poderlas leer mejor.

Algo asi:
Code: Select all  Expand view  RUN
gAUAA1pJUIWWzQAABE1BSU4EQ09ERQdDX0VURVhUB0VORENPREUJX1NZTVNUQVJUCFNZTVNUQVJU
B1NZTUJPTFMHU1lNQk9MUwdfU1lNRU5EBlNZTUVORAROVUxMB0JFR0RBVEEFX0RBVEEEREFUQQZf
U1lNUEIEREFUQQVfU1lNUAREQVRBBl9TWU1QRQREQVRBBl9DT05TVAVDT05TVARfTVNHA01TRwdf
QkVHQlNTBkJFR0JTUwRfQlNTA0JTUwdfRU5EQlNTBkVOREJTUwZER1JPVVAQmAcAQE4AAgMBzZgH
AEgAAAQFAQ+YBwBoAAAGBwHrmAcAYFAACAkBn5gHAGgAAAoLAeOYBwBoAAAMDQHfmAcASAAADg8B
+5gHAEgAABARAfeYBwBICAASEwHrmAcASAAAFBUB75gHAEgAABYXAeuYBwAoAAAYGQEHmAcASAAA
GhsB45gHAEgAABwdAd+YBwBIAAAeHwHbiAcAwMpQAAAAl5oIACD/CP8J/womjFQACEVSUk9SU1lT
AAVJU1pJUAAHTVNHU1RPUAAIX19sdGFibGUACl9fUExBTktUT04ACl9fYWNydHVzZWQACURJU1BC
RUdJTgAKQ0xJUFBFUjUzMADsiAoAgJ9DTElQUEVSQIgJAICfRVhURU5EiIgLAICfVEVSTUlOQUzy
iAkAgJ9EQkZOVFiKoFIAAQAAuBYAuwAAU7sAAFMOUJoAAAAAg8QIyyoAACoIABMDAAELUHJ1ZWJh
cy56aXAAKQEAGxIAKgkAEwQAAQZFcyB6aXAAJwEAKgwAe3keAABgnZwFAMQBVAFFnAUAyARUBDuc
BQDECFQEO5wFAMwOVgUqoFQABAAAAAAAAAAAAAAAAAAAAAAAAE1BSU4AAAAAAAAAAAAAAABFUlJP
UlNZUwAAAAAAAAAASVNaSVAAAAAAAAAAAAAAAE1TR1NUT1AAAAAAAAAAAACenAcAzBxQAQAAJJwF
AMwsVgEQnAUAzDxWAv+cBQDMTFYD7qAMAAkAAAAAAABQAAAA+5wFAMwAVAQ7kAsAAAEETUFJTgAA
ADuKAgAAdA==
Mi abuelo decía: Los aviones vuelan porque Dios quiere, y los helicópteros ni Dios sabe porque vuelan.
FWH 16.02, xHarbour 1.2.3, Harbour 3.2.0, WorkShop 4.5, AJ Make 0.30, Borlan BCC 7.00, VisualStudio 2013
User avatar
JmGarcia
 
Posts: 654
Joined: Mon May 29, 2006 3:14 pm
Location: Madrid - ESPAÑA

Postby Willi Quintana » Sat Jun 02, 2007 4:06 pm

lo pruebo,
Salu2
User avatar
Willi Quintana
 
Posts: 1022
Joined: Sun Oct 09, 2005 10:41 pm
Location: Cusco - Perú


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 87 guests