William Hindman
wdhindman at bellsouth.net
Thu Dec 22 21:44:28 CST 2005
...the problem with that API is that it only works for forms on top ...you can't open another form ...pop up a calendar for instance ...I got heavy into an experimental app with this approach before abandoning it ...too many compromises. William ----- Original Message ----- From: <DWUTKA at marlow.com> To: <accessd at databaseadvisors.com> Sent: Thursday, December 22, 2005 8:53 PM Subject: Re: [AccessD] access xp runtime > This is code I put on an 'Always On Top' form which also hides the Access > window: > > Option Compare Database > Option Explicit > Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, _ > ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal _ > cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long > Private Declare Function IsWindowVisible Lib "user32" (ByVal hwnd As Long) > As Long > Private Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, _ > ByVal nCmdShow As Long) As Long > Const SW_HIDE = 0 > Private Const SW_SHOW = 5 > Private Const SWP_NOMOVE = &H2 > Private Const SWP_NOSIZE = &H1 > Private Const HWND_TOPMOST = -1 > Private Const HWND_NOTOPMOST = -2 > > Private Sub cmdAlwaysOnTop_Click() > If IsWindowVisible(Application.hWndAccessApp) Then > ShowWindow Application.hWndAccessApp, SW_HIDE > SetWindowPos Application.hWndAccessApp, HWND_TOPMOST, 0, 0, 0, 0, _ > SWP_NOMOVE Or SWP_NOSIZE > ShowWindow Me.hwnd, SW_SHOW > Me.Repaint > Else > ShowWindow Application.hWndAccessApp, SW_SHOW > SetWindowPos Application.hWndAccessApp, HWND_NOTOPMOST, 0, 0, 0, 0, _ > SWP_NOMOVE Or SWP_NOSIZE > End If > End Sub > Private Sub Form_Unload(Cancel As Integer) > If IsWindowVisible(Application.hWndAccessApp) = False Then > ShowWindow Application.hWndAccessApp, SW_SHOW > SetWindowPos Application.hWndAccessApp, HWND_NOTOPMOST, 0, 0, 0, 0, _ > SWP_NOMOVE Or SWP_NOSIZE > End If > End Sub > > -----Original Message----- > From: Michael Maddison [mailto:michael at ddisolutions.com.au] > Sent: Thursday, December 22, 2005 7:11 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] access xp runtime > > > Hi David, > > I'm (almost) sure I saw some API code a couple of years ago that > completely hid the Access parent container window. > I can't find it on my pc but its out there somewhere ;-) > > cheers > > Michael Maddison > > DDI Solutions Pty Ltd > michael at ddisolutions.com.au > Bus: 0260400620 > Mob: 0412620497 > www.ddisolutions.com.au > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David & > Joanne Gould > Sent: Friday, 23 December 2005 11:23 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] access xp runtime > > My only plan for it is to hide the database window, put a different icon > on the titlebar. My client doesn't require menu bar or toolbars (thank > goodness). I'm hoping this will look like any other software in a box. > > David > > At 10:58 AM 23/12/2005, you wrote: >>"wants his database to not look like an access database (no problem)" >>D&J >> >>...lol ...runtime is one thing ...I run them on several client systems >>...but I'd really, really like to know how you make an Access db not >>look like an Access db ...the only way you can hide the Access window, >>afaik, is using popups which severely limits your gui ...alternatively >>you can fill the window with your main form and call subforms to do >>most of your work, an appoach I quickly abandoned ...and even then the >>user can still expose the Access window in a number of ways you can't > control. >> >>...building innovative guis is one thing ...but making it not look like > >>an Access db? ...I'm all ears? >> >>...btw, if you have the option I highly recommend upgrading your >>development system to A2K3 and buying the VSTO. >> >>William >> >>----- Original Message ----- >>From: "David & Joanne Gould" <dajomigo at tpg.com.au> >>To: <AccessD at databaseadvisors.com> >>Sent: Thursday, December 22, 2005 4:28 PM >>Subject: [AccessD] access xp runtime >> >> >> >I have a client that wants his database to not look like an access >> >database (no problem) and be usable by people who don't have access >> >on their computers. My understanding is that this is possible if the > >> >database is a runtime version. Is there any way to do this without >> >buying office developer XP. We are using access xp for the database. >> > >> > David >> > >> > >> > -- >> > 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 > > > -- > 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 > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com >