Wie wandle ich einen String in ein TXSString um?

[Sir Rufo]

Hier ein wenig Code

Delphi-Quellcode:

procedure TfrmViewMain.Button1Click( Sender : TObject );
var
  xint :  TXSInteger;
  xstr :  TXSString;
  xbool : TXSBoolean;
begin
  xint := TXSInteger.Create;
  try
    xint.AsInteger := 20; // Wert zuweisen
    ShowValue( xint );
  finally
    xint.Free;
  end;

  xbool := TXSBoolean.Create;
  try
    xbool.AsBoolean := True; // Wert zuweisen
    ShowValue( xbool );
  finally
    xbool.Free;
  end;

  xstr := TXSString.Create;
  try
    xstr.XSToNative( 'hallo' ); // Wert zuweisen =:o)
    ShowValue( xstr );
  finally
    xstr.Free;
  end;
end;

procedure TfrmViewMain.ShowValue( Value : TRemotableXS );
begin
  ShowMessage( Value.NativeToXS );
end;

Man könnte fast meinen, dass bei TXSString die Property AsString fehlt.