Hide default Add New Record Button ONLY - How? (1 Viewer)

[Marshall Brooks]

Current status - Moved the width setting to Form Open code, added 6-inches of space before the nav form.

Is not centered and still gives a gap if I open full-screen and size down, but works fine if I open the form sized down or if I open maximized.
Maximized:

Reduced down and scrolled left:

Reduced down and scrolled right:

 

[Marshall Brooks]

Marked as Solved since I'm satisfied with how it is working. Thanks to all!

 

[Marshall Brooks]

Made a slight change to the form and can't get it quite working correctly.

I wanted the navigation indicators centered in the bottom of the form.

I backed out the 6-inches of spacing on the left and set the form width to 3.05 inches.

Then I added this code, which is working (in Form Open, but I also tried it in Form Current):
Me.zz_frmNavButtons.left = (Me.InsideWidth / 2) - (1.525 * 1440)

Now, I wanted it to look like a statusbar, so I added a rectangle of the same size and color and called it FooterBanner.

I added this code:
Me.FooterBanner.left = 0
Me.FooterBanner.Width = Me.InsideWidth
Me.zz_frmNavButtons.left = (Me.InsideWidth / 2) - (1.525 * 1440)

It is working if I don't need to scroll, but not if I do:
No Scrolling:

Scrolling - note gap on right:

Any idea what I need to change to fix it?

 

[Marshall Brooks]

This doesn't work either - and seems to leave the same amount of blank space:
Me.FooterBanner.left = 0
Me.FooterBanner.Width = (Me.InsideWidth / 2) - (1.525 * 1440)
Me.zz_frmNavButtons.left = (Me.InsideWidth / 2) - (1.525 * 1440)
Me.zz_frmNavButtons.Width = (Me.InsideWidth / 2) + (1.525 * 1440)

Also, I think it is clear, but ...
First code is supposed to put the left edge of the navigation form at the center of the window, minus 1/2 the width of the navigation form. FooterBanner is supposed to be the entire width of the window.

Second code is supposed to put the left edge of the navigation form at the same location, but change the width of the navigation bar to 1/2 the width of the navigation form, plus 1/2 the width of the window, which should take it to the right edge. The footer banner should go to the start of the navigation form, which it does.

 

[Marshall Brooks]

Also - Reply #43 is incorrect, but I don't understand what is happening.

One of the form's works the way I want - the navigation panel seems to take up the entire screen regardless of what the size of the window is. My other forms, which are not the same size, have the gap on the right if the form is wider than the window size, but it doesn't matter which from I open first and the startup code is the same.

 

[Marshall Brooks]

Posting a demo database. Two things I noticed, but I'm not sure if they cause the problem. In some cases, my FooterBanner rectangle kept the form width, so, if my form was 16.5-inches wide, the FooterBanner would increase to 16.5-inches, and a later form, which would have been 15.8 inches, would now be 16.5-inches wide to accommodate the FooterBanner width, but I'm not sure that is the only error.

 

[Marshall Brooks]

Have a new issue and I'm adding an example database.

In the example database, when I open a form, I have to click TWICE on the next button before the database goes to the next record. After that, it seems to work properly.

We made two changes to the Form Load procedure:

• We were having an issue with HD Monitors and an Error 2100: The control is too large for this location. I used some of @isladogs code to determine the monitor resolution and sized to 30000 Twips to compensate on HD monitors. (The limit is supposed to be 32767 Twips, but we found we still got the 2100 error at 32000, but did not at 31000, so we used 30000 to keep some cushion.)
• We added user "groups" so the data in the table is filtered depending on the Group that the user belongs to.

If I comment out either change and leave the other one, the error does not occur - but obviously the database either doesn't display the correct records or errors on HD monitors.

Swapping the order of the commands didn't make a difference (doing the filtering prior to checking for HD monitors.)

Adding Call Me.zz_frmNavButtons.Form.EnableDisableButtons to the Form_Open event in addition to Form_Current didn't help either.

Thank you in advance.

 

[Marshall Brooks]

Anyone have any ideas on Reply #49. @isladogs? @The_Doc_Man?

I did some more testing and I somewhat see what the issue is, but not why or how to prevent it.

I moved the banner width control to Form_Resize and I still see the issue.

Then I added msgboxes for Open in Form Open, Resize in Form Resize, and Current in Form Current.

I noticed that the Current msgbox comes up twice, and I think that is why the two clicks are initially required before the record changes.

If I comment out the "Group1" code and re-open the form, "Current" only displays once and the form works normally.

Actually, if I comment out the Me.Requery lines, it seems to work properly, but I don't know if this is a good idea?