Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

How to get and ACCPAC UI to maximize when the maxbutton is clicked in my custom UI 1

Status
Not open for further replies.

LESHEL

Programmer
Jan 11, 2012
11
US
I have a custom UI that calls the AP Payment Batch List. When I mazimize my custom UI it will fill the screen but the ACCPAC UI object remains the same size. I can't seem to find a property that I can pass to cause the ACCPAC object to maximize or minimize when my custom screen is maximized or minimized. Can anyone tell me how to make this happen?
Thanks!
 
Public Sub Form_Resize()

On Error Resume Next
'DoEvents

Me.cmdAdd.Visible = True
Me.cmdAdd.Caption = Me.AccpacAP3100UICtrl1.UIAppControls(sAddButton).Caption

If Me.Width < iMinWidth Then Me.Width = iMinWidth
If Me.Height < iMinHeight Then Me.Height = iMinHeight

With Me.AccpacAP3100UICtrl1

.Height = Me.Height - 700
.Width = Me.Width - 75

'Set Button Positions

Me.cmdAdd.Top = .UIAppControls(sAddButton).Top
Me.cmdAdd.Left = .UIAppControls(sAddButton).Left

.UIAppControls(sAddButton).MacroVisibleFlag = False

End With

Me.Line1.X2 = Me.Width

Err.Clear
' Me.cmdDeductions.Visible = True
' Me.cmdRange.Visible = True

End Sub
'*******

 
Thank you so much! You are awesome! I will try this!
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top