Menu à droite

anwar1966 Messages postés 8 Date d'inscription mercredi 14 novembre 2007 Statut Membre Dernière intervention 23 juin 2011 - 23 juin 2011 à 00:21
Mike Gagnon Messages postés 381 Date d'inscription vendredi 15 octobre 2004 Statut Membre Dernière intervention 24 octobre 2013 - 25 juin 2011 à 13:51
Bonjour à toutes et à tous,
Je travaille dans FoxPro 9, j'ai créé un menu et je veux qu'il soit encadré à droite (menu en arabe).
La propriété RightToLeft du formulaire est à True.
L'option RightJustify (dans la fenêtre Options Générales) est cochée.
Mais rien n'est fait, toujours mon menu est à gauche.

Merci Infiniment pour toute information.

2 réponses

michelatoutfox Messages postés 828 Date d'inscription mardi 5 octobre 2004 Statut Membre Dernière intervention 7 mai 2013 1
23 juin 2011 à 11:41
Bonjour,

je te conseillerais de poser cette question sur le forum Foxite, sur lequel tu trouveras de nombreux développeurs fox travaillant en arabe (attention, Foxite est un forum anglophone)
0
Mike Gagnon Messages postés 381 Date d'inscription vendredi 15 octobre 2004 Statut Membre Dernière intervention 24 octobre 2013 2
25 juin 2011 à 13:51
Voir l'aide en ligne sur SET SYSMENU TO RTLJUSTIF (Il faut l'ordinateur soit configurer pour supporter le texte Arabe)

CLEAR
SET SYSMENU TO
SET SYSMENU AUTOMATIC
ON KEY LABEL ESC KEYBOARD CHR(13)
DEFINE PAD InvPad OF _MSYSMENU PROMPT "ãÜÎÜÇÒä" COLOR SCHEME 3
DEFINE PAD RepPad OF _MSYSMENU PROMPT "ÊÜÞÜÇÑíÜÑ" COLOR SCHEME 3
ON PAD InvPad OF _MSYSMENU ACTIVATE POPUP InvPop
ON PAD RepPad OF _MSYSMENU ACTIVATE POPUP RepPop
DEFINE POPUP InvPop MARGIN RELATIVE COLOR SCHEME 4
DEFINE BAR 1 OF InvPop PROMPT 'ÇáÃÕÜäÜÇÝ' KEY CTRL+S, '^S'
DEFINE BAR 2 OF InvPop PROMPT 'ÇáãÜÞÜÇÓÜÇÊ'
ON SELECTION POPUP InvPop DO choice WITH PROMPT(), POPUP()
DEFINE POPUP RepPop MARGIN RELATIVE COLOR SCHEME 4
DEFINE BAR 1 OF RepPop PROMPT 'ãÜÈÜíÜÚÜÇÊ ÇáÃÕÜäÜÇÝ'
ON SELECTION POPUP RepPop DO choice WITH PROMPT(), POPUP()
SET SYSMENU TO RTLJUSTIFY && Sets the system menu to the right
ON KEY LABEL ESC
PROCEDURE choice
PARAMETERS mprompt, mpopup
WAIT WINDOW 'You chose ' + mprompt + ' from popup ' + mpopup NOWAIT
SET SYSMENU TO DEFAULT
SET SYSMENU TO LTRJUSTIFY


Mike Gagnon
0
Rejoignez-nous