Einzelnen Beitrag anzeigen

Benutzerbild von Sir Rufo
Sir Rufo

Registriert seit: 5. Jan 2005
Ort: Stadthagen
9.454 Beiträge
 
Delphi 10 Seattle Enterprise
 
#11

Re: Verbesserte Version von YearsBetween, MonthsBetween

  Alt 27. Okt 2009, 18:01
Zitat von Wolfgang Mix:
@Sir Rufo

Mir fällt gerade ein, daß ich YearsBeween schon 1992 problemloser ohne Delphi
unter DBase entwickelt habe.
Die Grundidee ist diese

Du findest den Code unter CodeLib/SysUtils2/function Age();

Teste 'mal bitte

Grüß

Wolfgang
Jo, danke,

aber das kann ich nicht benutzen, da ich bei folgenden Vergleichszeiten
'27.10.2009 17:56:16' und
'27.10.2011 17:56:15'
folgendes Ergebnis möchte:
'1 Jahr 11 Monate 4 Wochen 2 Tage 23 Stunden 59 Minuten 59 Sekunden'
Und deine Funktion gibt mir da 2 Jahre aus

Die Himi-Funktion habe ich abgeändert und die liefert genau was ich brauche (ohne Schleife)

cu

Oliver
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ‎ea 0a 4c 14 0d b6 3a a4 c1 c5 b9 dc 90 9d f0 e9 de 13 da 60)
  Mit Zitat antworten Zitat