Zeigerarithmetik

[Viktorii]

Hallo,

ich möchte bei einem Pointer gerne einen Offset hinzuaddieren, bekomme es aber nicht hin. So habe ich es versucht:

Delphi-Quellcode:

pDataWithOffSet := pData + (i * $10000);

Kommt leider die Fehlermeldung:

Zitat:

[Pascal Fehler] xyz.pas(340): E2015 Operator ist auf diesen Operandentyp nicht anwendbar

:(


Wie mache ich es richtig?

Vielen Dank

[Muetze1]

Benutze Increment. Beachte aber, dass die Funktion um die Größe des Pointer (bei typisierten Pointer) erhöht!

Ich gehe in deinem Beispiel mal davon aus, dass pDataWithOffset ein PByte oder PChar ist, also ein Pointer auf ein Byte.

Delphi-Quellcode:

pDataWithOffSet := pData;
Inc(pDataWithOffset,  i * $10000);

Wenn nicht, dann einfach den Wert einfach durch die Grösse deines Datentyps teilen. Also so:

Delphi-Quellcode:

pDataWithOffSet := pData;
Inc(pDataWithOffset,  (i * $10000) div sizeof(pDataWithOffset^));

[SirThornberry]

ich caste den Pointer einfach immer zu einem Cardinal denn ein Pointer ist ja nichts anderes als eine ausschließlich positive Speicheradresse.

[Muetze1]

Zitat:

Zitat von SirThornberry

ich caste den Pointer einfach immer zu einem Cardinal denn ein Pointer ist ja nichts anderes als eine ausschließlich positive Speicheradresse.

Da Casts auch immer Sicherheitsmechanismen ausser Kraft setzen, versuche ich immer den "offiziellen" Weg zu gehen. Ansonsten ist dieser Weg natürlich auch möglich.

[SirThornberry]

wohl war, die Sicherheitsmechanismen werden da außer kraft gesetzt - Aber das ist ja bei Pointerarthmetik sowieso der Fall wenn man diesen dann irgendwo hin zeigen lässt wo eigentlich nix mehr ist.

[himitsu]

bei PChar, PAnsiChar und PWideChar kann man sowas machen.

Delphi-Quellcode:

pDataWithOffSet := PAnsiChar(pData) + (i * $10000);

allerdigns wird da immer in Einheitengröße addiert

PWideChar(P) + 9 = Cardinal(P) + (2 * 9) .. da SizeOf(WideChar) = 2

also in Bezug auf Delphi 2008 PChar besser nicht verwenden (wegen Standardunterstüzung von Unicode ... PChar = PWideChar)

[Apollonius]

In Delphi 2008 soll übrigens ein Compilerschalter kommen, der Zeigerarithmetik erlaubt. Das stand in irgendeinem Codegear-Blog - dort hieß es übrigens auch, dass es ursprünglich ein Bug war, dass Inc für Zeiger funktioniert, dieser "Bug" dann aber aufgrund des Aufschreis der Beta-Tester nicht gefixt wurde.

[Muetze1]

Zitat:

Zitat von Apollonius

...dort hieß es übrigens auch, dass es ursprünglich ein Bug war, dass Inc für Zeiger
funktioniert, dieser "Bug" dann aber Aufgrund des Aufschreis der Beta-Tester nicht gefixt wurde.

Naja, sie haben es nachher auch so dokumentiert und z.T. selber so genutzt.