about gui MonthCal help me Topic is solved

[cgx5871]

Code: Select all

g:=Gui()
g.SetFont('cBlue s12 bold')
g.Opt('-Caption AlwaysOnTop')
g.AddMonthCal("vMyCalendar")
;~ g.OnEvent('Click', 'MyCalendar')
OnMessage(0x201, WM_LBUTTONDOWN)
g.show
WM_LBUTTONDOWN(*){
    PostMessage(0xA1, 2) ; 0xA1 corresponds to the WM_NCLBUTTONDOWN message, and 2 corresponds to HTCAPTION. This simulates a left mouse button down on the window's caption area.
}

I have created a calendar control.
But I don’t know how to click
1, Get the date value.

After searching the forum, I need to create another button to get it.
If I only want to click/double-click on the control, I can get it directly.
What to do?
2,
I hope that the form can be moved by pressing the mouse on the calendar control.
This PostMessage(0xA1, 2) can only take effect in the border.

3. How to display the month screen during gui show?

[Datapoint]

For #1

Code: Select all

g.AddMonthCal("vMyCalendar").OnEvent("Change", CalChanged)

...

CalChanged(GuiCtrlObj, Info) {
	MsgBox GuiCtrlObj.Name "`n" GuiCtrlObj.Value "`n" Info
}

[cgx5871]

@Datapoint
thank you
How to set parameters so that when gui show is executed, the starting page is the month page?