G
ginsong
Unregistered / Unconfirmed
GUEST, unregistred user!
SQL数据添加后
然后修改某个字段的字段的数值。系统提示:“缺少更新或刷新的健列信息”原程序如下:
procedure Tfmfout.BitBtn4Click(Sender: TObject);
begin
if datamodule1.omianfu.FieldByName('q_check').AsBoolean=true then begin showmessage('对不起!该条记录已审核,不能编辑或删除。'); exit end;
if datamodule1.key.FieldByName('c_power8').AsBoolean=datamodule1.omianfu.FieldByName('q_sort').AsBoolean then
begin
datamodule1.omianfu.Edit;
datamodule1.omianfu.FieldByName('q_check').AsBoolean:=true;
datamodule1.omianfu.post;
onchangvv; //修改实收数量
end;
end;
然后修改某个字段的字段的数值。系统提示:“缺少更新或刷新的健列信息”原程序如下:
procedure Tfmfout.BitBtn4Click(Sender: TObject);
begin
if datamodule1.omianfu.FieldByName('q_check').AsBoolean=true then begin showmessage('对不起!该条记录已审核,不能编辑或删除。'); exit end;
if datamodule1.key.FieldByName('c_power8').AsBoolean=datamodule1.omianfu.FieldByName('q_sort').AsBoolean then
begin
datamodule1.omianfu.Edit;
datamodule1.omianfu.FieldByName('q_check').AsBoolean:=true;
datamodule1.omianfu.post;
onchangvv; //修改实收数量
end;
end;