Thema: Delphi Hex Tutorial

Einzelnen Beitrag anzeigen

Muetze1
(Gast)

n/a Beiträge
 
#19

Re: Hex Tutorial

  Alt 26. Apr 2004, 15:26
Moin!

Ich quote mich immer mal wieder gerne selber für die, die nicht lesen wollen...

Zitat von Muetze1:
Willst du vielleicht aus den einzelnen Bytes die der HexCode beschreibt das ASCII Zeichen zurück haben?

Sowas:
Delphi-Quellcode:
Function GetStringFromHex(Const AHex : String): String;
Var
  i : Integer;
Begin
  Result := '';

  for i := 0 To Round(Length(AHex)/2) Do
    Result := Result + Chr( StrToInt('$' + Copy(AHex, 2*i, 2) ) );
End;
Und ausserdem kannst du den HexWert doch auch einfach in einen Ganzzahlwert umwandeln und diesen dann Byte für Byte in einen String umwandeln. Mein obiger Code macht das Zeichen für Zeichen. Wenn der obige Code nicht hinhauen sollte, dann setze entweder eine führende 0 vor dem HexString oder laufe rückwärts durch den String.

MfG
Muetze1
  Mit Zitat antworten Zitat