[AccessD] Postion a Pop-up form

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
>>
>>    
>>
>
>  
>




More information about the AccessD mailing list