XProfan

Source wurde am 15.07.2007 aus der MMJ-Quellcodesammlung (Dietmar Horn) in die Babyklappe auf XProfan.Com abgelegt:
Kalender mit andersfarbiger Titelzeile
Cls
Declare hDate&
hDate& = Control(SysMonthCal32, Kalender, 1342177280, 10, 50, 300, 250, %hWnd, 0, %hInstance, 0)
SendMessage(hDate&, 4106, 2, rgb(128,192,0))
SendMessage(hDate&, 4106, 2, rgb(255,0,0))
WaitKey