Insertion dans une table TSQLTable
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 :
Code:
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; |
Avec Dbexpress j'utilise en datamodule avec TSQLConnection, TSQLDataset, DataSetProvider et Client DataSet et une table TSQLTable nomme statistique :
Code:
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; |
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
Je me tourne donc vers vous pour être aidé.
Merci.