Discussion :

[juju1988]

Bonjour,

J'utilise actuellement WMobile 12 j'ai un soucis avec la gestion de mes DOnneFocus. J'ai une fenêtre décomposée en plusieurs plans.
Je reçois mes données d'une socket, et en fonction du plan sur lequel je suis positionné je gère mon affichage avec une procédure. Dans cette procédure une fois les données récupérées je change de plan et je souhaite donner le focus à la zone de saisie de mon plan cependant cela ne fonctionne pas. Voici un exemple de code que j'utilise...
Merci d'avance pour vos idées...j'utilise des PSIONS qui n'ont pas forcément le tactile donc un peu galère pour se positionner sur la zone de saisie.

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
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
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)

[jeff_normandie]

Bonjour,

Le comportement est plus efficace avec la fonction RepriseSaisie(<Nom du champ>)

Donc au lieu de :
DonneFocus(FENAccueil.SAI_CbCtrlSscc)
Tu fait:
RepriseSaisie(FENAccueil.SAI_CbCtrlSscc)

bon dev

[juju1988]

J'ai déjà tenté mais ça ne change rien...

[miripesage]

bonsoir, et avec :

Code :

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

EcranPremier(FENAccueil.SAI_CbCtrlSscc)

[juju1988]

ça ne fonctionne pas non plus, j'ai l'impression que c'est parce que je suis dans une procédure et pas derrière un bouton...

[miripesage]

Bonjour, à tester :

Bonjour,

J'utilise actuellement WMobile 12 j'ai un soucis avec la gestion de mes DOnneFocus. J'ai une fenêtre décomposée en plusieurs plans.
Je reçois mes données d'une socket, et en fonction du plan sur lequel je suis positionné je gère mon affichage avec une procédure. Dans cette procédure une fois les données récupérées je change de plan et je souhaite donner le focus à la zone de saisie de mon plan cependant cela ne fonctionne pas. Voici un exemple de code que j'utilise...
Merci d'avance pour vos idées...j'utilise des PSIONS qui n'ont pas forcément le tactile donc un peu galère pour se positionner sur la zone de saisie.

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
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
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
FENAccueil..Plan = 19
DonneFocus(FENAccueil.SAI_CbCtrlSscc)

//ou
EcranPremier(FENAccueil.SAI_CbCtrlSscc)