站内搜索：

Delphi汽车销售系统(程序下载)(7)

来源：xiaoniu168.com 作者：本站原创添加时间：2014-10-25 点击数：31898

计算机毕业设计汽车类别设置模块介绍：

以下是引用片段：

汽车类别设置核心代码：
procedure TfrmSplb.SpeedButtonSaveClick(Sender: TObject);
begin
self.adotmp.Connection:=frmmain.ADOConnection1;
self.adotmp.CommandText:='select * from 汽车类别 where 类别代码='+ trim(edit1.Text) +'';

self.AdoTmp.Active:=true;
if self.adotmp.Recordset.RecordCount<=0 then
begin
self.ADOCommand1.CommandText:='insert into 汽车类别(类别代码,类别名称) values(:V类

别代码,:V类别名称)';
   end
else
   begin
      self.ADOCommand1.CommandText:='update 汽车类别 set 类别名称=:V类别名称 where 类别代码=:V类别代码';
end;
   self.ADOCommand1.Parameters.ParamByName('V类别代码').Value:=edit1.Text ;
   self.ADOCommand1.Parameters.ParamByName('V类别名称').Value:=edit2.Text ;
   self.ADOCommand1.Execute;
   self.adotmp.Close ;

SpeedButtonAddClick(Sender);
end;

〖资料来源:计算机毕业论文 www.xiaoniu168.com〗

第8页为计算机毕业论文采购模块介绍......