Passer d'une fiche à l'autre en validant les données saisiesRésolu

Question

Je travaille sur une petite interface qui consiste en un ensemble de masques de saisie pour ma base de donn&#233;es. Et j'ai deux probl&#232;mes que je n'arrive pas &#224; r&#233;gler...
1) Et bien il s'agit d'une application comprenant plrs forms dont une est la principale. Chaque form comporte un bouton "Suivant", un bouton "pr&#233;c&#233;dent" et un bouton "valider". Le bouton "valider", ins&#232;re les donn&#233;es saisies dans la BDD et passe &#224; la form suivante. Le bouton "Pr&#233;c&#233;dent" permet de revenir &#224; la page pr&#233;c&#233;dente et enfin le bonuton "suivant" permet d'aller &#224; la page suivante sans ins&#233;rer les donn&#233;es saisises.
Le bouton suivant a pour code:


fprincipale:=tfprincipale.create(self);
fprincipale.show;


Le bouton "pr&#233;c&#233;dent" a pour code :
fpage2.hide;
fprincipale.windowstate:=wsmaximized;


Le probl&#232;me est le suivant : Lorsque je saisie les donn&#233;es si je fais suivant sans valider et qu'ensuite je fais pr&#233;c&#233;dent, je retrouve mes donn&#233;es dans les champs correspondants.
Par contre si je saisie les donn&#233;es sans valider et que je vais vers une des forms pr&#233;c&#233;dentes, puis je reviens &#224; la fiche en question, les champs sont vides !!!!


Je sais que cela est du au fait que quand je reviens &#224; nouveau vers ma fiche cv'est un tform.create qui r&#233;initialise ma fiche!!!
Que me proposez vous comme lignes de code??


2) Je tiens &#224; pr&#233;ciser que mon app n'est pas une mdi (ie: il n'y a pas de fiche parent et de fiches filles, mais simplement une fiche principale et le reste sont des "fiches disponibles".
Le pb : lorsque je minimise l'application et que l'agrandis &#224; nouveau, j'ai toujours la premi&#232;re fiche qui apparait au lieu de la derni&#232;re fiche active. Il faudrait alors minimiser l'app &#224; nouveau pour avoir 
la derni&#232;re fiche! que faut il faire pour &#233;liminer ce d&#233;sagr&#233;ment??


Merci d'avoir lu ce message qui, je le reconnait, est pour le moins l'un des plus longs dans ce forum ;-)

fiorrita

cs_MAURICIO · Accepted Answer

Ce que tu peux faire c' est cr&#233;er toutes tes forms d&#232;s le d&#233;part avec le create. 
Puis tu n' as plus qu' &#224; jouer avec le Show/Hide des forms sans faire le create vu que tu as d&#233;j&#224; cr&#233;er  les forms. 
N' oublie pas de mettre la propri&#233;t&#233; Visible &#224; false dans toutes tes forms sauf la principale !!!
A+

yvemoreau · Answer

Dans les options du projet , place les fiches dans cree automatiquement, la premiere &#233;tant la fiche principale ,les autres ne seront pas visible.

Lorsque tu appelles une fiche tu peux l'appeler avec ShowModal , ce qui bloque l'acc&#232;s &#224; la fiche principale tant que la fiche n'est pas fermer.Mais &#231;a limite souvent ce que l'on souhaite faire.

dans les procedures :suivantClick et  precedentClick tu r&#233;p&#232;tes les op&#233;rations en appelant les fiches appropri&#233;es.

////////////////////////////////////////////////
var
  Form1: TForm1;
implementation
   uses unit2,unit3;
{$R *.dfm}
procedure TForm1.Menu_Ou_AutreClick(Sender: TObject);
begin
   form1.Enabled:=false;
   unit2.Form2.Show;
end;
end.
/////////////////////////////////////////////////////////
var
  Form2: TForm2;
implementation
   uses unit1,unit3;
{$R *.dfm}
procedure TForm2.PrecedentClick(Sender: TObject);
begin
   hide;
   form1.Enabled:=true;
   form1.BringToFront;
end;


procedure TForm2.SuivantClick(Sender: TObject);
begin
   hide;
   unit3.Form3.Show;
end;
end.
///////////////////////////////////////3
var
  Form3: TForm3;
implementation
   uses unit2, Unit1;
procedure TForm3.SuivantClick(Sender: TObject);
begin
   hide;
   form1.Enabled:=true;
   form1.BringToFront;
end;
procedure TForm3.PrecedentClick(Sender: TObject);
begin
   hide;
   unit2.Form2.Show;
end;
end.

yve

Fiorrita · Answer

Bonjour &#224; tous 
Je tiens tout &#224; bord &#224; vous remerciier pour avoir eu la gentillesse de me r&#233;pondre. Je vais faire comme vous le dites et je vous rendrai la r&#233;ponse :-)

Thanks a lot!!!

fiorrita

Fiorrita · Answer

Merci &#224; toi Mauriaco!! Et bien, je viens de tester ta solution et c'est effectivement la bonne. En effet, elle permet de r&#233;gler le pb1. Merci &#224; toi et bon courage.

Fiorrita

Fiorrita · Answer

Merci &#224; toi aussi 10599  yvemoreau. Ton code a permis de r&#233;gler le pb n&#176;2. Je n'ai pas utilis&#233; le shomodal car me fait des blocages. Par contre j'ai utilis&#233; les :
Form1.enabled: =false;
form2.show;

et

form2.hide;
form1.enabled:=true;
form1.bringtofront;

Merci beaucoup! Ca marche tr&#233;s bien maintenant :-)

fiorrita

Passer d'une fiche à l'autre en validant les données saisies

5 réponses

Votre réponse

Discussions similaires