|
|
| Creates daily/hourly overview boxes for the calendar. Used only for Day planner windows. Used within WindowBegin/EndWindow block. Mostly for internal usage. |
 |
| StartX |
The X coordinate of the upper left corner of the time boxes object rectangle. |
| StartY |
The Y coordinate of the upper left corner of the time boxes object rectangle. |
| EndX |
The X coordinate of the lower right corner of the time boxes object rectangle. |
| EndY |
The X coordinate of the lower right corner of the time boxes object rectangle. |
|
event DefineWindows
begin
Real i,h,v,v1,v2,vm,vs,h2,hs,hm,hof,f,es;
SetLangMode(LangEnglish,"ENG",0);
WindowBegin("Day Planner",DayWClass,CGother,RcType);
UseView(RcVc);
SetWRect(20,80,635,405);
Sizeable(-1,-1,0,0);
BrowseButtons(true);
// StaticText(64,37,"Calendar",false);
ScrollBar(299,42+1,299+16,-69);
ScrollBar(585,42+1,585+16,-73);
StaticText(330,37,"Timed To Dos / Other Activities",false);
EditFieldTL(217+25,-47,200,"Persons", M4UStr,Normal,200,f1,false,UserSClass);
EditFieldTL(217+25,-47+20,200,"Search", M4Str,Normal,100,f2,false,0);
TimeBoxes(50,43,298,-69);
ToolBar;
h = -110; v = 5; v2 = 25;
PushButton(h,v,h+100,v2,ToolOK,"Save");
h = h -110;
HalPushButton(h,v,h+100,v2,"NewActivityTool","New Activity");
h = h -110;
HalPushButton(h,v,h+100,v2,"OpenActTodoRClass","Report");
h = h -200;
HalPushButton(h,v,h+25,v+20,"DayWClass_X","H");
h = h -30;
HalPushButton(h,v,h+25,v+20,"DayWClass_M","D");
EndToolBar;
EndWindow;
return;
end;
««