Forum: Programmieren allgemein
by Kostas,
12. Mai 2015
Eigentlich schon. Zumindest funktioniert es einwandfrei.
Wie gesagt, ich habe nach einer Delphi Möglichkeit wie StrToHex gesucht die es nicht gibt. Warum auch, mir ist schon Klar dass ein HexStr nur ein '$' vorangestellt wird. Aber irgend wie habe ich das ausgeblendet.
function HexToChar(value:string):Char;
begin
result := Chr(StrToInt('$' + value));
end;
Dankeschön und sorry.
Forum: Programmieren allgemein
by Kostas,
12. Mai 2015
Weil ich mich beeilen wollte die Antwort zu posten um Euch nicht noch mehr zu strapazieren
mit meinem Blödsinn. :-)
Forum: Programmieren allgemein
by Kostas,
12. Mai 2015
Danke danke, meine Blockade war, wie mache ich aus dem String eine Hex Zahl und habe
übersehen dass ich einfach ein $ davorsetzen muss. Der Rest ist klar.
Dankeschön
Forum: Programmieren allgemein
by Kostas,
12. Mai 2015
Verflixt noch eins das habe ich gemeint.
function HexToInt(value:string):Char;
begin
result := Chr(StrToInt('$' + value));
end;
Forum: Programmieren allgemein
by Kostas,
12. Mai 2015
Sorry für die schlechte Beschreibung.
Der String1 ändert sich natürlich. Ich müsste also eine Methode haben die aus dem String1
als Beispiel hier '000000055550' den String generiert #0#0#0#5'UP'
Immer zwei Zeichen aus dem String ergeben eine Byte. Die zwei Zeichen sind jeweils hex.
Die letzten zwei Zeichen sind somit $50 also ein "P" als Char.
Forum: Programmieren allgemein
by Kostas,
12. Mai 2015
Hallo Zusammen,
sorry ich stehe momentan auf dem Schlauch.
Ich habe eine String(12) welcher aus immer zwei Zeichen jeweils eine Hex Zahl repräsentiert.
String1 := '00 00 00 05 55 50'; (die Leerzeichen sind eigentlich nicht vorhanden)
String2 := chr($00)+chr($00)+chr($00)+chr($05)+chr($55)+chr($50);
String2 beinhaltet als Ergebnis (#0#0#0#5'UP') den richtigen String.
Wie kann ich am...