主生产计划维护功能的实现[5]

发布日期：2021/5/5

——此文章摘自《Delphi 数据库开发经典案例解析》定价￥特价￥购买>>

bitbtnEnabled:=false;

//打开保存和取消按钮的使能允许保存或者取消

bitbtnEnabled:=true;

//将两个浏览按钮使能打开

bitbtnEnabled:=true;

//必须用保存按钮才能提交

dbgridEnabled:=false;

//允许对需求数量和备注进行修改

dbeditReadOnly:=false;

dbmemoReadOnly:=false;

end;

//保存记录

procedure TMainProduceBitBtnClick(Sender: TObject);

begin

datasourceDataSetPost;

//将插入删除修改和移动按钮打开

bitbtnEnabled:=true;

//关闭保存和取消按钮的使能

bitbtnEnabled:=false;

//将两个浏览按钮使能关闭

bitbtnEnabled:=false;

//恢复dbgrid的选取功能

dbgridEnabled:=true;

//恢复dbedit的只读属性

dbeditReadOnly:=true;

dbmemoReadOnly:=true;

//刷新数据

adoqueryActive:=false;

adoqueryActive:=true;

end;

[] [] [] [] [] [] []