Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Otros entornos y lenguajes > C++ Builder
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 05-10-2005
pprey pprey is offline
Registrado
 
Registrado: sep 2005
Posts: 4
Poder: 0
pprey Va por buen camino
hex

Con respecto a pasartelo a C++ lo que te envie, ahora mismo no podría pasartelo a C++ porque no tengo mucho tiempo para ello. Por lo que veo ahora tienes problemas con las FFFF con el codigo que te paso otro compañero. Pues bien creo que el problema de las FFFF es que al pasar tu el codigo a C desde delphi, quizás tengas algun problema en los bucles. Mira bien tu codigo y los loops que haces, a ver si tienes algun problema con los indices.
Si tengo un momento y mi codigo te lo puedo pasar a C++, ya te lo enviaré o bien te mando un .pas para que lo incluyas en un paquete de buider.
Responder Con Cita
  #2  
Antiguo 05-10-2005
Avatar de alt126
alt126 alt126 is offline
Miembro
 
Registrado: dic 2004
Posts: 171
Poder: 20
alt126 Va por buen camino
El codigo que se puso traducido a c++ es mas o menos este:

if(odFichero->Execute())
{
equipo = odFichero->FileName;
iFileHandle = FileOpen(odFichero->FileName, fmOpenRead);
iFileLength = FileSeek(iFileHandle,0,2);
FileSeek(iFileHandle,0,0);
Buffer = PChar(AllocMem(iFileLength + 1));
iBytesRead = FileRead(iFileHandle, Buffer, iFileLength);
FileClose(iFileHandle);
for(int i=0;i < iBytesRead-1;i++)
{
cadenahex = cadenahex + IntToHex((int)(Buffer[i]),2);
}
}
Responder Con Cita
  #3  
Antiguo 05-10-2005
Avatar de alt126
alt126 alt126 is offline
Miembro
 
Registrado: dic 2004
Posts: 171
Poder: 20
alt126 Va por buen camino
bueno, al final he conseguido que funcione...he comprobado que las FFFF esas, las ponia pq el numero que habia en buffer era negativo y al pasarlo a hexadecimal pues ponia unas cuantas FFFF y luego el par correcto. Asi que cuando el numero es negativo quito las Fs...y funciona perfect...

...Asi que la primera parte...prueba SUPERADA!!!...gracias a todos...

ahora vamos con la segunda parte...ahora es al contrario...tenemos nuestra cadena hexadecimal...y hay que pasarla a un archivo de texto normal...lo hago y lo hace todo perfectamente peroooooooooo...como ya os conte, cuando encuentra el codigo hexadecimal 0A, intenta escribir un caracter que en el archivo aparece como 2 caracteres...es decir en vez de escribir en el archivo 0A escribe 0D0A.

La prueba es que he intentado a escribir en un archivo un 10 y tachan...me hace lo mismo...0D0A.

Es decir tan simple como esto:

Cita:
archivo=fopen("1.txt","w");
fputc(10,archivo);
fclose(archivo);
si miramos el resultado con un editor hexadecimal en vez de ser 0A como deberia es 0A0D...

Alguna manera de como hacer que me escriba solo 0A????

Gracias

Un saludo

Antonio
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 06:19:52.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi