Discussion :

[Evilator]

Bonjour à tous , je vais essayer d'être le plus concis possible (je suis super en retard et je dois soutenir dans une semaine , donc je n'ai pas vraiment lu le règlement en ce qui concerne l'endroit adéquat ou poster ce topic)

Bref , voici mon problème


dans mon application que je réalise avec Delphi 7 ,j'ai une Form qui doit mettre à jour 3 Tables d'une Base de données Sql Server , voici les tables en question (j'ai fait la concéption en Merise)


Client (Num_Cl , Nom_Cl)
Site (Num_Site,Adresse_Site)
Habiter(Num_Site,Num_Cl,Date_Hab)




et voici une Capture d'écran des 2 forms (oui oui y'en a deux)

La 1ere (Client) est celle ou j'ouvre la Table Client , et ou on peut saisir la Clé et le nom du client, pour ensuite à l'aide du bouton "Ajouter une Adresse" (qui Post dans la Table Client , Ouvre Les Tables Site et Habiter , et les met en mode Insertion, puis ouvre une nouvelle Form "Adresse Client" , ou je pourrais saisir l'adresse du client et la date d'habitation,


Client :http://img20.imageshack.us/img20/6350/client.png
Adresse : http://img19.imageshack.us/img19/9732/adresse.png



Voila , donc mon problème se situe dans la transition entre les deux Forms , en fait quand on clique sur le bouton "Ajouter une Adresse" , les deux tables s'ouvrent en effet , et se mettent en mode insertion , mais comme sur la capture , le Dbedit "Adresse_Client" , qui est sensé être vierge vu qu'on va ajouter une nouvelle adresse , m'affiche la dernière Occurrence de la table Site , (ici le dernier enregistrement était 23 , Rue des Pig) ...

donc voila c'est assez embêtant ,j'ai essayé de mettre le .Insert dans un SpeedButton dans la form "Adresse" , et ça me libère le Dbedit , mais moi je veux qu'à l'affichage de la form , le Dbedit soit Vide et en Mode insertion , j'ai essayé de déplacer le .insert dans la procèdure "Onshow" de la form Adresse , et ça n'a rien donné , donc jusqu'a present la seule option qui marche c'est de mettre le .Insert dans un bouton dans la form , mais ça , ça ne m'arrange pas vu que je veux qu'à l'affichage de la form , les Dbedits soient tout les deux vides et en mode insertion



Merci de m'éclairer s'il vous plait , je vous en supplie , je vous en conjure , .....ainsi de suite

[Just-Soft]

Salut;

pourquoi INSERT et pas APPEND ?

[SergioMaster]

Bienvenue sur le forum !

les images c'est bien , mais le source c'est mieux
peut-on voir le onClick du bouton
et ce qu'il y a dans form2 ? Form 2 est une fenetre modale ? les tables sont déclarées dans form1 et form 2 ?

bref sans le source durdur

[Evilator]

encore désolé d'avoir oublié les sources , ce matin j'avais trop sommeil et j'étais complètement pété ,


Bref Voila l'un des codes sources que j'ai essayé

Bouton "Nouveau" (bon les tables sont dans un Datamodule , d'ou le DM.Table.... )

Code :

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

1
2
3
4
5
6
7
8
9
10
procedure TForm12.Button1Click(Sender: TObject);
begin
  with DM do
  begin
    Table2.Open;
    Table2.Insert;
 
  end;
  button1.Enabled := False;
end;

ensuite voila le code du bouton "Ajouter une Adresse"

Code :

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

1
2
3
4
5
6
7
8
9
procedure TForm12.SpeedButton1Click(Sender: TObject);
begin
With Dm Do Begin
  Table2.Post;
  Table15.Open;
  Table16.Open;
  Form13.Showmodal
  End;
end;

bref voila , c'est pas bien compliqué , mais je vois toujours pas pourquoi la table ne se met pas en insértion , et même si je la met en insertion , je veux pas que le dbedit m'affiche le dernier enregistrement de la table

[Just-Soft]

comme je te l'avais déjà recommander travaille avec Append et tu auras ce que tu demande.

[Evilator]

J'ai essayé ce que tu as dit par rapport à Append , et ça ne change rien , maintenant au lieu de m'afficher le Dernier Enregistrement de la Table Site , il m'affiche le tout premier

[SergioMaster]

c'est bien d'ouvrir les tables 15 et 16 mais , il faudrait peut-être qu'elles aussi soit en mode insertion (Append ou Insert) non ?

à moins que cela ne soit dans le onActivate de la form13 ?

Enfin tout ceci n'a rien à voir avec le BDE !