|
(Moderator)
Registriert seit: 6. Mai 2005
Ort: Berlin
4.956 Beiträge
Delphi 2007 Enterprise
|
Re: Pointer addieren
7. Mär 2010, 09:29
Delphi-Quellcode:
Var
MyPointer : Pointer;
MyCharPointer : ^Char;
MyIntPointer : ^Integer;
Begin
MyPointer := Pointer (Integer (MyPointer) + 1);
Inc (MyCharPointer); // Zeigt auf nächstes Element ( = +1)
Inc (MyIntPointer); // Zeigt auf nächstes Element ( = +4)
"Wenn ist das Nunstruck git und Slotermeyer? Ja! Beiherhund das Oder die Flipperwaldt gersput!"
(Monty Python "Joke Warefare")
|