T
tssdnr
Unregistered / Unconfirmed
GUEST, unregistred user!
菜鸟提问:把一个输入窗口的内容插入到表中 Query2.Close; Query2.SQL.Clear; sqlstr:='Insert into patient(P_Name,P_Sex,P_Tel,P_Email,P_Age,P_Addr, ' + 'P_Depart,P_BedNo,P_HosNo,P_IDCard) ' + 'valuesa,:b,:c,:d,:e,:f,:g,:h,:j,:k)'; Query2.ParamByName('a').AsString:=trim(E_PName.Text); Query2.ParamByName('b').AsString:=trim(E_PSex.Text); Query2.ParamByName('c').AsString:=trim(E_PPhone.Text); Query2.ParamByName('d').AsString:=trim(E_PEmail.Text); Query2.ParamByName('e').AsString:=trim(E_PAge.Text); Query2.ParamByName('f').AsString:=trim(E_PAddr.Text); Query2.ParamByName('g').AsString:=trim(E_PRoom.Text); Query2.ParamByName('h').AsString:=trim(E_PBed.Text); Query2.ParamByName('j').AsString:=trim(E_HosNo.Text); Query2.ParamByName('k').AsString:=trim(E_PIdentityCard.Text); showmessage(sqlstr); Query2.SQL.Add(sqlstr); Query2.Open;为什么运行时总是说参数变了'a'有问题,难道要先声明