Réponse acceptée !

Bonjour,
En effet IB utilise beaucoup les implémentations
SQL, contrairement au TDATASET qui utilise la notion
Ttable.post, les
IBDATASET utilise
TIbdaset.ExexSQL.
Pour l'usage de ton
IBDATASET, tu le depose sur l'unité et tu le selectionne puis tu renseigne sa
proprité Database en selectionnant le nom de ton composant
IBDATABASE situé sur ton Datamodule.
si le nom de ta base de données n'est pas visible, tu fais
FIHIER+UTILISER UNITE et tu choisi l'unité de ton Datamodule.
Ensuite, tu fais un clic droit sur ton composant IBDATASET et tu clique sur le menu
EDIT SQL et à droit tu doule clic sur le
nom de ta table et tu met une étoile(*) après le
SELECT de la requête
(Select*From Table) +OK.Tu refais un clic droit sur le même
IBdataset + Dataset editor ou sql editor +generated SQL apres avoir cliquer sur generate sql on a:
1-Inset2-Modify/Update
3-Refrech
Tu coche l'option Insert et automatiquement il écrit la requête pour toi.
Tu copies cette requête et tu fais un clic droit sur ton I
BDATASET+EDIT SQL et tu y colle la requête+ok
Enfin tu place un bouton
ENREGISTRER et tu fais double clic sur lui pour acceder à l'editeur de code Pascal de delphi et tu y écris.
Begin
IBdataset2.Prepare;
IBdataset2.ParamByName('Codeclient').AsString:=(Edit1.Text);
IBdataset2.ParamByName('Nom').AsString:=(Edit2.Text);
IBdataset2.ParamByName('Prenoms').AsString:=(Edit3Text);
IBdataset2.ParamByName('Adresse').AsString:=(Edit4.Text);
IBdataset2.ParamByName('CNI').AsString:=(Edit5.Text);
IBdataset2.ParamByName('CS').AsString:=(Edit6Text);
IBdataset2.ParamByName('Cellulaire').AsString:=(Edit7.Text);
IBdataset2.ParamByName('Telephone').AsString:=(Edit8.Text);
IBdataset2.ParamByName('EMAIL').AsString:=(Edit9.Text);
IBdataset2.ExecSQL;
DATAMOD.TransGest.CommitRetaining;
ShowMessage('Enregistrement éffectué avec
succès'); /*
Edit1.Text:='';
Edit2.Text:=''; /*Libere le Edit après l'enregistrement*/
Edit3.Text:='';
Edit4.Text:='';
Edit5.Text:='';
Edit6.Text:='';
Edit7.Text:='';
Edit8.Text:='';
Edit9.Text:='';
Edit1.SetFocus; /*positionne le curseur sur le premier Edit aprés l'enregistrement*/
End
End;
NB: Pour enregistrer une date: .AsDate:=strToDate(Edit2.Text);
Pour enregistrer un entier: .AsInteger:=StrToInt(Edit1.text);
Pour enregistrer un reel. AsFloat:=StrToFloat(Edit3.Text);
Pour enregistre les caractères Alpha Numerique: AsString:=(Edit5.Text);
ful