Pointer to String; String to Pointer

[Satty67]

Delphi-Quellcode:

var
  s:String;
  p:pointer;
begin
  p := @s[1];
  // oder
  p := PChar(s);
  // zurück mit
  s := PChar(p);
end;