Discussion :

[souha2008]

je veux sauvegarder un enregistrement dans une table, j'ai des DBedit a remplir par ( nom, prenom,...) (des champs de la table) et j'ai un boutton " sauvegarder", le code de ce boutton est le suivant:

Code :

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

1
2
3
4
5
6
7
8
Table1.Edit;
Table1.Open;
table1.FieldValues['P1']:=DBEdit30.Text;
Table1.FieldValues['M2'] :=DBEdit33.Text;
Table1.FieldValues['Pr1'] :=DBEdit36.Text;
Table1.FieldValues['Pr2']:=DBEdit37.Text;
...
Table1.post;

mais ça marche pas
le message suivant est apparus: le projet a provoque une classe d'exeption, EvarionError avec le massage " conversion de type variant incorrect", processus stopée" .

[kroma23]

vos mieux etulisé des edit.text pour que ton code marche bien
code:

Code :

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

1
2
3
4
5
6
votre_table.insert;
votre_table.fieldvalues['ton_champ1']:=edit1.text;
votre_table.fieldvalues['ton_champ2']:=edit2.text;
votre_table.fieldvalues['ton_champ3']:=edit3.text;
votre_table.fieldvalues['ton_champ4']:=edit4.text;
votre_table.post;

[rsc]

Ce que dit kroma23 est vrai : si c'est pour les utiliser comme ça, autant prendre des Tedit que des TDbEdit.
Mais les DbEdit ont été créés précisément pour que la "sauvegarde" dans la base de données se fasse automatiquement : Tu places un DbEdit, tu le relies à un DataSource qui pointe vers ta table, et à un champ. Tu ajoutes si tu veux un DbNavigator qui te permettra de poster ou d'annuler, et tu n'as plus besoin de ton code.
A moins que tu n'aies un autre problème...

[bs.box]

je veux sauvegarder un enregistrement dans une table, j'ai des DBedit a remplir par ( nom, prenom,...) (des champs de la table) et j'ai un boutton " sauvegarder", le code de ce boutton est le suivant:

Code :

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

1
2
3
4
5
6
7
8
Table1.Edit;
Table1.Open;
table1.FieldValues['P1']:=DBEdit30.Text;
Table1.FieldValues['M2'] :=DBEdit33.Text;
Table1.FieldValues['Pr1'] :=DBEdit36.Text;
Table1.FieldValues['Pr2']:=DBEdit37.Text;
...
Table1.post;

mais ça marche pas
le message suivant est apparus: le projet a provoque une classe d'exeption, EvarionError avec le massage " conversion de type variant incorrect", processus stopée" .

Si vous utilisé des DBEdit liés directement à la table,
il ne te faut que de faire:

Code :

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

1
2
 
Table1.Edit; // <- sur le OnClick du botton pour activer la modification

ET

Code :

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

1
2
 
Table1.Post; // <- sur le OnClick du botton pour la sauvegarde

Enfin, si tu veux utiliser des simple "TEdit"; "TMaskEdit" alors, suit ce dernier:

Code :

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

1
2
3
4
5
6
7
8
9
 
Table1.Open;
Table1.Edit;
table1['P1']:=Edit1.Text;
Table1['M2'] :=Edit2.Text;
Table1['Pr1'] :=Edit3.Text;
Table1['Pr2']:=Edit4.Text;
Table1.Post;
Table1.Close;

Bon Courage..

[SergioMaster]

je rajouterais qu'il faut toujours faire attention au type de données
si P1 est un champ numérique
ceci :
table1.FieldValues['P1']:=Edit30.Text;
risque beaucoup de ne pas fonctionner correctement
table1.FieldValues['P1'].asInteger:=StrToInt(Edit30.Text); oui en espérant que edit30.text ne contienne que des chiffres

UN BON 'TYPAGE' DES DONNEES EVITE SOUVENT BIEN DES PROBLEMES