Bonjour à tous,
Je suis en train de migrer mes application vers Dbexpress. J'ai lu quelques tutoriels et fait des recherches mais je n'ai pas encore trouvé une solution à mon problème.
Voici comment je faisais en BDE :
Avec Dbexpress j'utilise en datamodule avec TSQLConnection, TSQLDataset, DataSetProvider et Client DataSet et une table TSQLTable nomme statistique :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 Statistique.Append; Statistique.Edit; Statistique.FieldByName('PO_SECTION').Value := Edit1.Text; Statistique.FieldByName('ST_NB_15').Value := Edit4.Text; Statistique.FieldByName('ST_NB_30').Value := Edit5.Text; Statistique.FieldByName('ST_NB_NULL').Value := Edit6.Text; Statistique.FieldByName('ST_DATE_SAISIE').Value := Date; Statistique.FieldByName('ST_NB_H_30').Value := Edit8.Text; Statistique.FieldByName('ST_NB_H_1H').Value := Edit9.Text; Statistique.FieldByName('ST_NB_H_HH').Value := Edit10.Text; Statistique.Post;
Voici l'erreur : Cannot modify a read-only dataset. Cela veut que ma dataset est en lecture seul. J'ai chercher ou je peux corriger cela en vain. J'utilise Delphi 7
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 DataModule2.Statistique.Append; DataModule2.Statistique.Edit; DataModule2.Statistique.FieldByName('PO_SECTION').Value := Edit1.Text; DataModule2.Statistique.FieldByName('ST_NB_15').Value := Edit4.Text; DataModule2.Statistique.FieldByName('ST_NB_30').Value := Edit5.Text; DataModule2.Statistique.FieldByName('ST_NB_NULL').Value := Edit6.Text; DataModule2.Statistique.FieldByName('ST_DATE_SAISIE').Value := Date; DataModule2.Statistique.FieldByName('ST_NB_H_30').Value := Edit8.Text; DataModule2.Statistique.FieldByName('ST_NB_H_1H').Value := Edit9.Text; DataModule2.Statistique.FieldByName('ST_NB_H_HH').Value := Edit10.Text; DataModule2.Statistique.Post;
Je me tourne donc vers vous pour être aidé.
Merci.
Partager