application resize event (1 Viewer)

SunWuKung

Registered User.
Local time
Today, 06:00
Joined
Jun 21, 2001
Messages
172
Hi,
does somebody know where would I capture the resize event of the application (not the resize of a form) ?

Thanks.
SWK
 

cable

Access For My Sins
Local time
Today, 06:00
Joined
Mar 11, 2002
Messages
228
not easily!

I think it would involve a msg hook or a callback neither of which are simple.

Why do you want to capture the access app resize?
 

SunWuKung

Registered User.
Local time
Today, 06:00
Joined
Jun 21, 2001
Messages
172
I am on a seemingly hopeless mission of creating a proper application interface for my Access project. :)

I have a main form that acts as the desktop of all other functionalities. Now Access seems to insist of beint a multidocument interface (a'la Excel) while I would like it to pretend to be a single document interface (a'la IE). I found no way of getting rid of the resize button when I maximize my main form. So now I have a function that finds the application window size and size my form to fill it completely so it looks maximized but it doesn't have restore button. The problem comes when the application window is resized - I could resize my form to it if I could capture the event but I don't know how.
 

ghudson

Registered User.
Local time
Today, 01:00
Joined
Jun 8, 2002
Messages
6,195
This will force your application to be maximized.

Code:
DoCmd.RunCommand acCmdAppMaximize
Just call it in any event you feel appropriate.
 

cable

Access For My Sins
Local time
Today, 06:00
Joined
Mar 11, 2002
Messages
228
If your form is maximized with in the access app, when the access app is resized, your form will get its resize event fired...I just tested it:)

If it is not maximized then it doesn't.

In case its useful, my forms resize event
Code:
'resize the subform and title
On Error Resume Next
Me.subForm.Width = Me.Form.InsideWidth - (5.804 * 567) - 50
Me.subForm.Height = Me.Form.InsideHeight - (1.287 * 567)
Me.lblTitle.Width = Me.Form.InsideWidth - 50
Me.lineTop.Width = Me.Form.InsideWidth - 50
Me.lineSplit.Height = Me.Form.InsideHeight - (1.287 * 567)
The form has fixed height banner, and a fixed width treeview navigation on the left and then a subform...so it might not apply at all in your case.
 

Users who are viewing this thread

Top Bottom