Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
*Browse Window* and activate control
Message
From
03/02/2009 07:58:05
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
Object Oriented Programming
Title:
*Browse Window* and activate control
Environment versions
Visual FoxPro:
VFP 9 SP2
OS:
Windows XP
Network:
Windows XP
Database:
Visual FoxPro
Application:
Desktop
Miscellaneous
Thread ID:
01378947
Message ID:
01378947
Views:
66
Hi...

Here is the issue.. If I have more than 1 browser.. I'd like to run some code when every browse window is clicked/activate:

ps: I already try when clause by "when _screen.form1.runsomemethod()" but it goes to a weird behavior and the application crash
lnwidth				= SYSMETRIC(1)-thisform.Width-30
lnheight				= SYSMETRIC(2)-260
lcname				= SYS(2015)
DEFINE WINDOW (lcname) ;
	AT 0.769, 0.200 ;
	SIZE lnheight,lnwidth ;
	FONT "MS Sans Serif", 8 ;
	STYLE "N" 	FLOAT ZOOM CLOSE GROW MINIMIZE DOUBLE 

ACTIVATE WINDOW (lcname) top

Browse Window (loobj.Name) NAME loobj NOWAIT;
	TITLE "Browse data of " + ThisForm.List1.value 

*loobj				= EVALUATE("_SCREEN."+lcname)

BINDEVENT(loobj,"Activate",thisform,"runsomemethod")
How should I run a code when end-user activate each browse window? I didn't use an object form/grid because I'd like to allow the use of CTRL+F find
"Now to him who is able to do immeasurably more than all we ask or imagine, according to his power that is at work within us, Ephesians 3:20
Next
Reply
Map
View

Click here to load this message in the networking platform