Thema: Delphi Differenz berechnen

Einzelnen Beitrag anzeigen

Benutzerbild von Sanchez
Sanchez

Registriert seit: 24. Apr 2003
Ort: Neumarkt Stmk
892 Beiträge
 
Delphi XE6 Enterprise
 
#10

Re: Differenz berechnen

  Alt 8. Jul 2003, 22:08
Sorry, da hab ich was vergessen, der code sollte so aussehen:

Delphi-Quellcode:
Source:

var
  TagCount: Integer;
begin
  TagCount := Trunc(StrToDateTime(AktuellesDatum.Caption))
                   - Trunc(StrToDateTime(AltesDatum.Caption));

  Label3.Caption := 'Es sind ' + IntToStr(TagCount) + ' Tage.';
end;
"Trunc" verlangr einen Fließkommawert, ich hab ihm aber einen String gegeben.

So sollte es aber funktionieren.
Daniel
  Mit Zitat antworten Zitat