问题:编译器遇到了一个未知错误,请求解决~
描述:

SQLDELPHIDataSet

调试运行这个程序时,点击调用其中一个窗体,程序立即终止,提示:编译器遇到一个未知错误。
后经自己的查找,发现出现问题的代码如下:
procedure TinForm.FormShow(Sender: TObject);
begin
  with self.SimpleDataSet1 do
  begin
    SimpleDataSet1.Active:=false;
    SimpleDataSet1.DataSet.CommandText:='select wint.orderid,it.productname,sut.suppliername,wint.model,wint.unit,wint.unitprice,wint.amount,stt.storagename,wint.cost,wint.username,wint.indate,wint.remark '+' from warehousein_table wint,inventory_table it,supplier_table sut,storage_table stt  where wint.productid=it.productid and wint.supplierid=sut.supplierid and wint.storageid=stt.storageid';
    SimpleDataSet1.Active:=true;
  end;
end;

CommandText的SQL语句已经超出了Delphi的String类型所能承受的255个长度的范围,所以我用了多个‘+’来连接。然而并没有什么卵用,问题依然存在。
当然,以上这段SQL语句是没有问题的,已在IB Expert得到验证。
当我将这段SQL语句换了一个简单的‘select * from user_table’后,程序成功运行。当然被替换的SQL语句无法发挥我设定的功能。
在此请问各位,该未知错误应如何解决?

上一篇参数类型定义
下一篇DELPHI movefile函数的一个疑问
明星图片
相关文章
《编译器遇到了一个未知错误,请求解决~》由码蚁之家搜集整理于网络,
联系邮箱:mxgf168#qq.com(#改为@)