Information générale
Catégorie:
Gestionnaire d'écran & Écrans
>Now, that I have my top level running ok, there is one more thing that I need to know if it is normal or if I am doing something wrong.
>
>When I have access to my top level form, it is not the frontmost form. I have to click on it to make it foremost.
>
>Is this the default behavior?
Hi guys:
Been looking at your site for while, and it look good.
Try this
SET path to data;forms;libs;reports;bmps;prog;menus
SET safe off
SET multilocks on
set excl off
SET nulldisplay to ''
set dele on
clos data
* _screen.windowstate=1 && This will not work. It make the desktop disapear
* && but does not give the focus to the login form
* && which it topmost form.
SET classlib to cmobjects addi
* these vars are released after login is succesful / no globals at all.
gclocaldata = .f.
glContinue = .f.
gldevelop = .t.
if glDevelop
set assert on
endif
* Create an object of class MetaMgr.
*oMeta = createobject('MetaMgr')
* Create an object of main application class
oApp = createobject('cm_application')
Release gclocaldata
OPEN data campuscare
do form login
read events
if ! glContinue
canc
endif
do form main
read events
* The end
*Code form INIT in login form
thisform.passcount = 0
thisform.cm_cbo1.setfocus() && set focus to first object in login form
_screen.windowstate=1 && this is the trick
* && Login form has the focus prior to minimizing the desktop
Hope it helps
*Cano*
Précédent
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement