Rocky Smolin - Beach Access Software
bchacc at san.rr.com
Sat Oct 1 16:28:05 CDT 2005
A.D.:
What happens if I use the pop-up form approach and the user changes the
report sizing so that it no longer is in "FitToWindow" mode?
I'd like to put the navigation in the custom report toolbar I made but if
SndKeys won't work then that's a no go. How do you make a custom button for
a toolbar anyway?
Thanks and regards,
Rocky
----- Original Message -----
From: "A.D.Tejpal" <adtp at touchtelindia.net>
To: "Access Developers discussion and problem solving"
<accessd at databaseadvisors.com>
Sent: Friday, September 30, 2005 5:44 AM
Subject: Re: [AccessD] Report Navigation on Custom Toolbar
> Rocky,
>
> It is a tiny pop-up form (similar to a tool bar) that sits in a corner
> of the screen. It gets opened via report's open event and closed via
> report's close event.
>
> You might like to adapt the commands suitably to appropriate buttons on
> your tool bar. In that case, the commands specific to the form (i.e.
> hiding / un-hiding etc) can be ignored.
>
> After ensuring that report window is the active one and the report is
> in FitToWindow mode, SendKeys arguments as summarized below, would do the
> needful.
> (a) Go to Next Page - "{DOWN}"
> (b) Go to Prev Page - "{UP}"
> (c) Go to Last Page - "^{DOWN}"
> (d) Go to First Page - "^{UP}"
>
> It is observed that SendKeys commands do not get ported smoothly to
> tool bar functions. If you find yourself stuck on this account, and wish
> to avoid form based solution, you could consider experimenting with
> fTurnPage feature available at Leban's site. For this, you would have to
> download the file named ControlReports.zip.
>
> Sample named ReportPreviewing.zip (by Heenan) at Roger's site, as
> mentioned by Ervin, represents the pop-up form approach.
>
> If at any stage, you happen to need a simplified sample based upon the
> code sent by me earlier, I can try to put it together.
>
> Best wishes,
> A.D.Tejpal
> --------------
>
> ----- Original Message -----
> From: Rocky Smolin - Beach Access Software
> To: Access Developers discussion and problem solving
> Sent: Thursday, September 29, 2005 20:05
> Subject: Re: [AccessD] Report Navigation on Custom Toolbar
>
>
> A.D.:
>
> Thanks for the idea. Does this mean that the report preview appears in a
> pop-up or that there's a pop-up form with the navigation buttons?
>
> I already have a custom toolbar with a minimum of controls on it - print,
> close, & fit. I see that you can add controls for record navigation.
> They look like the icons I want but of course they don't turn the pages of
> a report. I'd like to put the page navigation in the toolbar.
> Is there a way to change the action of those icons you can put on a
> custom toolbar? Or is there a way to create a custom button for a toolbar
> that would turn the pages of a report?
>
> Thanks and regards,
>
> Rocky Smolin
> Beach Access Software
> http://www.e-z-mrp.com
> 858-259-4334
>
> ----- Original Message -----
> From: "A.D.Tejpal" <adtp at touchtelindia.net>
> To: "Access Developers discussion and problem solving"
> <accessd at databaseadvisors.com>
> Sent: Tuesday, September 27, 2005 11:00 AM
> Subject: Re: [AccessD] Report Navigation on Custom Toolbar
>
>
> > Rocky,
> >
> > Sample code in the module of a pop-up form, as given below, enables
> > page navigation of report named R_Test. Command button named CmdNext
> steps
> > forward through the pages while that named CmdPrev does the reverse.
> >
> > You might like to adapt it suitably for your specific situation.
> >
> > Note - For the SendKeys command (Up or Dn arrow) to be effective, it
> is
> > necessary that report is in FitToWindow mode and report's window is the
> > active one.
> >
> > Best wishes,
> > A.D.Tejpal
> > --------------
> >
> > Code module for Pop Up Form
> > ================================
> > ' Declarations Section
> > Private RepHdw As Long, FrmHdw As Long
> >
> > Private Declare Function BringWindowToTop Lib "user32" _
> > (ByVal hwnd As Long) As Long
> > --------------------------------------------------------
> > Private Sub CmdNext_Click()
> > DoCmd.Echo False
> > Me.Visible = False
> > BringWindowToTop RepHdw
> > DoCmd.RunCommand acCmdFitToWindow
> > SendKeys "{DOWN}", True
> > DoCmd.RunCommand acCmdZoom100
> > Me.Visible = True
> > BringWindowToTop FrmHdw
> > DoCmd.Echo True
> > End Sub
> >
> > Private Sub CmdPrev_Click()
> > DoCmd.Echo False
> > Me.Visible = False
> > BringWindowToTop RepHdw
> > DoCmd.RunCommand acCmdFitToWindow
> > SendKeys "{UP}", True
> > DoCmd.RunCommand acCmdZoom100
> > Me.Visible = True
> > BringWindowToTop FrmHdw
> > DoCmd.Echo True
> > End Sub
> >
> > Private Sub Form_Activate()
> > DoCmd.Restore
> > End Sub
> >
> > Private Sub Form_Load()
> > RepHdw = Reports("R_Test").hwnd
> > FrmHdw = Me.hwnd
> > End Sub
> > ================================
> >
> > ----- Original Message -----
> > From: Rocky Smolin - Beach Access Software
> > To: AccessD at databaseadvisors.com
> > Sent: Monday, September 26, 2005 23:41
> > Subject: [AccessD] Report Navigation on Custom Toolbar
> >
> >
> > Dear List:
> >
> > I have a custom toolbar for reports that get displayed in report
> preview
> > if the db is an mde. It has only printer icon, close button, and zoom
> > control. The paging navigation is of course, at the lower left of the
> > screen in preview mode, but I'm wondering if these nav buttons can be
> > added to the custom toolbar where an inexperienced user might be more
> > likely to see them.
> >
> > MTIA,
> >
> > Rocky Smolin
> > Beach Access Software
> > http://www.e-z-mrp.com
> > 858-259-4334
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com