RelativeDateToString (rtl)

De Wiki1000
Révision datée du 17 octobre 2023 à 09:35 par Syfre (discussion | contributions) (Page créée avec « <source lang='delphi'>Function RelativeDateToString(dt:TDatetime; iUseTranslation:boolean):string;</source> Cette fonction retourne la date relative d'une representation ... »)
(diff) ← Version précédente | Voir la version actuelle (diff) | Version suivante → (diff)

<source lang='delphi'>Function RelativeDateToString(dt:TDatetime; iUseTranslation:boolean):string;</source>

Cette fonction retourne la date relative d'une representation de date relative.

Result La représentation en chaine de la date relative.
dt la date relative à convertir.
iUseTranslation
  • False: Utilise des abréviations
  • True : Utilise des traductions

Exemple

<source lang='delphi'> //Procedure TestRelativeDate; var dt1,dt2:TDatetime; AStr1,Astr2:string; begin

 AStr1 := '-3 mois, la fin de lannée'; 
 dt1 := StringToRelativeDate(AStr1); 
 AStr2 := RelativeDateToString(dt1,false{iUseTransaltion}); 
 ShowMessage(Format('%s - %s',[AStr1,AStr2])); 
 dt2 := StringToRelativeDate(AStr2);
 if dt1=dt2 then SHowMessage('Ok') else showMessage('Failed'); 

end; </source>

Voir aussi:

{{#if:Développement DSM|

{{#if:Développement DSM|— Développement DSM |}} — Développement DSM

|

{{#if:|— [[{{{1}}}]] |}} — Développement DSM

}}