使用ADOQuery
为什么我的程序在执行ADOQuery中的Update语句以后,半天没有反应,死在那里了。程序如下:
procedure TfrmGroupList.updateField;
var
sCmdUpdateText: String;
begin
ADQGroupList.Close;
sCmdUpdateText := 'UPDATE GROUPING SET GROUP_CD = ' + '''' + sNewGroupCd + ''''
+ ', GROUP_NAME = ' + '''' + sGroupName + ''''
+ ', GROUP_MEMO = ' + '''' + sGroupMemo + ''''
+ ' WHERE GROUP_CD = ' + '''' + sOldGroupCd + '''';
ADQGroupList.SQL.Clear;
ADQGroupList.SQL.Add(sCmdUpdateText);
ADQGroupList.ExecSQL;
end;
请帮帮忙,谢谢。