MLであった話題ですが。文字列をPCharにキャストした場合のポインタの生存期間の話。

ヘルプ 文字列型(Delphi)のページ内[Delphi 文字列と NULL 終端文字列の混在]の中に記述があります。
http://docwiki.embarcadero.com/RADStudio/XE3/ja/%E6%96%87%E5%AD%97%E5%88%97%E5%9E%8B

「UnicodeString 型または AnsiString 型の変数をポインタにキャストする場合は、その変数が新しい値を代入されるかスコープから外れるまで、そのポインタは有効です。他の任意の文字列式をポインタにキャストする場合、そのポインタは、型キャストが実行されるステートメント内でのみ有効です。」

変数に格納されてる文字列をキャストする場合は、その変数の生存期間又は、キャストしてから元の変数の文字列が変更されるまでが生存期間という事になります。

変数に格納されてない文字列の場合は、その文（ステートメント）の間でのみ有効って事ですね。

procedure test;
var
  S: String;
  P: PChar;
begin
  S := 'TEST';

  P := PChar(S);
  Hoge(P);       // OK
  S := S + '1';  // 以降Pは保証なし
  Hoge(P);

  Hoge(PChar('TEST'));  // OK
  P := PChar('TEST');
  Hoge(P);                    // 保証なし
end;

ちょっとだけ関連しますが、
変数に格納された文字列であっても、例えば CreateProcess() に渡す場合にはそのままではダメな場合があります。

[Delphi Unicodeワールド パートIII: コードをUnicode対応にする ]
http://edn.embarcadero.com/jp/article/38699

[Createprocess (MSDN)]
http://msdn.microsoft.com/ja-jp/library/cc429066.aspx

このパラメータで const 文字列（リテラル；文字列定数）を指定すると、この関数の Unicode 版である CreateProcessW 関数は失敗します。

　
解決方法が消えていますが、以前は UniqueString() を使う方法が提示されていました。UniqueString() では解決しないんでしょうかね？
元から書かれていないようですね。私は Stack Overflow の記事を読んだんでしたっけ…？

[Access Violation in function CreateProcess in Delphi 2009 (Stack Overflow)]
http://stackoverflow.com/questions/6705532/access-violation-in-function-createprocess-in-delphi-2009

See Also:
[UniqueString (DeocWiki)]
http://docwiki.embarcadero.com/Libraries/ja/System.UniqueString