Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Delphi para la web
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Colaboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #2  
Antiguo 08-11-2012
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Poder: 38
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 yebabas.

Si no entiendo mal lo que buscas realizar, tenes que tomar la cadena de a dos caracteres:
Código Delphi [-]
ShowMessage(IntToStr(StrToInt('$'+'AA'))+#13#10+
            IntToStr(StrToInt('$'+'AE'))+#13#10+
            ...);

Por ejemplo, si tenes el número hexadecimal en una cadena y quisieras pasarlo a otra en formato decimal separado por un espacio:
Código Delphi [-]
function Hex2dToInt(const Hexa: string): string;
var
  i,c: Integer;
begin
  c:= 1;
  for i:= 1 to Length(Hexa) div 2 do
  begin
    Result := Result + IntToStr(StrToInt('$' + Copy(Hexa, c, 2))) + ' ';
    Inc(c, 2);
  end;
  SetLength(Result,Length(Result)-1);
end;

// Ejemplo de llamada:
procedure TForm1.Button1Click(Sender: TObject);
begin
  Memo1.Clear;
  Memo1.Text := 'AAAE3153';
  Memo1.Lines.Add(Hex2dToInt(Memo1.Text));
end;

Saludos.

Edito: Es claro que se debe convenir el uso de dos caracteres para representar un valor numérico hexadecimal.
__________________
Daniel Didriksen

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

Última edición por ecfisa fecha: 08-11-2012 a las 22:31:43.
Responder Con Cita
 



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

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Codigo Hexadecimal kdemia Varios 18 06-05-2014 12:56:48
delphi hexadecimal yevabas Varios 0 13-11-2011 00:18:33
Resta Hexadecimal ??? Ðαяισš Varios 6 15-09-2010 11:34:17
Verificar cadena es Hexadecimal yapt Varios 4 19-11-2009 16:37:51
de Hexadecimal a Decimal Carlos A Ortega Varios 1 04-08-2003 22:14:56


La franja horaria es GMT +2. Ahora son las 08:27:03.


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