
Вы можете прочитать этот readme.md на английском языке, если хотите, нажав здесь.
Описание: Компонент Delphi FireMonkey, который может быть легко реализован на всех платформах, которые FireKonkey Framework Compila (Windows 32-битная, 64-битная Windows, MacOS, iOS, Linux, Android). Цель состоит в том, чтобы быть простым календарем для реализации во время выполнения (этот компонент не работает во время дизайна).


Чтобы начать использование Ecalendar, вам нужно только Unit ecalendario.component.pas и ecalendario.component.fmx. Вы можете скачать ZIP кода (или даже релиз, который более рекомендуется) и добавить в свой проект или использовать босс, с командами ниже:
Чтобы запустить проект (создать файл boss.json и иметь возможность управлять объектами)
Boss init
Установить Ecalendario в качестве зависимости
Boss install https://github.com/rafael-figueiredo-alves/eCalendario
Затем просто используйте приведенный ниже код раздела, чтобы использовать и не забудьте объявить Unit Ecalendario.component.pas в использовании, где вы хотите использовать календарь.
Первое, что нужно сделать, чтобы иметь возможность использовать Ecalendario на одной из форм вашего проекта, - это поместить в форме формат со свойствами не менее 340 и шириной не менее 300 .

Теперь, на мероприятии onCreate (оно также может быть на onShow ), вы должны использовать следующие команды в следующем порядке:
TeCalendario.New(форма, с которой будет связан календарь,макет, где будет отображаться календарь)
Эта команда служит для создания Ecalendarium, вызывая класс (который является интерфейсом) TecAlendario и вызов новый метод (который создаст экземпляр класса), где мы будем определять два параметра: форма, где будет использоваться календарь, и Tlayout, где он будет отображаться.
onClickDate(функционируйте для запуска при щелчке в день или при изменении месяцев и лет в календаре)
Эта команда должна прийти после создания, чтобы связать метод (действие), который будет использоваться при изменении даты, будь то нажав на день, изменяя месяц или год. Параметр должен быть function со следующей подписью: function nome_da_função (Data: TDate);
Locale(принимает значения: ptbr | en | spanol | fr | it | ger)
Команда Locale используется для определения календарного языка. Есть шесть возможностей:
StartDate(принимает значение TDATE или AdateTime, например, сейчас ())
StartDate используется для установки текущей даты (сегодня) или даты, которая должна быть выбранной по умолчанию. Он должен получить параметр в формате пристального или адаптации.
ShowCalendar;
Именно эта последняя команда выполняет магию отображения календаря в нашей форме в макете, определенном в New методе. См. Ниже пример кода для использования Ecalendario, используя то, что было представлено:
procedure TFormMain.FormCreate (Sender: TObject);
begin
teCalendario.New(self, Layout1)
.onClickDate(ExibeData)
.Locale(ptBr)
.StartDate(Now)
.ShowCalendar;
end ;
procedure TFormMain.ExibeData (Data: TDate);
begin
Label1.Text := DateToStr(Data);
end ;Если вы хотите настроить календарь, вы можете редактировать непосредственно на ecalendario file.component.fmx, или можно использовать следующий код:
.config
.BackgroundColor(talphaColors.Yellow)
.SundaysColor(talphacolors.Red)
.SelectorColor(TAlphaColors.Blue)
.DaysColor(TAlphaColors.Blue)
.LineColor(TAlphaColors.Blue)
.MonthYearColor(TAlphaColors.Blue)
.ButtonsColor(TAlphaColors.Blue)
.& End Команда Config позволяет открывать параметры редактирования. В BackgroundColor() вы устанавливаете цвет фона календаря (который по умолчанию белый), а используемый параметр должен быть типом Talphacolors. Команда SundaysColor() отвечает за определение цвета воскресенья в календаре (который по умолчанию синий). Принять параметр типа Talphacolors. Команда SelectorColor() отвечает за установку цвета селектора и принятие удаленного в Talphacolors. Чтобы установить цвет линии, кнопки, имя месяца и года используют соответствующие команды: LineColor() , MonthYearColor() , ButtonsColor() . Чтобы определить цвет дней, за исключением воскресенья, используйте команду DaysColor() . Все эти команды ожидают параметр типа Talphacolors. Команда &End выходит из интерфейса конфигурации и возвращается к основному. Смотрите выдержку кода ниже с добавлением простой настройки:
procedure TFormMain.FormCreate (Sender: TObject);
begin
teCalendario.New(self, Layout1)
.onClickDate(ExibeData)
.Locale(ptBr)
.StartDate(Now)
.config
.BackgroundColor(talphaColors.Yellow)
.SundaysColor(talphacolors.Red)
.& End
.ShowCalendar;
end ;Ваш вклад очень приветствуется, будь то идентификация ошибки (проблема) или запрос на вытягивание. Не стесняйтесь вносить свой вклад. Если хотите, вы были бы счастливы, если сможете опубликовать эту работу другим людям.
Рафаэль де Фигейредо Алвес