Delphi-PRAXiS - Delphi Hex mit Dezimalzahl addieren

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)

- - Delphi Hex mit Dezimalzahl addieren (https://www.delphipraxis.net/109018-hex-mit-dezimalzahl-addieren.html)

-TheCoke-

22. Feb 2008 21:06

Hex mit Dezimalzahl addieren

Hallo!

Ich habe folgendes Problem:

Ich habe folgendes:

Delphi-Quellcode:

String4 := #$22#$20#$3E;

Wie kann ich nun z.B. den mittleren Hexwert (also $20) um 2 erhöhen, sodass ich dann den String #$22#$22#$3E hätte?

Coke

DeddyH

22. Feb 2008 21:08

Re: Hex mit Dezimalzahl addieren

Delphi-Quellcode:

			String4 := #$22#$20#$3E;

String4[2] := Ord(String4[2]) + 2;

Oder hab ich das falsch verstanden?

-TheCoke-

22. Feb 2008 21:09

Re: Hex mit Dezimalzahl addieren

Hmm .. Das würde dann aber nicht mit $09 + 1 gehen, oder? .. denn $09 + 1 sind ja $0a.

Edit: Und.. wenn ich den Code versuche bekomm ich den Fehler: Inkompatible Typen: Char und Integer.

Amateurprofi

22. Feb 2008 21:24

Re: Hex mit Dezimalzahl addieren

Zitat:

Zitat von -TheCoke-

Hmm .. Das würde dann aber nicht mit $09 + 1 gehen, oder? .. denn $09 + 1 sind ja $0a.

Edit: Und.. wenn ich den Code versuche bekomm ich den Fehler: Inkompatible Typen: Char und Integer.

Versuchs mal mit

inc(byte(string4[2]),2);

-TheCoke-

22. Feb 2008 21:30

Re: Hex mit Dezimalzahl addieren

Danke .. Das ist es :-D

inherited

22. Feb 2008 21:46

Re: Hex mit Dezimalzahl addieren

Zitat:

Zitat von -TheCoke-

Hmm .. Das würde dann aber nicht mit $09 + 1 gehen, oder? .. denn $09 + 1 sind ja $0a.

Klar würde das gehen :) Delphi macht das alles für dich.

Alle Zeitangaben in WEZ +1. Es ist jetzt 01:32 Uhr.