Discussion :

[tchimou]

salut à tous!
je desire encoder des données dans ma base de données; il y a des données qui ne sont encoder.
j'ai une table qui contient les données des differentes personnes (client et fournisseur)et j'ai un type qui les differencies et aussi un champ code pour faire le tri .
Voici mon code:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
procedure TContactForm.BitBtn1Click(Sender: TObject);
begin
  with DM.tbContact do
    begin
      DM.tbContact.Insert;
      DM.tbContact.Edit;
      DM.tbContactTYPECONTACT.Value:=DBeditTypCont.Text;
      DM.tbContactCODE.Value:=DBeditCode.Text;
      DM.tbContactNOMCONTACT.Value:=EditNom.Text;
      DM.tbContactPRENCONTACT.Value:=EditPrenom.Text;
      DM.tbContactADRESCONTACT.Value:=EditAdres.Text;
      DM.tbContactTELCONTACT.Value:=EditNumtel.Text;
      DM.tbContactGSMCONTACT.Value:=EditNumgsm.Text;
      DM.tbContactFAXCONTACT.Value:=EditNumfax.Text;
      DM.tbContact.Post;
      DM.tbContact.Refresh;
    end;
end;

j'ai 2 DBEdit ; un qui contient le type "Client" et il ne change pas(je lui ai donné "CLIENT").
un autre qui contient le code "C" pour client et il ne change pas(je lui ai donné "C").
et ce sont les données de ces deux DBEdit qui ne sont pas encoder dans la base de données.

[tchimou]

j'ai trouvé la réponse, il fallait juste remplacer les DBEdit par des Edit et tout était bon
Merci

[napz]

sans oublier le !!

[tchimou]

merci j'avais oublié