delphi输入双引号