Discussion :

[User]

Bonjour à tous !

Je dispose d'1 fiche principale avec les champs de ma table1

et une DBGrid lié à ma table2 (la table2 est lié a la table1 (table maitre) par le champ indexé 'Nom' ..)

Or lorsque je souhaite ajouter 1 enrg dans ma DBGrid...

J'ai le message d'erreur: L'Index est en lecture seul !

Pouvez-vous m'aider !

@+

[aliwassem]

salut

Bon est ce que vous essayez d'ajouter les donnees de l'autre Table ou non.............

[User]

Oui,

J'ajoute les donnees manuellement dans ma table2 par le DBGrid lié a la table2


et même quand j'ajoute les données avec du code j'ai le même message d'erreur:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
procedure TForm2.CommencerClick(Sender: TObject);
var
num_enrg: Integer;
 
begin
num_enrg:=Table2.RecordCount+1;
 
Table2.Insert;
Table2.FieldByName('Numero').AsInteger :=num_enrg;
Table2.FieldByName('Date_Epreuve').AsDateTime :=Date;
Table2.Post;
 
end;

et les champs indexé lié entre eux sont:

Table1 Table2

Nom -> Eleve



@+

[User]

Alors personne pour m'aider ???

[aliwassem]

Oui,

J'ajoute les donnees manuellement dans ma table2 par le DBGrid lié a la table2


et même quand j'ajoute les données avec du code j'ai le même message d'erreur:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
procedure TForm2.CommencerClick(Sender: TObject);
var
num_enrg: Integer;
 
begin
num_enrg:=Table2.RecordCount+1;
 
Table2.Insert;
Table2.FieldByName('Numero').AsInteger :=num_enrg;
Table2.FieldByName('Date_Epreuve').AsDateTime :=Date;
Table2.Post;
 
end;

@+

alors votre probleme d'utilser la methode Insert,Post je sais pas exact comment je peux trouver une soulition mais essaye d'utiliser Open Avant d'Insert...

[User]

Merci a toi !

je te tiens au courant !

@+