![]() |
Hide days in month view print |
Post Reply ![]() |
Author | |
crichey ![]() Newbie ![]() Joined: 27 January 2010 Location: United States Status: Offline Points: 3 |
![]() ![]() ![]() ![]() ![]() Posted: 27 January 2010 at 11:29am |
Is it possible to hide days for the previous and subsequent months in the calendar print? When we print, for example, the month of January - we only want to see dates in January in the month view, not dates from December and February for partial weeks.
Also - is it possible to show only the Month in the header without the mini calendar? |
|
Carl
|
|
![]() |
|
mdoubson ![]() Senior Member ![]() ![]() Joined: 17 November 2008 Status: Offline Points: 1705 |
![]() ![]() ![]() ![]() ![]() |
Yes, you can do it now - https://forum.codejock.com/uploads/BetaOCX/CalendarBeta14.rar
CalendarControl.PrintOptions.ThreeSmallCal = False
|
|
![]() |
|
mdoubson ![]() Senior Member ![]() ![]() Joined: 17 November 2008 Status: Offline Points: 1705 |
![]() ![]() ![]() ![]() ![]() |
You can use smth like
CalendarControl.PrintOptions.Header.TextCenter = "My Title String"
CalendarControl.PrintOptions.PrintDateHeader = False and in your print / printpreview handler use any string to title e.g. Month Name |
|
![]() |
|
crichey ![]() Newbie ![]() Joined: 27 January 2010 Location: United States Status: Offline Points: 3 |
![]() ![]() ![]() ![]() ![]() |
I'm not sure that I explained my original question properly. It sounds like the beta allows the mini calendars to be turned off, which is good and part of my original question. My main issue is turning off the printing of surrounding days from previous and next month when printing a month view.
For example, in printing January, 2010, it looks like this currently: 27 28 29 30 31 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 1 2 3 4 5 6 I would like it to look like this: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 I'm referring to the main calendar, not the mini calendar here. Thanks! |
|
Carl
|
|
![]() |
|
mdoubson ![]() Senior Member ![]() ![]() Joined: 17 November 2008 Status: Offline Points: 1705 |
![]() ![]() ![]() ![]() ![]() |
e.g.
Private Sub mnuPrintPreview_Click()
Dim dt As Date Dim nt As Integer Dim sName As String nt = CalendarControl.ActiveView.DaysCount dt = CalendarControl.ActiveView.Days(nt / 2).Date sName = Format(dt, "yyyy - mmmm") CalendarControl.PrintPreviewOptions.Title = "Calendar Control VB 6.0 Sample application" CalendarControl.PrintOptions.Header.TextCenter = sName CalendarControl.PrintPreview False End Sub |
|
![]() |
|
crichey ![]() Newbie ![]() Joined: 27 January 2010 Location: United States Status: Offline Points: 3 |
![]() ![]() ![]() ![]() ![]() |
Thanks - again, this was only a response to part of my question and had already been answered before.
|
|
Carl
|
|
![]() |
Post Reply ![]() |
|
Tweet
|
Forum Jump | Forum Permissions ![]() You cannot post new topics in this forum You cannot reply to topics in this forum You cannot delete your posts in this forum You cannot edit your posts in this forum You cannot create polls in this forum You cannot vote in polls in this forum |