D
Domac
Hi,
I have a modal login form wich is a startup form.
How to disable main Access window until login form is closed??
When I set popup property to true I get desired result but then my empty
textbox used for Username entry can't get focus when form shows.
So I must aviod using that property, please advise me on alternative method.
But, above mentioned problem is consequence of me "playing" with
SetWindowPos API function that goes like this:
<CODE START>
Public Sub WindowTwipsResize(ByRef frm As Form, Width As Long, Height As
Long)
Dim lngPixWidth As Long
Dim lngPixHeight As Long
lngPixWidth = fTwipsToPixels(Width, DIRECTION_HORIZONTAL)
lngPixHeight = fTwipsToPixels(Height, DIRECTION_VERTICAL)
SetWindowPos frm.hwnd, HWND_TOP, 0, 0, lngPixWidth, lngPixHeight,
SWP_NOMOVE
End Sub
<CODE END>
Did I mess something up with wrong combination of constants?? I simply want
to resize , not moving and no z-ordering.
Goal is to resize form and when form shows to txtUsername get focus.
Please help..
Domagoj
I have a modal login form wich is a startup form.
How to disable main Access window until login form is closed??
When I set popup property to true I get desired result but then my empty
textbox used for Username entry can't get focus when form shows.
So I must aviod using that property, please advise me on alternative method.
But, above mentioned problem is consequence of me "playing" with
SetWindowPos API function that goes like this:
<CODE START>
Public Sub WindowTwipsResize(ByRef frm As Form, Width As Long, Height As
Long)
Dim lngPixWidth As Long
Dim lngPixHeight As Long
lngPixWidth = fTwipsToPixels(Width, DIRECTION_HORIZONTAL)
lngPixHeight = fTwipsToPixels(Height, DIRECTION_VERTICAL)
SetWindowPos frm.hwnd, HWND_TOP, 0, 0, lngPixWidth, lngPixHeight,
SWP_NOMOVE
End Sub
<CODE END>
Did I mess something up with wrong combination of constants?? I simply want
to resize , not moving and no z-ordering.
Goal is to resize form and when form shows to txtUsername get focus.
Please help..
Domagoj