Topic: DateTimePicker1.MaxDate
Не получается установить максимальной действующую дату
Form1.DateTimePicker1.MaxDate := Now;либо
Form1.DateTimePicker1.MaxDate := Trunc(Now);при этом если ставить те же параметры для MinDate то все работает
- pavlenko.vladimir.v
- Member
- Offline
2 2023-01-24 07:55:55 (edited by vovka3003 2023-01-24 08:11:21)
- vovka3003
- Member
- Offline
Re: DateTimePicker1.MaxDate
Это еще один глюк, с которым придется жить.
Работать будет только при явном приведении к типу:
...var D:TDateTime;
begin
D:= Now;
Form1.DateTimePicker1.MaxDate := D;
...- pavlenko.vladimir.v
- Member
- Offline
Re: DateTimePicker1.MaxDate
vovka3003 wrote:
Это еще один глюк, с которым придется жить.
Работать будет только при явном приведении к типу:...var D:TDateTime; begin D:= Now; Form1.DateTimePicker1.MaxDate := D; ...
Та же самая ошибка
Когда я открываю форму, onshow то устанавливается максимальная дата, если открыть компонент и закрыть его возникает ошибка
Когда я устанавливаю скриптом минимальную и максимальную даты то опять же возникает ошибка при чем ошибка именно на максимальную дату.
Если установить максимальную дату и добавить один ден (Date +1) или (Now+1), то все работает.
- vovka3003
- Member
- Offline
Re: DateTimePicker1.MaxDate
У меня все работает...
procedure Form1_OnShow (Sender: TObject; Action: string);
var D:TDateTime;
begin
D:= Now;
Form1.DateTimePicker1.MinDate := Date;
Form1.DateTimePicker1.MaxDate := D;
end;5 2023-01-24 08:49:34 (edited by pavlenko.vladimir.v 2023-01-24 08:49:51)
- pavlenko.vladimir.v
- Member
- Offline
Re: DateTimePicker1.MaxDate
Post's attachments
Безымянный.png 44.29 kb, 47 downloads since 2023-01-24
- vovka3003
- Member
- Offline
Re: DateTimePicker1.MaxDate
А формат даты какой?
- pavlenko.vladimir.v
- Member
- Offline
Re: DateTimePicker1.MaxDate
vovka3003 wrote:
А формат даты какой?
по умолчанию (dd.mm.yyyy)
- vovka3003
- Member
- Offline
Re: DateTimePicker1.MaxDate
В компоненте...
9 2023-01-24 09:08:37 (edited by pavlenko.vladimir.v 2023-01-24 09:09:02)
- pavlenko.vladimir.v
- Member
- Offline
Re: DateTimePicker1.MaxDate
vovka3003 wrote:
В компоненте...
я пробовал играть с форматом, но это бесполезно, вот если к действующей дате добавить 1 то все работает
Post's attachments
Безымянный.png 52.38 kb, 42 downloads since 2023-01-24
10 2023-01-24 09:23:57 (edited by pavlenko.vladimir.v 2023-01-24 09:24:17)
- pavlenko.vladimir.v
- Member
- Offline
Re: DateTimePicker1.MaxDate
vovka3003 wrote:
В компоненте...
ошибка в выборе даты
сделал так и все заработало
procedure Form1_DateTimePicker1_OnDropDown (Sender: TObject);
begin
Form1.DateTimePicker1.DateTime := Date;
end;
procedure Form1_OnShow (Sender: TObject; Action: string);
var D:TDateTime;
begin
D:= Now;
Form1.DateTimePicker1.MinDate := Date;
Form1.DateTimePicker1.MaxDate := D;
Form1.DateTimePicker1.Checked := False;
end;11 2023-01-24 09:28:15 (edited by vovka3003 2023-01-24 09:28:31)
- vovka3003
- Member
- Offline
Re: DateTimePicker1.MaxDate
Ну или так:
Form1.DateTimePicker1.MinDate := Date;
Form1.DateTimePicker1.MaxDate := Date+0.9999884260;Компонет через жопу работает...
- pavlenko.vladimir.v
- Member
- Offline
Re: DateTimePicker1.MaxDate
vovka3003 wrote:
Ну или так:
Form1.DateTimePicker1.MinDate := Date; Form1.DateTimePicker1.MaxDate := Date+0.9999884260;Компонет через жопу работает...
меньше
0.19999884260;
иначе округляет в большую сторону и дата добавляется
- vovka3003
- Member
- Offline
Re: DateTimePicker1.MaxDate
У меня не добавляется...
В любом случае при повторном нажалии на кнопку пикера вываливается ошибка.
А какая глобальная задача вообще?
- pavlenko.vladimir.v
- Member
- Offline
Re: DateTimePicker1.MaxDate
vovka3003 wrote:
У меня не добавляется...
В любом случае при повторном нажалии на кнопку пикера вываливается ошибка.
А какая глобальная задача вообще?
если коротко, то - нужно уставить минимальную дату из БД и максимальную (текущую)
- pavlenko.vladimir.v
- Member
- Offline
Re: DateTimePicker1.MaxDate
vovka3003 wrote:
У меня не добавляется...
В любом случае при повторном нажалии на кнопку пикера вываливается ошибка.
А какая глобальная задача вообще?
все таки с этим работает
Form1.DateTimePicker1.DateTime := Date; видимо автоматом как-то не верно выбирает дату