AddMonths (rtl)
De Wiki1000
(Différences entre les versions)
| Ligne 21 : | Ligne 21 : | ||
<source lang='delphi'> | <source lang='delphi'> | ||
begin | begin | ||
| + | .... | ||
| + | // Search items where item's date is newer than 3 months | ||
| + | AWhere := '(aUser=%1) and (aDate>=%2)'; | ||
| + | Args[0] := GlbUserName; | ||
| + | Args[1] := AddMonths(Date,-3); | ||
| + | ... | ||
end; | end; | ||
</source> | </source> | ||
| Ligne 28 : | Ligne 34 : | ||
{{Footer|Développement DSM}} | {{Footer|Développement DSM}} | ||
[[category:RTL Date et heure]] | [[category:RTL Date et heure]] | ||
| − | |||
Version actuelle en date du 23 janvier 2014 à 16:05
Function AddMonths(const DT:DateTime; const Months:Extended):DateTime;
Cette fonction ajoute un nombre de mois à une date.
| Result | La date incrémentée du nombre de mois. |
| DT | Date d'origine. |
| Months | Nombre de mois à ajouter. |
La date est ajustée au dernier jour du mois si nécessaire.
Exemple
begin .... // Search items where item's date is newer than 3 months AWhere := '(aUser=%1) and (aDate>=%2)'; Args[0] := GlbUserName; Args[1] := AddMonths(Date,-3); ... end;
Voir aussi:
