FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexAll discussionsLogin (GitHub)
Board index FiveWin for Harbour/xHarbour FWH's Calendar class
hua
Posts: 1096
Joined: Fri Oct 28, 2005 02:27 AM
FWH's Calendar class
Posted: Wed Oct 23, 2013 07:46 AM
Guys,
Using the following code:
Code (fw): Select all Collapse
#include "fivewin.ch"
#include "calendar.ch"

#define DS_3DLOOK           0x0004
#define DS_MODALFRAME       0x80
#define WS_POPUP            0x80000000
#define WS_CHILD            0x40000000
#define WS_MINIMIZE         0x20000000
#define WS_VISIBLE          0x10000000

function pickdate()
  local oDlg, oCal, dDate

  set century on
  set date british
  set epoch to 1980

  dDate := date()
  define dialog oDlg TITLE "Test Calendar" from 0,0 to 300, 300 pixel  ;
    style nOr(DS_MODALFRAME, DS_3DLOOK, WS_POPUP, WS_VISIBLE)

  @ 0,0 CALENDAR oCal VAR dDate OF oDlg PIXEL  ;
              DBLCLICK (msginfo( oCal:GetDate() ), oDlg:end() )        ;
              ON CHANGE msginfo( oCal:GetDate() )

  activate dialog oDlg

return nil


I got this (4 months)


But testcal2.prg in samples shows only 1 month which is what I wanted. What's wrong with my code?

p.s. Any documentation on this control? The wiki has an entry but there's no description on its usage. Only syntax is shown.

TIA
FWH 11.08/FWH 19.12

BCC5.82/BCC7.3

xHarbour/Harbour
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: FWH's Calendar class
Posted: Wed Oct 23, 2013 04:55 PM
Please try it this way:

Code (fw): Select all Collapse
#include "fivewin.ch"
#include "calendar.ch"

#define DS_3DLOOK           0x0004
#define DS_MODALFRAME       0x80
#define WS_POPUP            0x80000000
#define WS_CHILD            0x40000000
#define WS_MINIMIZE         0x20000000
#define WS_VISIBLE          0x10000000

function pickdate()
  local oDlg, oCal, dDate

  set century on
  set date british
  set epoch to 1980

  dDate := date()
  define dialog oDlg TITLE "Test Calendar" from 0,0 to 300, 300 pixel  ;
    style nOr(DS_MODALFRAME, DS_3DLOOK, WS_POPUP, WS_VISIBLE)

  @ 0,0 CALENDAR oCal VAR dDate OF oDlg PIXEL SIZE 100, 100 ;
              DBLCLICK (msginfo( oCal:GetDate() ), oDlg:end() )        ;
              ON CHANGE msginfo( oCal:GetDate() )

  activate dialog oDlg CENTERED

return nil
regards, saludos

Antonio Linares
www.fivetechsoft.com
hua
Posts: 1096
Joined: Fri Oct 28, 2005 02:27 AM
Re: FWH's Calendar class
Posted: Thu Oct 24, 2013 02:16 AM

That worked! Thanks Antonio!

FWH 11.08/FWH 19.12

BCC5.82/BCC7.3

xHarbour/Harbour
hua
Posts: 1096
Joined: Fri Oct 28, 2005 02:27 AM
Re: FWH's Calendar class
Posted: Thu Oct 24, 2013 09:00 AM
Updated the wiki a bit
FWH 11.08/FWH 19.12

BCC5.82/BCC7.3

xHarbour/Harbour
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: FWH's Calendar class
Posted: Thu Oct 24, 2013 12:42 PM

Hua,

many thanks! :-)

regards, saludos

Antonio Linares
www.fivetechsoft.com
ukoenig
Posts: 4043
Joined: Wed Dec 19, 2007 06:40 PM
Re: FWH's Calendar class
Posted: Fri Oct 25, 2013 06:14 PM
Creating a little calendar-painter, I would like to use TTitle as a calendar-frame.
There is a problem with the background-brush.The calendar itself works fine.
Is it possible, to get the calender-background from ttitle, like from a defined dialog ?
It would be nice, to get it working using TTitle !!!

With the painter it is possible, to test all settings / selections at runtime :
I noticed, the unused area using TTitle gradient, base or transparent is not transparent.
If You like, it can be used as a calendar-border, or You have to use the exact size.
I would like to know, if it is possible, to calculate this related to the used fontsize.
As well I noticed, lDESIGN doesn't seems to work.



