Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Programatically activating the Layout Toolbar
Message
 
 
À
15/12/2005 18:05:00
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
01078240
Message ID:
01078513
Vues:
18
It doesn't seems to work with Report Writer open. Try this
CREATE REPORT myreport nowait
*DOCK WINDOW ("report designer - myreport.frx") POSITION 0
DOCK WINDOW ("report controls") POSITION 1

IF WEXIST("Layout")
	ACTIVATE WINDOW Layout
        DO Part2
ELSE
	 KEYBOARD "{ALT+V}T{DNARROW}{DNARROW}{DNARROW}{DNARROW}{SPACEBAR}{CTRL+W}{CTRL+F2}DO part2{ENTER}"
ENDIF

RETURN
*------------------------------
PROC Part2
DOCK WINDOW ("layout") POSITION 1
>I guess I'm brain dead again... here's my code and it still errors out...any ideas what I am doing wrong?
>
>
>SET RESOURCE OFF
>CREATE REPORT myreport nowait
>
>DOCK WINDOW ("report designer") POSITION 0
>DOCK WINDOW ("report controls") POSITION 1
>
>IF WEXIST("Layout")
>  ACTIVATE WINDOW Layout
>ELSE
>  KEYBOARD "{ALT+V}T{DNARROW}{DNARROW}{DNARROW}{DNARROW}{DNARROW}{SPACEBAR}{CTRL+W}"
>ENDIF
>
>DOEVENTS FORCE
>
>DOCK WINDOW ("layout") POSITION 1
>
>
>BTW, without the last two lines it comes up fine, but floats.
>
--sb--
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform