|
——此文章摘自《Delphi 数据库开发经典案例解析》定价￥特价￥购买>>http://tracklinktechcn/?m_id=dangdang&a_id=A&l=&l_type= width= height= border= nosave> 主需求计划和主生产计划窗体相似之处非常多它们的很多代码都是非常相似的只不过所操作的数据表由主需求计划改为了主生产计划这样只需要对主需求计划维护窗体的时间处理代码做少许修改即可达到目的 () 下面给出主生产计划窗体事件处理程序的代码请读者参考主需求计划窗体时间处理程序的代码加以理解并特别注意其中的不同之处 uses MainFormChooseForm; {$R *dfm} //下一条记录 procedure TMainProduceBitBtnClick(Sender: TObject); begin datasourceDataSetNext; end; //上一条记录 procedure TMainProduceBitBtnClick(Sender: TObject); begin datasourceDataSetPrior; end; //首条记录 procedure TMainProduceBitBtnClick(Sender: TObject); begin datasourceDataSetFirst; end; //末条记录 procedure TMainProduceBitBtnClick(Sender: TObject); begin datasourceDataSetLast; end; //关闭窗体 procedure TMainProduceFormClose(Sender: TObject; var Action: TCloseAction); begin action:=cafree; end; procedure TMainProduceBitBtnClick(Sender: TObject); begin close; end; //查询数据 procedure TMainProduceBitBtnClick(Sender: TObject); begin adoqueryClose; adoquerySQLClear; adoquerySQLAdd(select * from 主生产计划 where (物料编号 like %+editText+%)and); adoquerySQLAdd((年份 like %+editText+%)and(计划期 like %+editText+%)); adoqueryOpen; editClear; editClear; editClear; end; right>[http://developcsaicn/delphi/htm>] [] [http://developcsaicn/delphi/htm>] [http://developcsaicn/delphi/htm>] [http://developcsaicn/delphi/htm>] [http://developcsaicn/delphi/htm>] [http://developcsaicn/delphi/htm>] |
