Discussion :

[damene]

Salut.

Le DataField de dbEdit1 contient une date. J'utilise la propriété EditMask pour formater la date.

Le problème est lorsqu'on saisie un chiffre supérieur à 30,31 pour le jour ou supérieur à 12 pour le mois, je provoque une Classe d'Exeption EconvertError.

Les évènements 'Before' ne me permettent pas de tester un champ seul, ils concernent tout l'enregistrement.

Comment tester directement la validité d'une date sans passer par un Edit1.Text qu'on insère dans la Table après validation par un Try ou TryStrToDate

Merci.

[SergioMaster]

pourquoi ne pas utiliser un composant existant , au débotté :

dans la JVCL : TjvDBDateEdit ou TjvDBDateTimePicker
dans SmComponent TDBEditTyped
avec D3 j'utilise la RXlib : RxDBDateEdit
ou aussi DBEzdateEdit (je ne me rappelle plus d'où il vient celui-ci )

Bref ceci pour dire qu'il existe bien un composant gratuit (au moins les 3 premiers) qui fera ce que tu cherches , tout dépend de ta version de Delphi

[damene]

pourquoi ne pas utiliser un composant existant , au débotté :

dans la JVCL : TjvDBDateEdit ou TjvDBDateTimePicker
dans SmComponent TDBEditTyped
avec D3 j'utilise la RXlib : RxDBDateEdit
ou aussi DBEzdateEdit (je ne me rappelle plus d'où il vient celui-ci )

Bref ceci pour dire qu'il existe bien un composant gratuit (au moins les 3 premiers) qui fera ce que tu cherches , tout dépend de ta version de Delphi

J'utilise Delphi 7 Entreprise

Comment poser sur ma fiche TjvDBDateEdit , TjvDBDateTimePicker ou RxDBDateEdit
STP
Merci

[ShaiLeTroll]

Installer le package nécessaire,

il existe aussi en standard le TDateTimePicker qui fourni obligatoirement une date ...

sinon

ajouter dans le OnBeforePost, un TryStrToDate(Edit.Text) et déclenché un Abort, voir l'aide !

[damene]

Citation ShaiLeTroll

Installer le package nécessaire,

Je n'ose pas dire comment faire car tu me donnerez la réponse de Rayek à alexF le 10/01/2007 qui s'est heurté au même Problème. La réponse était

Developpez ne se limite pas qu'au forum

Aussi pourrais-tu m'indiquer un tutoriel qui me permette d'installer le package necessaire.

[ShaiLeTroll]

Ben, euh, tu télécharge le projet sur Jedi par exemple, puis tu lance install.bat, et ça se fait tout seul, pour cette lib c'est très simple !

sinon, il faut compiler et installer un fichier DPK, je ne vois rien de plus à dire ...

Sinon, j'ai donné une solution sans Lib, ... pourquoi ne pas l'essayer avant ?

[damene]

ajouter dans le OnBeforePost, un TryStrToDate(Edit.Text) et déclenché un Abort, voir l'aide !

Cela suppose au lieu de travailler avec le Composant DBEdit on travaille avec le composant Edit. Tester avec TryStrToDate et rajouter un bouton de validation (pour inclure la date si elle est correcte).

Si c'est le cas je sais le faire. Je voulais rester dans la logique d'utilisation de DBNavigator pour la validation.

J'ai commencé à fouiner dans la FAQ : http://atlantis.developpez.com/flash/icomposant/
pour installer un nouveau composant.

[dd_garion]

Code :

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

1
2
3
 
Comme dit ShaiLeTroll :
il existe aussi en standard le TDateTimePicker qui fourni obligatoirement une date ...

Pq se compliquer la vie, cette objet se trouve dans l'onglet win32. Pour débuter c'est largement suffisant.

[damene]

Code :

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

1
2
3
 
Comme dit ShaiLeTroll :
il existe aussi en standard le TDateTimePicker qui fourni obligatoirement une date ...

Pq se compliquer la vie, cette objet se trouve dans l'onglet win32. Pour débuter c'est largement suffisant.

Je crois que je me suis fait mal comprendre.

La discution que j'ai introduite vient après la discussion introduite par souminet

Comment tester la validité d'une date dans un Edit

Là il a été suggéré d'utiliser TryStrtoDate soit TdateTimePicker

Cela je l'ai parfaitement maîtrisé. A la Place de TEdit j'ai ultilisé TdateTimePicker et je vérififie la validité de la saisie d'une date.

Maintenant je suis dans une application où j'ai une table contenant un champ date un DBGrid un DBNavigator et un DBEdit (reprenant le dit champ date avec EditMask pour formater la date) et je fais soit une insertion ou un Edit avec DBNavigator, lorsque je saisis une date erronée avac DBEdit le déclenche une classe d'exception

Je joins le code avec lequel je travaille où j'ai rajouté la recherche d'un enregistrement avec TDateTimePicker

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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
unit Unit1;
 
interface
 
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, ExtCtrls, DBCtrls, Mask, Grids, DBGrids, DB, DBTables,
  Buttons, ComCtrls,DateUtils;
 
type
  TForm1 = class(TForm)
    Table1: TTable;
    DataSource1: TDataSource;
    DBGrid1: TDBGrid;
    DBEdit1: TDBEdit;
    DBNavigator1: TDBNavigator;
    Label2: TLabel;
    Table1DatJour: TDateField;
    Table1JourSemaine: TStringField;
    DateTimePickerRech: TDateTimePicker;
    BitBtn1: TBitBtn;
    Label3: TLabel;
    procedure BitBtn1Click(Sender: TObject);
  private
    { Déclarations privées }
  public
    { Déclarations publiques }
  end;
 
var
  Form1: TForm1;
 
implementation
 
{$R *.dfm}
 
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
 
Table1.locate('DatJour',DateToStr(DateOf(DateTimePickerRech.Date)),[loPartialKey]);
 
end;
 
end.

[ShaiLeTroll]

Etrange pour le locate ... si 'DatJour' est un champ date, ceci suffit :

Code :

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

Table1.locate('DatJour', DateTimePickerRech.Date),[])

[damene]

Etrange pour le locate ... si 'DatJour' est un champ date, ceci suffit :

Code :

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

Table1.locate('DatJour', DateTimePickerRech.Date),[])

Exact ça marche aussi. Autant utiliser le plus simple.

Mon problème reste entier pour l'utilisation de DBEdit. Je vais piocher la question dans
http://www.developpez.com/delphi/faq...osantinterface
http://atlantis.developpez.com/flash/icomposant/
et
http://www.developpez.net/forums/sho...d.php?t=261445

pour voir comment tirer dans la JVCL : TjvDBDateEdit ou TjvDBDateTimePicker

Merci