PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEVWEBDEV e WINDEV Mobile

Inicio → WINDEV Mobile (versões anteriores) → [WM12] Problème DonneFocus
[WM12] Problème DonneFocus
Iniciado por Julie, fev., 22 2012 12:47 PM - Sem resposta
Publicado em fevereiro, 22 2012 - 12:47 PM
Bonjour,

Je travaille actuellement sous WD12 et j'ai un soucis sur les DonneFocus. J'utilise dans mon programme une fenêtre et je gère les affichages avec des Plans. Je reçois mes données venant d'une socket en fonction du plan sur lequel je suis positionnée j'appelle une procédure d'affichage différente. Dans cette procédure je procède à un changement de plan et je souhaite donner le focus à la zone de saisie de ce plan là mais cela ne fonctionne pas malgré de nombreuses tentatives...

Voici un exemple d'une de mes procédures d'affichage
Procedure GestionAffichageCtrlSSCC1(sMessageRecu)

SI ExtraitChaîne(sMessageRecu, 1, TAB) = "T" ALORS
// Récupération des valeurs
gnNbLigne = ExtraitChaîne(sMessageRecu, 2, TAB)
gsLastRef = ExtraitChaîne(sMessageRecu, 3, TAB)
gsLastQte = ExtraitChaîne(sMessageRecu, 4, TAB)
gsSolde = ExtraitChaîne(sMessageRecu, 5, TAB)
gsEnCours = ExtraitChaîne(sMessageRecu, 6, TAB)
gsDernierColis = ExtraitChaîne(sMessageRecu, 7, TAB)


// Affichage des valeurs récupérées
FENAccueil.LIB_CmdCtrlSsccAffich = gsNumeroCommande
FENAccueil.LIB_CmdCtrlSsccAffich2 = gsNumeroCommande
FENAccueil.LIB_CmdCtrlSsccAffich3 = gsNumeroCommande
FENAccueil.LIB_CmdCtrlSsccAffich4 = gsNumeroCommande
FENAccueil.LIB_CmdCtrlSsccAffich5 = gsNumeroCommande

FENAccueil.LIB_NbRefCtrlSsccAffich = gnNbLigne
FENAccueil.LIB_NbRefCtrlSsccAffich1 = gnNbLigne
FENAccueil.LIB_NbRefCtrlSsccAffich2 = gnNbLigne
FENAccueil.LIB_NbRefCtrlSsccAffich3 = gnNbLigne
FENAccueil.LIB_NbRefCtrlSsccAffich4 = gnNbLigne
FENAccueil.LIB_NbRefCtrlSsccAffich5 = gnNbLigne

FENAccueil.LIB_ColisEnCoursCtrlSsccAffich = gsColisEnCours
FENAccueil.LIB_ColisEnCoursCtrlSsccAffich1 = gsColisEnCours
FENAccueil.LIB_ColisEnCoursCtrlSsccAffich2 = gsColisEnCours
FENAccueil.LIB_ColisEnCoursCtrlSsccAffich3 = gsColisEnCours
FENAccueil.LIB_ColisEnCoursCtrlSsccAffich4 = gsColisEnCours
FENAccueil.LIB_ColisEnCoursCtrlSsccAffich5 = gsColisEnCours

FENAccueil..Plan = 19
DonneFocus(FENAccueil.SAI_CbCtrlSscc)


FIN
DonneFocus(FENAccueil.SAI_CbCtrlSscc)