STRING => Hex

[ChrisH90]

Hallo alle miteinander. Habe folgendes Prob. Ein Barcodescanner erstellt eine Textdatei in der ich alle Angaben und Werte finden kann. Ich habe den ganzen Text zeilenweise ausgelesen und möchte nun die werte über einen copy Befehl einzeln raussuchen und in ein neues Textfile schreiben. Leider stehen die Zahlen jedoch alle in Hex dort und da kennt sich nun wieder keiner aus. Es gibt keine Umwandlung von String in Hex und dann von Hex in Integer. Das brauche ich aber. Weis jemand Rat???

So und noch mehr sieht das aus: $D020202$X03E8....

Dabei ist allerdings $D bzw $X nur ein Trenn- und Bezeichnungskürzel.

[sakura]

Mit einem kleinen Trick kannst Du StrToInt nutzen. (Das hätte auch die DP Suche Dir verraten)

Delphi-Quellcode:

IntegerWert := StrToInt('$ABCD0123');

Du musst nur ein '$' vor den Hex-String setzen ;-)

...:cat:...

[ChrisH90]

Ihr seit genial. Ich habe zwar gesucht, hab aber nichts gefunden. Danke jedenfalls!!!

[ChrisH90]

Rückmeldung '$' ist kein gültiger Integerwert

[ChrisH90]

Mein Befehl lautete:
Buffer:= '$'+copy(ComText_String,43,6);

[sakura]

Mach doch mal eine Überprüfung, was in Buffer steht... Ich denke mal, daß die Werte (43 u. 6) falsch sind.

Delphi-Quellcode:

  Buffer:= '$'+copy(ComText_String,43,6);
  ShowMessage(Buffer);

...:cat:...

[ChrisH90]

OK es war ein Problem wenn nur nullen drinstehen. Dann kann der Befehl nix lesen. Ich mache jetzt StrToIntDef und lass dann 0 reinschreiben. Dann funktioniert es. Danke!