Das war mir klar, ich wusste nur nicht genau wie ich an die Anfangsposition komme, aber jetzt hab ich es:
Delphi-Quellcode:
var
s:string;
p:pchar;
begin
s:='hallo';
p:=pointer(s);
writeln(p-@pointer(s)^+1); //hier soll 1 für das 1. Zeichen, auf das p zeigt, ausgegeben werden
inc(p,2);
writeln(p-@pointer(s)^+1); //hier soll 3 für das 3. Zeichen, auf das p zeigt, ausgegeben werden
end;
Ist das denn sicher, also funktioniert das immer, auch mit
Unicode und sehr langen Strings?