Bonjour, Je suis débutant Windev et je suis le guide d'autoformation.
J'ai un Champ Table par programmation :
Jusqu’à la tout vas bien.
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 donneesTable est une Source de Données requeteTable est une chaîne = "SELECT ID_Véhicule, Libelle, Immatriculation, Type, Capacité, Marque, Année, En_fonction, Typedeplaque, Code, Poids_réel FROM Véhicule" SI HExécuteRequêteSQL(donneesTable,requeteTable) ALORS HLitPremier(donneesTable) HAjoute(donneesTable) TANTQUE HTrouve(donneesTable) TableAjoute(Fentable_Princip,donneesTable.ID_Véhicule + TAB + donneesTable.code + TAB + donneesTable.Libelle + TAB + donneesTable.Immatriculation + TAB + donneesTable.Type + TAB + donneesTable.Capacité + TAB + donneesTable.Marque + TAB + donneesTable.Année + TAB + donneesTable.En_fonction + TAB + donneesTable.Typedeplaque + TAB + donneesTable.Poids_Réel ) //ChampCreer(Fentable_Princip,donneesTable.Libelle) HLitSuivant(donneesTable) FIN EcranVersFichier() HAnnuleDéclaration(donneesTable) SINON Erreur() FIN
J'ai un bouton "Modifier" Qui m'ouvre une seconde fenêtre dans laquelle je peux remplir des champ texte/cmb qui sont reliés a mon analyse(à différentes rubriques).
Mon problème c'est que la fenêtre s'ouvre mais, tout les champ textes sont vierges au lieu d'avoir les informations de mes différentes rubriques.
Le code du Btn_Modifier :
Voila Merci a ce qui prendront le temp de m'aider :)
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 donneeModifier est une Source de Données requeteModifier est une chaîne = "SELECT ID_Véhicule, Libelle, Immatriculation, Type, Capacité, Marque, Année, En_fonction, Typedeplaque, Code, Poids_réel, Transporteur FROM Véhicule WHERE ID_Véhicule = 1 " SI TableSelect(Fentable_Princip) = -1 ALORS RETOUR //Sélectionne une ligne SI HExécuteRequêteSQL(donneeModifier,requeteModifier) ALORS HLitPremier(donneeModifier,hNumEnrEnCours)//HEnregistre(donneeModifier) SI TableSelect(Fentable_Princip.ID_Véhicule) ALORS Ouvre(fenFicheXX,"MODIFICATION",donneeModifier.ID_Véhicule) FIN SINON Erreur(HErreurInfo()) FIN
Partager