Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Programatically activating the Layout Toolbar
Message
 
 
To
15/12/2005 18:05:00
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Miscellaneous
Thread ID:
01078240
Message ID:
01078513
Views:
17
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--
Previous
Reply
Map
View

Click here to load this message in the networking platform