Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Browse vs display
Message
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00665130
Message ID:
00665894
Views:
20
That's the way I was doing it in FoxPro 2.x days.

>Salut,
>
>Quelqu'un connait-il un truc simple et efficace pour afficher une information comme la description d'un produit à l'extérieur d'un Browse au bas d'une page?
>
>Voici une facon simple de le faire;
>
>USE INVENT IN 0
>SELECT INVENT
>DEFINE WINDOW W_PROD FROM 0,0 TO 22,79
>DEFINE WINDOW WWDESC FROM 23,0 TO 23,79 NONE COLOR GR+/B
>ON KEY LABEL F1 DO quelque chose ici
>BROWSE WINDOW W_PROD WHEN WWDESC() TITLE "Liste de Produits"
>ON KEY LABEL F1
>CLOSE ALL
>CLEAR WINDOWS
>RETURN
>*----------------------------------------
>PROCEDURE WWDESC
>PUSH KEY CLEAR
>AV_WIN=WONTOP()
>ACTIVATE WINDOW WWDESC
>@0,1 SAY"Description : "
>@$,$ SAY INVENT.DESCRIP color w/b
>SHOW WINDOW (AV_WIN)
>POP KEY
>RETURN
>*==========================================================
>
>Remarquez que cette méthode fonctionne très bien mais je trouve que cela fait beaucoup d'opérations pour un simple affichage et je me demandais s'il n'y avait pas une méthode plus simple.
>
>J'ai déjà vu aussi l'utilisation de Edit in window... mais on a pas beaucoup de controle sur la couleur et l'emplacement.
>
>Merci à l'avance.
--sb--
Previous
Reply
Map
View

Click here to load this message in the networking platform