CSDN - 专家门诊 - Delphi问题
回复 | 推荐 | 收藏 | 专题 | 公告 | 管理 | 关闭窗口
主 题: 将Query的RequestLive为True后,CanModify仍然为false
作 者: macro_love (如风)
等 级:
信 誉 值: 100
所属论坛: Delphi
问题点数: 20
回复次数: 0
发表时间: 2002-03-28 14:45:40
procedure TDataForm.OpenWageReportQuery(ATableName:string);
begin
WageReportQuery.Active:=FALSE;
WageReportQuery.RequestLive:=true;
WageReportQuery.DatabaseName:=WageData.DatabaseName;
WageReportQuery.SQL.Clear;
WageReportQuery.SQL.Add('select * from '+ATableName+' order by UserID');
WageReportQuery.Active:=true;
WageReportQuery.EDIT;
//flg:=WageReportQuery.CanModify;
end;
回复 | 推荐 | 收藏 | 专题 | 公告 | 管理 | 关闭窗口
主 题: 将Query的RequestLive为True后,CanModify仍然为false
作 者: macro_love (如风)
等 级:
信 誉 值: 100
所属论坛: Delphi
问题点数: 20
回复次数: 0
发表时间: 2002-03-28 14:45:40
procedure TDataForm.OpenWageReportQuery(ATableName:string);
begin
WageReportQuery.Active:=FALSE;
WageReportQuery.RequestLive:=true;
WageReportQuery.DatabaseName:=WageData.DatabaseName;
WageReportQuery.SQL.Clear;
WageReportQuery.SQL.Add('select * from '+ATableName+' order by UserID');
WageReportQuery.Active:=true;
WageReportQuery.EDIT;
//flg:=WageReportQuery.CanModify;
end;
begin
WageReportQuery.Active:=FALSE;
//WageReportQuery.RequestLive:=true;
WageReportQuery.DatabaseName:=WageData.DatabaseName;
WageReportQuery.SQL.Clear;
WageReportQuery.SQL.Add('select * from '+ATableName+' order by UserID');
WageReportQuery.Active:=true;
WageReportQuery.EDIT;
WageReportQuery.RequestLive:=true;
//把上面那条语句移到这边,试试
//flg:=WageReportQuery.CanModify;
end;