String to Hex

[Delphi-Phil]

Wie kann ich einen String in Delphi in ein Byte Arry wandeln?? Den String den ich nehmen will, hat im Hex Format 50 Zeichen.

Also wie mache ich das zur Laufzeit??

[Klaus01]

Hallo Phil,

ih bin noch nicht ganz dahinter gestiegen was Du machen willst?

'12345' -> [1,2,3,4,5]; strToInt
oder
'12345' -> [31,32,33,34,35] {ord(s[i]);} ord
oder
'ab1f44' ->[$ab,$1f,$44]

Grüße
Klaus

[sx2008]

Glasskugel raushol.... :glaskugel:

Delphi-Quellcode:

var
  s : AnsiString;
  daten : array[0..49] of Byte;
  len : integer;
begin
  s := 'ein String mit 50 Zeichenein String mit 50 Zeichen';

  // Sicherheitsmassnahmen, damit der String nicht länger als array ist
  s := Copy(s, 1, sizeof(daten));
 
  // vom String ins Array kopieren
  Move(s[1], daten[0], Length(s));

Bei Verwendung von Move() muss man saumässig aufpassen, damit man keinen Speicher zerschiest.

[Wolfgang Mix]

@Delphi-Phil

Genauere Fragestellung wäre nett.
Was hast Du und was willst Du als Ergebnis?

Mach 'mal ein Beispiel

Gruß

Wolfgang