【搞定】[请求]我的SQLFilter为什么总报错**

crosbychina

在主窗体单击按钮打开子窗体，同时将主窗体的
代码如下：

1. 
   
2. procedure TMainForm.Button2Click(Sender: TObject);
   
3. var
   
4.    mxpg1:Tmxpg;
   
5.    sqldataset1:Tsqldataset;
   
6.    s:string;
   
7. begin
   
8.    mxpg1:=Tmxpg.Create(self.Context);
   
9.    s := InfoBrokerQEINFO.Info.DataSetByID('QEResultSJJ').FieldByName('PGDH').Asstring;
   
10.    sqldataset1 := TSQLDataSet(mxpg1.InfoBrokerZLNLPGTXXX.Info.DataSetByID('MXPGSJJ'));
    
11.    sqldataset1.SQL.Text := sqldataset1.SQL.Text + ' AND ZLNLPGMXB.PGXBH =' + s;
    
12.    [B]sqldataset1.SQLFilter := 'XT = 1';[/B]    s
    
13.    qldataset1.SQLFiltered := true;
    
14.    try
    
15.       mxpg1.ShowModal;
    
16.    finally
    
17.       mxpg1.Free;
    
18.    end;
    
19. end;
    

复制代码

运行到粗体部分报错如下：
---------------------------
X3 Studio
---------------------------
运行质量能力评估功能的时候发生异常：error occur during invoke getRecords method, 将 varchar 值 'BZ0101' 转换为数据类型为 int 的列时发生语法错误。

类型：Exception。
---------------------------
确定   
---------------------------



MXPGSJJ'的sql语句为：
SELECT ZLNLPGBZB.PGBZBH, ZLNLPGBZB.XSBH1, ZLNLPGBZB.XSBH2, ZLNLPGBZB.SFGJX, ZLNLPGBZB.XSNR, ZLNLPGBZB.FZ, ZLNLPGMXB.PGDH, ZLNLPGMXB.PGXBH, ZLNLPGMXB.PGDA, ZLNLPGMXB.PGDF, ZLNLPGBZB.XT,ZLNLPGBZB.XT AS XT2
  FROM ZLNLPGBZB, ZLNLPGMXB
  WHERE ZLNLPGBZB.PGBZBH = ZLNLPGMXB.PGXBH

请指教！

lisb

设置个断点把数据集的sql语句拿出来在平台外执行，看有什么错？

crosbychina

改了写法，已经解决了，结贴吧