问ado控件，报错：查询过期

Question

delphi 5 用存储过程控件，执行一个存储过程（在查询分析器里要执行1分钟左右），过半分钟后提示：已超时。请问这是什么原因

Answer 1

用query执行Qry:=TQuery.Create(nil);
        Qry.DatabaseName:=Dm.Database.DatabaseName;
        Qry.SQL.Clear;
        Qry.SQL.Add('begin');
        Qry.SQL.Add('fwdb.pdt_WellGasTechData(date'''+dm.rq+''');');
        Qry.SQL.Add('end;');
        Qry.ExecSQL;

Answer 2

把ADOConnection的CommandTimeOut的值设大点

Answer 3

用adodataset把commandtimeout设大一点就ok了