mlamXE2
-
15 nov. 2012 à 17:27
cs_MAURICIO
Messages postés2106Date d'inscriptionmardi 10 décembre 2002StatutModérateurDernière intervention15 décembre 2014
-
15 nov. 2012 à 18:33
J'avance lentement dans mon programme de gestion de base de données MySQL en Delphi XE2. En voulant faire l'ajout
d'un enregistrement dans ma base, j'ai écrit les codes suivants mais je me suis heurté à un problème qui me depasse
pour le moment. Alors je sollicite vos aides.
procedure TForm1.Button1Click(Sender: TObject);
Var
requeteSQL:String;
Begin
SQLDataSet1.CommandText := 'select * from tableSQL';
if ClientDataSet1.Active then
ClientDataSet1.Close;
ClientDataSet1.Open;
ClientDataSet1.SetKey;
// Saisie avec Tedit
Clientdataset1.FieldByName('LeChamp').AsString:=Edit1.text;
requeteSQL:='insert into tableSQL (LeChamp) values ('+ Clientdataset1.FieldByName('LeChamp').AsString')';
SQLDataSet1.CommandText := requeteSQL;
cs_MAURICIO
Messages postés2106Date d'inscriptionmardi 10 décembre 2002StatutModérateurDernière intervention15 décembre 20145 15 nov. 2012 à 18:33
Il faut absolument prendre quelques heures afin de lire l' aide de Delphi sur les compos TClientDatset + TDatasetProvider + compos DBExpress afin d' éviter 50.000 questions sur le forum!
PS: lorsque tu auras les bases necessaires, tu pourras aditionnellement installer mes compos ici et consulter les démos (la version 5.11 arrive demain):