Bonjour
j'ai fait le code suivant mais j'ai oublier quoi mettre dans la requette sql du ibquery.
merci de m'aider
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 procedure Tajoutclient.BconfirmajoutclientClick(Sender: TObject); begin DM.IBQajoutclient.Active:=false; DM.IBQajoutclient.SQL.Add('insert into client values(.................)'); DM.IBQajoutclient.ParamByName('nom').AsString:=editnomclient.text; DM.IBQajoutclient.ParamByName('prenom').AsString:=editprenomclient.text; DM.IBQajoutclient.ParamByName('adresse').AsString:=editadresseclient.text; DM.IBQajoutclient.ParamByName('tel').AsString:=edittelclient.text; DM.IBQajoutclient.ParamByName('fax').AsString:=editfaxclient.text; DM.IBQajoutclient.ParamByName('gsm').AsString:=editgsmclient.text; DM.IBQajoutclient.ParamByName('email').AsString:=editemailclient.text; DM.IBQajoutclient.ParamByName('codeclient').AsString:=editcodeclient.text; DM.IBQajoutclient.Active:=true; end;
Partager