StringReplace verursacht AV

[EWeiss]

Delphi-Quellcode:

var
  Txt: PWideChar;
  tmpTxt: WideString;

Txt := PWideChar(SkinEngine.GetCTLText(PDis.hwndItem));
tmpTxt := StringReplace(string(Txt), '&','', [rfReplaceAll]);

txt Rückgabe ist "Ö&ffnen"
tmpTxt soll jetzt den Char "&" entfernen aber es kracht mal wieder.

Kann nicht erkennen wo hier wieder ein Fehler sein soll.
read of address ...

gruss