Delphi汽车销售系统(程序下载)(7)
来源：xiaoniu168.com
作者：本站原创
添加时间：2014-10-25
点击数：31843
计算机毕业设计汽车类别设置模块介绍：
以下是引用片段： 汽车类别设置核心代码：
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页为计算机毕业论文采购模块介绍......