Strings adieren

[abi]

Hallo
ich möchte zwei Zahlen adieren.

Die eine ist eine Hex zahl, des halb hab ich einen String genommen.

Die andere ist eine Integer Variable.

Jetzt wollte ich ich einfach, diese beiden Zahlen adieren.

Wenn ich jetzt:

Code:

procedure TFormCanOpen.Antwort(Sender: TObject);
var zahl : String;
begin
 zahl = '580' + IntToStr(Knotennummer);
end;

Knotennummer ist 33.
Jetzt bekomme ich als ergebnis. "58033" und nicht wie ich möchte. "1A1"

Muss ich vielleicht erst alles als Integer zusammen zählen und dann umwandeln.

ciao
abi

[Sharky]

Hai abi,

versuche es mal so:

Code:

procedure TFormCanOpen.Antwort(Sender: TObject);
var zahl : String;
begin
 zahl = IntToStr(StrToInt ('$580') + Knotennummer);
end;

[GuenterS]

ganz genau. Zuerst Umwandeln und dann addieren, so verbindest Du nur die Strings wie du eh schon gesehen hast.

[abi]

Ok, dann wandle ich erst um.
Danke nochmal.
Es ist doch immer wieder schön wenn man merkt, das man was verstanden hat.

Ciao
abi

[Stevie]

Delphi-Quellcode:

procedure TFormCanOpen.Antwort(Sender: TObject); 
var zahl : String; 
begin 
 zahl := IntToHex(StrToInt('$' + '580') + Knotennummer, 4);
end;

P.S.:
0x580 --> 1408
1408 + 33 = 1441
1441 --> 0x5a1 und nicht 0x1a1 :zwinker:

:wall: Zu lahm!

[abi]

Hallo Steve
hast recht, hab mich verschrieben.

[Stevie]

[total off-topic]

Zitat:

Zitat von abi

Hallo Steve
hast recht, hab mich verschrieben.

Schon wieder! :mrgreen: :mrgreen:
Steve <> Stevie
[/total off-topic]
P.S.: Schlaue Katze!!! :love:

[sakura]

OFF-TOPIC: @Stevie Mach mal ein Zitat und schaue Dir meine schönen Links an :mrgreen:

Zitat:

Zitat von Stevie

Steve <> Stevie

Steve
Stevie

...:cat:...

[abi]

Oh des war echt keine Absicht. :oops:

Sorry Stevie