Tony Septav
iggy at nanaimo.ark.com
Wed Oct 7 10:24:42 CDT 2009
Hey William and Darren Thank you for your responses. William's post directed me to exactly the code I was looking for. I have still got some tweaking to do, but I am back up and running again. Thanks again William Hindman wrote: >http://www.peterssoftware.com/winmanip.htm > >...it's a code module that includes, among other things, positioning a popup >in relation to a form or control > >William > >-------------------------------------------------- >From: "Darren - Active Billing" <darren at activebilling.com.au> >Sent: Tuesday, October 06, 2009 6:30 PM >To: "'Access Developers discussion and problem solving'" ><accessd at databaseadvisors.com> >Subject: Re: [AccessD] Postion a Pop-up form > > > >>Hi Tony >> >>Look to the "MoveSize" function >> >>I have used it in the past - I can't find that code (Much like you) but I >>found >>this on the net - It may be of use >> >>It opens the form just under the menu bar and just to the left of centre >>and >>changes the size a bit too >>~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ >>Private Sub Form_Open(Cancel As Integer) >>Const conInchesToTwips = 1440 'enables you to specify dimensions in >>Inches >>Dim intRight As Integer, intDown As Integer, intWidth As Integer, >>intHeight As >>Integer >> >>DoCmd.Restore >> >>intRight = (3 * conInchesToTwips) >>intDown = 0 >>intWidth = (5 * conInchesToTwips) >>intHeight = (5.5 * conInchesToTwips) >> >>DoCmd.MoveSize intRight, intDown, intWidth, intHeight >>End Sub >>~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ >>Many thanks >> >>Darren >> >> >>-----Original Message----- >>From: accessd-bounces at databaseadvisors.com >>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tony Septav >>Sent: Wednesday, 07 October 2009 2:28 AM >>To: Access Developers discussion and problem solving >>Subject: [AccessD] Postion a Pop-up form >> >>Hey All >>Does anyone have some code to position a pop-up in the same location >>above the main form, independent of the screen resolution. I had some >>some code I found years ago, but it is lost in the bowels of one of my >>computers. >> >>Thanks >> >> >>-- >>AccessD mailing list >>AccessD at databaseadvisors.com >>http://databaseadvisors.com/mailman/listinfo/accessd >>Website: http://www.databaseadvisors.com >> >>-- >>AccessD mailing list >>AccessD at databaseadvisors.com >>http://databaseadvisors.com/mailman/listinfo/accessd >>Website: http://www.databaseadvisors.com >> >> >> > > >