Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  AW: StrToTime parst in falsches Datum

    Delphi
    by Codehunter, 21. Jun 2019
  Das folgende verwende ich für genau dieses Datumsformat. Du musst wahrscheinlich nur den einen oder anderen Begrenzer anpassen, je nach deinen Anforderungen.function StrToDate(const AValue: string): TDate;
  var
  LJahr, LMonat, LTag: Word;
  
  function DaysOfMonth(AMonat: Word; AJahr: Word = 0): Word;
  begin
  if (AMonat = 0) or (AMonat > 12) then begin
  Result := 0
  end else...