Thema: Delphi PChar Zeichen Index

Einzelnen Beitrag anzeigen

luke2

Registriert seit: 17. Jun 2009
117 Beiträge
 
#1

PChar Zeichen Index

  Alt 29. Mai 2012, 21:55
Delphi-Version: XE2
Hi,

gibt es eine sichere Methode den Zeichenindex eines PChars zu erhalten?

Beispiel:
Delphi-Quellcode:
var
  s:string;
  p:pchar;
begin
  s:='hallo';
  p:=pointer(s);
  writeln(integer(p)); //hier soll 1 für das 1. Zeichen, auf das p zeigt, ausgegeben werden
  inc(p,2);
  writeln(integer(p)); //hier soll 3 für das 3. Zeichen, auf das p zeigt, ausgegeben werden
end;
  Mit Zitat antworten Zitat