delphi7 中的SQL语句，求大侠看看哪有异常

delphi7 中的SQL语句，求大侠看看哪有错误
Query1.Close;
Query1.SQL.Text := 'exec p_getData '+ g_strDba01 +',''*'','+(Trim(Edit1.Text))+','+(Trim(Edit2.Text))+',''jh in('''+ComboBox1.Text+''')''';
Query1.Open;
这个调用存储过程的SQL语句。但是执行到Open就出现错误。哪不对呢？

[解决办法]
select 语句 用query1.open;
delete,update等执行语句 用 query1.execsql;

至于语句本身是否有问题，你可以将最后生成的要执行的语句贴出来看看。