Вверх ↑
Пакеты 
HiAsm4
Windows 
Компоненты 
Cиcтeмa 
Дата-Время - MonthCalendar

MonthCalendar
Краткое описание
Компонент MonthCalendar предназначен для получения списка дней за определеный год и месяц в виде списка или для формирования календаря.
Параметры
  • Year - Год
  • Month - Месяц
  • Holidays - Праздничные дни
  • EmptyDays - Выдавать дни предыдущего и следующего месяца, которые входят в данную неделю
  • Методы
  • doEnumDays - Перечисляет все дни указанного года и месяца
  • События
  • onDay - Событие происходит вякий раз после получения очередного дня указанного года и месяца и выдает в поток его аттрибуты ARG(Day, DayOfWeek, Type)
  • Данные
  • Year - Год
  • Month - Месяц
  • Примеры
    Пример использования компонента MonthCalendar для формирования календаря в виде списка
    
    Add(MainForm,2953706,105,56)
    {
    Caption="Пример MonthCalendar"
    }
    Add(Button,9362393,105,140)
    {
    Left=85
    Top=205
    Caption="View"
    link(onClick,1039408:doEvent1,[])
    }
    Add(MonthCalendar,8746570,224,147)
    {
    Holidays=[]
    link(onDay,5723613:doValue,[])
    link(Year,15560502:String,[])
    link(Month,9973123:Result,[(237,121)(342,121)])
    }
    Add(ListBox,15560502,203,56)
    {
    Left=20
    Top=10
    Width=80
    Height=170
    Strings=#4:2015|4:2014|4:2013|4:2012|4:2011|4:2010|4:2009|4:2008|
    Point(String)
    }
    Add(ListBox,11854677,273,56)
    {
    Left=125
    Top=10
    Width=80
    Height=170
    Strings=#6:Январь|7:Февраль|4:Март|6:Апрель|3:Май|4:Июнь|4:Июль|6:Август|8:Сентябрь|7:Октябрь|6:Ноябрь|7:Декабрь|
    link(onClick,9973123:doOperation,[])
    }
    Add(Math,9973123,336,63)
    {
    Op2=1
    }
    Add(RichEdit,8326220,490,147)
    {
    Left=220
    Top=10
    Width=155
    Height=235
    ScrollBars=3
    link(Style,5723613:Value3,[(510,135)(530,135)(530,211)(293,211)])
    }
    Add(MT_MultiMem,5723613,273,147)
    {
    Count=3
    link(onData,4607620:doString,[])
    }
    Add(FormatStr,4607620,336,147)
    {
    Mask="%1 №%2"
    link(onFString,9292240:doMultiReplace,[])
    link(Str1,5723613:Value1,[(342,140)(323,140)(323,193)(279,193)])
    link(Str2,5723613:Value2,[(349,135)(317,135)(317,188)(286,188)])
    }
    Add(MultiReplace,9292240,399,147)
    {
    ReplaceList="№1 = Понедельник;\r\n№2 = Вторник;\r\n№3 = Среда;\r\n№4 = Четверг;\r\n№5 = Пятница;\r\n№6 = Суббота;\r\n№7 = Воскресенье;"
    link(onResult,8326220:doAdd,[])
    }
    Add(Hub,1039408,154,140)
    {
    link(onEvent1,16280834:In,[])
    link(onEvent2,8746570:doEnumDays,[])
    }
    Add(LineBreak,4725216,448,154)
    {
    link(Out,8326220:doClear,[])
    Primary=[16280834,-266,-14]
    }

    Замечания
    Обновление элемента: [svn]MonthCalendar.pas[/svn]
    BB-code статьи для вставки
    Всего комментариев: 0
    (комментарии к статье еще не добавлены)
    Комментарий
    ...