date

Question

Bonjour,
comment faire pour la saisie d'une date 00/00/aaaa (cette date concerne les gens né en présumé) pour celà il faut que le jour et mois soit 00, alors le système refuse cette date.
si qlq a une idée je suis à l'écoute MERCI

japee · Answer

Salut,

Tu ne peux pas convertir depuis string vers TDate ou TDateTime une date qui n'existe pas, cela déclenchera toujours une erreur.

Il faut donc, à priori, saisir les "dates" au format string dans tes champs, puis les tester avant de les convertir et de les manipuler sous forme de TDate.
Ça me paraît incontournable.

Mais s'il s'agit de base de données, il y a peut-être une astuce, et là je passe la main aux spécialistes.

f0xi · Answer

tu n'as qu'a stocker uniquement l'année ...

Year : Word;

<hr size="2" width="100%" />Croc (click me)

hassaine · Answer

Bonjour, Merci foxi, Merci Japee pour la réponse mais je suis obligé d'introduire le jour et le mois et ce pour des calculs internes 
MERCI

japee · Answer

Et pourquoi pas entrer une date improbable comme : 01/01/1799.
Je ne sais pas ce qui s'est passé ce jour-là, mais pas grand monde pourra nous le raconter de vive voix, lol...
Et ton calcul interne peut ainsi éliminer cette date qui signifie "gens né en présumé" selon ta terminologie.
Non ?

dominique.stock · Answer

Bonjour,
Je crois que si tu veux utiliser une variable TdateTime, jamais, il n'acceptera une date qui n'existe pas ....

Dom

WhiteHippo · Answer

Bonsoir

Pourquoi ne pas utiliser la constante suivante :

const
  DATE_NAISSANCE_PRESUMEE = -693594 ;

Ce qui correspond au dimanche 0 décembre de l'année 0000 à 00 heures 00 minutes 00 secondes 000 millisecondes.

Cordialement. 
<hr />"L'imagination est plus importante que le savoir." Albert Einstein

Mowglinaute · Answer

Encore plus simple, alors place le composant Label1 ensuite tape: Label1.caption:='30/05/2007' // C'est tout simple !
Et bonne continuation en programmation Delphi qui est le meilleur ami de l'homme après le chien !
Un peu d'humour ne tue personne ...
MOWGLINAUTE

WhiteHippo · Answer

Mowglinaute, je comprends pas bien ta remarque avec le fil du post ?? 

"Un peu d'humour ne tue personne ..." Malheureusement si !!! Avec un humour bien lourd, on risque de mourir ... d'ennui.

Cordialement. 
<hr />"L'imagination est plus importante que le savoir." Albert Einstein

AmineTheGreat · Answer

salam,
voir le site suivant:
http://mgc99.free.fr/Delphi1.html ou encore http://mgc99.free.fr/Delphi6.html

"Si tu veux du miel, résiste au piqure des abeilles"

Date

9 réponses

Votre réponse

Discussions similaires