Delphi6 Personal で、
WideString から WideChar や PWideChar に変換するには、
どうしたら良いでのでしょうか？