Forum: Object-Pascal / Delphi-Language
Delphi
by endeffects,
24. Jun 2008
so nun hab ich es doch tatsächlich noch hinbekommen:
function StringtoHex(Data: string): string;
var
i, i2: Integer;
s: string;
begin
i2 := 1;
for i := 1 to Length(Data) do
Forum: Object-Pascal / Delphi-Language
Delphi
by endeffects,
24. Jun 2008
nun hab ich leider irgendwie den anschluss verloren,
ich hatte ja gehofft das es recht einfach möglich ist
diesen 4 byte string so umzuwandeln das ich über StrToInt($...)
irgendwie an diesen wert komme
Forum: Object-Pascal / Delphi-Language
Delphi
by endeffects,
24. Jun 2008
der server möchte aber diese challange nummer als string haben,
es reicht leider nicht einfach die bytes umzudrehen und zurückzusenden
Forum: Object-Pascal / Delphi-Language
Delphi
by endeffects,
24. Jun 2008
ja entschuldigung, vielleicht drück ich mich auch etwas schwerfällig aus :D
also ich möcht eine antwort von einem udp server auswerten und reagieren,
in der dokumentation heißt es wie folgt:
aus dem string den mir der server sendet extrahiere ich also die letzten 4 zeichen.
weiter gehts dann mit:
Forum: Object-Pascal / Delphi-Language
Delphi
by endeffects,
24. Jun 2008
nein ich meine wenn ich keinen hex wert habe sondern lediglich einen string:
var s: String;
begin
showmessage(IntToStr(LongInt($4FDD2F96))); //>> 1339895702
s:= Chr(StrToInt('$4F')) + Chr(StrToInt('$DD')) + Chr(StrToInt('$2F')) + Chr(StrToInt('$96'));
showmessage(s);
Forum: Object-Pascal / Delphi-Language
Delphi
by endeffects,
24. Jun 2008
Hallo,
ich hab ein Problem mit der Umwandlung von Typen.
Und zwar möchte ich den Wert 0x4FDD2F96 umwandeln
in 1339895702. D.h. irgendwie muss ich den Hexwert
in einen String umwandeln und dann aus jedem Zeichen
des Strings einen Integerwert bilden.
Ich hab es schon wie folgt probiert: