写成
Query.sql.add('select money from lizhi where money =:a');
Query.ParamByName('a').AsString:='6555';