contrôle des dates

Question

Bonjour, j'aimerais que vous m'aidiez sur ce coup la.Je veux controler les dates dans une de mes applications de gestion de patients.le problème est que j'ai gerer les dates de facon jour ,mois ,année de type chaine de caractere.Je ne sais pas comment proceder.Merci d'avance pour votre aide

Yanb · Answer

Salut, 
il existe pour tes recherches StrToDate, StrToDateDef, StrToDateTime,  StrToDateTimeDef, TryStrToDate, TryStrToDateTime, FormatDateTime, TFormatSettings, GetLocaleFormatSettings, DateSeparator, ... et l'inverse DateToStr, DateTimeToStr, ...
Exemple
var
  VDateTime : TDateTime;
begin
  VDateTime := StrToDateTimeDef(Edit1.Text, Now);
  ShowMessage(FormatDateTime('dd-mm-yyyy', VDateTime));
//ou
  if TryStrToDateTime(Edit1.Text, Value) then
    ShowMessage('La date est correcte !')
  else
    ShowMessage('La date n''est pas correcte !');
end;
@+

Contrôle des dates

1 réponse

Votre réponse

Discussions similaires