PChar als string übergeben?

[xZise]

Hallo ihr,
ich habe folgendes Problem.
Und zwar habe ich eine Funktion die einen string annimmt. Allerdings kann ich dieser Funktion keinem PChar übergeben:

Delphi-Quellcode:

procedure Proc1(S : PChar);
begin
  Proc2(S);
end;

procedure Proc2(S : string);
begin
  [...]
end;

MfG
xZise