Hide Back Access Window on Load (1 Viewer)

theDBguy

I’m here to help
Local time
Today, 04:13
Joined
Oct 29, 2018
Messages
10,824
The code is on my db under the form load event procedure. However, I don't have the label captions that are mentioned in the code. Which part is for the hide or show window?

Do you mean upload my db?
Yes, but wait a minute. So, if the code with the problem is in the Load event of your form, then just comment out the parts where it refers to a Caption. For example.
Code:
On Error GoTo Err_Handler

     'If Me.cmdAppWindow.Caption = "Show Application Window" Then
        'can't do this if form maximized & fills screen
        'DoCmd.Restore
        'Me.cmdRestore.Caption = "Maximize Form"
        
      '  SetAccessWindow (SW_SHOWMAXIMIZED)
        SetAccessWindow (SW_SHOW) 'v3.43
        HideRibbon  'v3.43
        blnShowWindow = True
        'Me.cmdAppWindow.Caption = "Hide Application Window"
        
        DoEvents
    Else
        'close & reopen form
        Application.Echo False
        'DoCmd.Close acForm, Me.Name
        'DoCmd.OpenForm "frmStart"
      '  SetAccessWindow (SW_SHOWMINIMIZED)
        Application.Echo True
        
        blnShowWindow = False
    End If
If that doesn't work, then yes, see if you can upload a small copy of your db (zipped up).
 

theDBguy

I’m here to help
Local time
Today, 04:13
Joined
Oct 29, 2018
Messages
10,824
Yeah, that didn't work. File attached.
Hi. Thanks. But, I don't see anywhere in your forms where you tried to use the code from the demo. Which form did you want to use it on?
 

theDBguy

I’m here to help
Local time
Today, 04:13
Joined
Oct 29, 2018
Messages
10,824
Thank you! Thats perfect! What is Call MinimizeWindow?
That's the code to hide the Access background. That was all you needed to use in your db because the one you copied from the demo was designed for use in the demo.
 

chineloogbonna

Registered User.
Local time
Today, 05:13
Joined
Jul 30, 2018
Messages
65
Wow! That's all I needed, well now I just feel silly..lol! You've been a great help as usual. Thanks again, I'll complete the thread.
 

isladogs

CID Moderator
Staff member
Local time
Today, 12:13
Joined
Jan 14, 2017
Messages
13,437
Sorry I've been out for the evening and only just got back.
Are you sorted now?
 

Users Who Are Viewing This Thread (Users: 0, Guests: 1)

Top Bottom