Discussion :

[king of pro]

Bonjour

Comment utiliser la requette (insert into ....)pour un boutton d' insertion avec les DBEdits???????????????

[NABIL74]

bienvenu sur le forum.

Bonjour

Comment utiliser la requette (insert into ....)pour un boutton d' insertion avec les DBEdits???????????????

voici un exemple parmi d'autres pour utiliser "INSERT INTO":

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
procedure TForm1.Button1Click(Sender: TObject);
 begin
With Query1 do
  begin
    SQL.Clear;
    SQL.Add('INSERT INTO ta Table (ton champ)');
    SQL.Add('VALUES (:ton champ)');
    ParamByName('ton champ').AsString := Edit1.Text;
    ExecSQL;
  end;
   end;

Si tu as plusieurs champs,tu peux les ajouter comme ça:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
With Query1 do
  begin
    SQL.Clear;
SQL.Add('INSERT INTO ta TABLE (champ1, champ2, champ3)');
ParamByName('champ1').AsString := Edit1.Text;
ParamByName('champ2').AsString := Edit2.Text;
ParamByName('champ3').AsString := Edit3.Text;
 ExecSQL;
  end;
end;

bon développement

NABIL74

[evarisnea]

et bienvenue sur le forum

Bonjour

Comment utiliser la requette (insert into ....)pour un boutton d' insertion avec les DBEdits???????????????

si tu utilises des TEdits, la réponse de NABIL74 devrait te convenir. mais si c'est des TDBEdits, alors tu n'as pas grand chose à faire, puisque c'est le dataset sous-jacent qui se charge de faire la requette INSERT INTO pour insérer un enregistrement. tu n'as qu'à appeler la méthode Insert, remplir les zones d'édition et appeler la méthode Post du dataset pour valider.