Discussion :

[messahel]

Bonsoir a tous;
comment spécifier les paramètres MaxDate et MinDate dans le composant DBDateTimeEdit ?

[anapurna]

salut

quel version de Delphi ? ... sur la version 7 il n'existe pas de propriété min et max pour ce composant

[messahel]

J'utilise delphi 10.1
J'ai pas trouvé les parametres et je cherche comment resoudre ce probleme

[SergioMaster]

Bonjour

le composant DBDateTimeEdit ?

Ce n'est pas un composant standard Delphi ça, ou alors j'ai de mauvais yeux ?
Pourquoi ne pas utiliser l'évènement OnValidate qui permettra de tester

[anapurna]

salut

si effectivement les propriétés n'existent pas, c'est qu'il faut les inventer

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
 
Type 
 
TMonDateEditDb = Class(TDateEditDb)
  FDatemin  : TDatetimes;
  FDatemax : TDatetimes;
 ....
  Constructor Create(...)
  Function GetDateMin : TDatetimes;
  Function GetDateMax : TDatetimes;
  Procedure SetDateMin(adate : TDatetimes);
  Procedure SetDateMax(adate : TDatetimes);
  Property  Datemin  : TDatetimes read GetDateMin write SetDateMin
  Property  Datemax  : TDatetimes read GetDateMax write SetDateMax
end;
....
Constructor TMonDateEditDb.Create(...);
begin
  Inherited Create;
  FDatemin  := DateDecDays(now,1); // un jour avant 
  FDatemax := DateIncDays(now,1);  // un jour apres 
  .... 
end;
 
....