Update qstring.pas