Calendar reduced to the needed < exact !!! > size :



Titles can have a extra EXIT-button :







Best Regards
Uwe :-)
Since 1995 ( the first release of FW 1.9 )

i work with FW.

If you have any questions about special functions, maybe i can help.
hua
Posts: 1096
Joined: Fri Oct 28, 2005 02:27 AM
Re: FWH's Calendar class
Posted: Mon Oct 28, 2013 08:44 AM

Uwe,
Nice! :D

FWH 11.08/FWH 19.12

BCC5.82/BCC7.3

xHarbour/Harbour
ukoenig
Posts: 4043
Joined: Wed Dec 19, 2007 06:40 PM
Re: FWH's Calendar class
Posted: Mon Oct 28, 2013 03:16 PM
I just finished the calendar-painter-section.
Because of many possible settings, without the painter it would be a hard job, to get a final result.
Changing the font-size, the needed calendar-size will change.
I used 2 sliders for selecting a basic-size. Finetuning can be done with the 2 gets width and height.



Calendar with any style and size between < Window / Dialog / Title and Calendar > :



Added Title-frame OPTIONAL ( standalone-calendar ) !!!



Best Regards
Uwe :-)
Since 1995 ( the first release of FW 1.9 )

i work with FW.

If you have any questions about special functions, maybe i can help.
ukoenig
Posts: 4043
Joined: Wed Dec 19, 2007 06:40 PM
Re: FWH's Calendar class
Posted: Sun Nov 03, 2013 05:24 PM

Up !

viewtopic.php?f=3t=27574

Best Regards
Uwe :lol:

&

Since 1995 ( the first release of FW 1.9 )

i work with FW.

If you have any questions about special functions, maybe i can help.
hua
Posts: 1096
Joined: Fri Oct 28, 2005 02:27 AM
Re: FWH's Calendar class
Posted: Mon Nov 04, 2013 02:33 AM

Nice one Uwe. Thanks for the heads up!

FWH 11.08/FWH 19.12

BCC5.82/BCC7.3

xHarbour/Harbour
hua
Posts: 1096
Joined: Fri Oct 28, 2005 02:27 AM
Re: FWH's Calendar class
Posted: Mon Nov 04, 2013 03:35 AM
Antonio,

I might have found a bug. See the screenshot below.

FWH 11.08/FWH 19.12

BCC5.82/BCC7.3

xHarbour/Harbour
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: FWH's Calendar class
Posted: Mon Nov 04, 2013 10:42 AM

Hua,

I wasn't aware that the year can be edited.

I am going to review it, thanks :-)

regards, saludos

Antonio Linares
www.fivetechsoft.com
ukoenig
Posts: 4043
Joined: Wed Dec 19, 2007 06:40 PM
Re: FWH's Calendar class
Posted: Mon Nov 04, 2013 12:22 PM
Antonio,
found results on left mouseclick on month and year.
( didn't test it before )
It seems to be a bug : the get-value is not refreshed, during using the spinner.
It is not possible, to prearrange a year.
I think my < external GET-solution > added in release 1.2, is not needed.
( Added a Date-reset with a double-leftclick on a free calendar-area )





Best regards
Uwe :-)
Since 1995 ( the first release of FW 1.9 )

i work with FW.

If you have any questions about special functions, maybe i can help.
ukoenig
Posts: 4043
Joined: Wed Dec 19, 2007 06:40 PM
Re: FWH's Calendar class
Posted: Wed Nov 06, 2013 12:33 PM
Because the year-selection doesn't work,
I created a working new GET on a selected calendar-position ( doesn't cover something, I want to see ).
A second left-mouseclick opens a YESNO ( if a year-selection is visible ), if You want to reset to old date.
Is it better, to RESET without a YESNO-question, after closing the get ?
Maybe possible, to disable the non working old get ?
Is it also possible, to get the used calendar-title-height ( needed, to define the click-area ) ?
It seems to be 3 times the used fontheight.



SECOND mouseclick ( with a visible year-selection )
I used a logical click-counter, to perform the action.



Best regards
Uwe :-)
Since 1995 ( the first release of FW 1.9 )

i work with FW.

If you have any questions about special functions, maybe i can help.

Continue the discussion

Static archive · New replies & topics via GitHub Discussions