Форум: "Основная";
Текущий архив: 2009.10.18;
Скачать: [xml.tar.bz2];
ВнизMonthCalendar Найти похожие ветки
← →
Iris © (2008-08-27 10:01) [0]Проблема следующая:
есть MonthCalendar := TMonthCalendar(Sender);
хочу присвоить
StartDay := 1;
StartMonth := 2;
StartYear := 2008;
MonthCalendar.Date := EncodeDate(StartYear, StartMonth, StartDay);
выдает ошибку "Failed to set calendar selected range"
что делаю не так?
← →
Vlad Oshin © (2008-08-27 10:17) [1]а точно переменные не меняются до EncodeDate(StartYear, StartMonth, StartDay); и перечислены так, как тут?
У меня работает..procedure TForm1.Button1Click(Sender: TObject);
var
a :tMonthCalendar;
StartDay :word;
StartMonth :word;
StartYear :word;
begin
StartDay := 1;
StartMonth := 2;
StartYear := 2008;
a:=tMonthCalendar.Create(form1);
a.Parent := form1;
a.Left := 1;
a.Top := 1;
a.Visible := 1>0;
a.Date:=EncodeDate(StartYear,StartMonth,StartDay);
end;
← →
Leonid Troyanovsky © (2008-08-27 10:23) [2]
> Iris © (27.08.08 10:01)
> выдает ошибку "Failed to set calendar selected range"
> что делаю не так?
А что у нас с MultiSelect, MaxSelectRange & etc?
--
Regards, LVT.
← →
Iris © (2008-08-27 13:17) [3]Спасибо, MaxSelectRange стоял на 31,
кстати за что отвечает MaxSelectRange?
← →
Vlad Oshin © (2008-08-27 13:44) [4]MaxSelectRange (published) Specifies the maximum number of days that can be selected.
но у меня опять работает..
procedure TForm1.Button1Click(Sender: TObject);
var
a :tMonthCalendar;
StartDay :word;
StartMonth :word;
StartYear :word;
begin
StartDay := 1;
StartMonth := 2;
StartYear := 2008;
a:=tMonthCalendar.Create(form1);
a.Parent := form1;
a.Left := 1;
a.Top := 1;
a.Visible := 1>0;
a.Date:=EncodeDate(StartYear,StartMonth,StartDay);
ShowMessage(inttostr(a.MaxSelectRange)); // =31
end;
← →
Leonid Troyanovsky © (2008-08-27 14:20) [5]
> Vlad Oshin © (27.08.08 13:44) [4]
> но у меня опять работает..
a.MultiSelect := True;
a.EndDate := Now;
--
Regards, LVT.
← →
Iris © (2008-08-27 14:31) [6]все заработало, спасибо
← →
Vlad Oshin © (2008-08-27 15:09) [7]понятно
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2009.10.18;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.124 c