VCL Unicode, AnsiString übergeben!

[Mavarik]

Hallo Zusammen...

Nachdem ich jetzt meine Software auf XE2 umgestellt habe, habe ich an vielen Stellen chinesische Schriftzeichen....

Das Problem liegt warscheinlich hier:

Delphi-Quellcode:

procedure TCustomMaskEditOwn.SetEditText(const Value: Ansistring);
begin
  if GetEditText <> Value then
  begin
    SetTextBuf(PChar(Value)); // <---
    CheckCursor;
  end;
end;

Wie unterdrücke ich beim Typcasten eine interpreation der Zeichen im String?
SetTextBuff erwartet nunmal eine PChar!

Mavarik