Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Why not focused
Message
From
09/11/2007 13:39:13
 
 
To
09/11/2007 12:27:38
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Title:
Environment versions
Visual FoxPro:
VFP 9 SP2
OS:
Windows XP SP2
Network:
Windows XP
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01267928
Message ID:
01268039
Views:
18
Great,
Thanks for letting me know. :)

>I got it.. thanks a lot Yelena.. on the middle of nowhere on the login form.. I've starting a splash screen.. and that one, was given back the focus for windows..
>
>humm, sorry.. an old application of mine.. on that time, I didn't know many things on how to deal good with splash screen..
>
>I just took out that one and the focus start to comming back.. And, that splash is starting before on the main program..
>
>one more time thanks..
>
>>Is your form Modal? If not try to use Show() method in the modal style. Maybe it will help to keep it on the top.
>>
>>ologin.Show(1)  && 1 - Modal, 2 (default) Modeless
>>
>>Also you could try to make sure it is open as "normal" not minimized.
>>
>Yelena
>>
>>>>How did you instantiate your login form?
>>>>Do you use oform=createobject('YourLoginForm')?
>>>>do you use
>>>>oform.Show()
>>>>
>>>Yelena
>>>
>>>ologin                  = newobject("login",   "libpad.vcx")
>>>ologin.show
>>>>
>>>>>Hi..
>>
>>
>>>>>
>>>>>on some app. of mine.. my first form (login) not receive the windows focus.. it is an object form where I set 'read events' on its activate form method (I already tried to use this outside, after, this object form)..
>>>>>
>>>>>seems a small problem.. at least in my point-of-view.. But, right now, my users doesn't agree with me.. they are so stressed with that one :)
>>>>>
>>>>>Is it a command, property, etc.. to setup and turn them a little calm down?
>>>>>
>>>>>ps: now this is my try on activate method
>>>>>
>>>>>
>>>>>loObj                    = Thisform
>>>>>lnTop                    = Objtoclient(loObj,1) + 10
>>>>>lnLeft                   = Objtoclient(loObj,2) + 5
>>>>>Mouse Click At (lnTop),(lnLeft) Pixels Window (this.Name)
>>>>>
>>>>>ThisForm.Text2.SetFocus()
>>>>>
>>>>>read events
>>>>>
Previous
Reply
Map
View

Click here to load this message in the networking platform