Table of Content
HAL Forum
procedure Calendar (
integer StartX,integer StartY,integer EndX,integer EndY)
Description:
Creates a calendar area to the window that is being defined. Controlling the visual appearance of the calendar is currently reserved for internal use only. Used inside WindowBegin/EndWindow block.
Parameters:
StartX The X coordinate of the upper left corner of the calendar object.
StartY The Y coordinate of the upper left corner of the calendar object.
EndX The X coordinate of the bottom right corner of the calendar object.
EndY The Y coordinate of the bottom right corner of the calendar object.
event DefineWindows
begin
  SetLangMode(LangEnglish,"ENG",0);

  WindowBegin("Calendar - Week ",WeekWClass,CGother,RcType);
  UseView(RcVc);
  SetWRect(20,80,635,405);
  Sizeable(-1,-1,0,0);
  ScrollBar(585,42+18,585+16,-69);
  EditFieldTL(10,-18,150,"Persons", M4UStr,Normal,200,f1,false,UserSClass);    
  Calendar(40,27,285,-20);
  EndWindow;
  
  WindowBegin("Calendar - Day ",DayWClass,CGother,RcType);
  UseView(RcVc);
  SetWRect(20,80,635,405);
  Sizeable(447,100,0,0);
  ScrollBar(299,42+1,299+16,-69);
  EditFieldTL(10,-21,100,"Persons", M4UStr,Normal,200,f1,false,UserSClass);
  Calendar(40,27,285,-20);
  EndWindow;

  return;
end;
Related topics:
««