Hex-Werte an String hängen

[Caleb]

Hallo,

ich steh irgendwie grad vor einem Denkproblem ...

Kann mir jemand erklären wie ich Hex-Werte an ein String dranhängen kann?

So funktionierts schonmal nicht =/

Delphi-Quellcode:

procedure TForm1.foo;
var
  Temp:String;
begin
  Temp := 'W' + $03 + $F9 + $A7;
end;

Mir auch schon irgendwie einleuchtend warums der Compiler nicht zulässt, aber wie löst man denn das Problem?

[Luckie]

Was soll denn da bitte bei rauskommen? Was sind das für Hexadezimalwerte? Oder suchst du die Funktion Chr?

[DeddyH]

[klugscheiß]Und genau genommen gibt es keine Hex-Werte, sondern höchstens eine hexadezimale Zahlendarstellung.[/klugscheiß]

[Neutral General]

@Luckie: Schätze schon.

Entweder (wie Luckie sagte) mit Chr() oder mit einem # vor der Zahl:

Delphi-Quellcode:

procedure TForm1.foo;
var
  Temp:String;
begin
  Temp := 'W' + Chr($03) + Chr($F9) + Chr($A7);
end;

procedure TForm1.foo;
var
  Temp:String;
begin
  Temp := 'W' + #$03 + #$F9 + #$A7;
end;

[himitsu]

Zitat von Luckie:

Oder suchst du die Funktion Chr?

oder die Raute

s := 'abc' + Chr(123) + Chr($7B) + #123 + #$7B; ,

wobei die Raute noch mehr hann

s := 'abc'#123#$7B; .


[edit]
Ohh, wo kommt denn der General plötzlich her

[p80286]

Noch ne Möglichkeit aber vielleicht nicht das was gewünscht war:

Delphi-Quellcode:

procedure TForm1.foo;
var
  Temp:String;
begin
  Temp := 'W' + InttoHex($03,2) + InttoHex($F9,2) + InttoHex($A7,2);
end;

Gruß
K-H

[Caleb]

Alles klar, sieht soweit ganz gut aus =)
Ich lese aber eine Zahl über ein Edit-Feld ein ... die unter Umständen größer als 255 sein kann ...

Mit dem IntToHex(Variable,4) kann ich die eingelesene Zahl ja auf feste 16bit klammern, oder nicht?

Und jetzt müsste ich doch bestimmt das Datenwort in 2x8Byte aufteilen ... und dann mit chr() rüberbügeln?
Kann man das so machen?

[DeddyH]

Ich habe immer noch nicht ganz verinnerlicht, was Du machen willst. Soll das Zeichen, das dem ASCII-Code der Zahl entspricht, an den String angehangen werden (bei Zahlen > 255 dann eben mehrere)?

[Caleb]

User-Eingabe 1 : 1000 //defintiv größer als 256
User-Eingabe 2 : 30 //defintiv kleiner als 256

<User-Ei.1> <User-Ei.2>
= 1000 = 30
--> String für Gerät: 'W' + $03 + $E8 + $48
--> mit chr() 'W' + ^C + è + 0

So damit ich den String senden kann ... weil diese dumme CPort-Komponente nur Strings haben will.
So erschien es mir am plausibelsten ... oder?

[DeddyH]

Das wird aber blöde, wenn da zufällig eine 0 umgewandelt wird, da der String danach abgeschnitten wird. Allerdings habe ich gerade auch keine rechte Idee, wie man so etwas dann sicher übermitteln soll.