[AccessD] access xp runtime

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
> 





More information about the AccessD mailing list