adotable1.open
adoTable1.First; //保持加入的记录以时间的降序排列
adoTable1.Insert; //添加一个空白记录
adoTable1.FieldByName('Cus_Serial').AsString:=Edit_Serial.Text;
adoTable1.FieldByName('Cus_Lock').AsString:=Edit_Hard.Text;
adoTable1.FieldByName('Cus_Key').AsString:=Edit_Key.Text;
adoTable1.FieldByName('Cus_Name').AsString:=Edit_CusName.Text;
adoTable1.FieldByName('Cus_Edition').AsString:=Edit_Edition.Text;
adoTable1.FieldByName('Cus_Addr').AsString:=Edit_CusAddr.Text;
adoTable1.FieldByName('Cus_Contract').AsString:=Comb_Contract.Text;
adoTable1.FieldByName('Cus_Operator').AsString:=Form2.Comb
perator.text;
adoTable1.FieldByName('Cus_Ratifier').AsString:=Comb_Ratifier.Text;
adoTable1.FieldByName('Cus_Factor').AsString:=Comb_Factor.Text;
adoTable1.FieldByName('Cus_Date').AsString:=DateTimeToStr(Now);
adoTable1.FieldByName('Cus_Type').AsString:=Comb_Type.Text;
adoTable1.FieldByName('Cus_Phone').AsString:=Edit_Phone.Text;
adoTable1.FieldByName('Cus_Linkman').AsString:=Edit_Link.Text;
adoTable1.Post ;
table和adotable对于上面代码一样的,你换一下就行了
实在不行 你就写sql语句吧