PWideChar im Strem speichern, wie geht das?

[Alter Mann]

Hi,

wie kann ich einen PWideChar-Wert in einem Strem speichern?

Ich habe hier schon alles mögliche gelesen und versucht, es kommt immer
zu dem gleichen Ergebnis: Es wird nur der erste Buchstabe geschrieben.

Delphi-Quellcode:

...
var
  FFileName : PWideChar;
  FFileNameLength : Word;
...
FFileNameLength  := Length(FFileName);
...
Write( FFileName^, FFileNameLength );
Write( FFileName[1], FFileNameLength );
Write( Pointer(FFileName)^, FFileNameLength );
...

Wie müsste es richtig sein?

Gruß

Alter Mann