Ergebnis der Suchanfrage

• Forum: Datenbanken

  AW: Vormonat ermitteln

   
    by Rollo62, 3. Mai 2023
  Naja, das ist aus dem Beispiel von dem Link, den ich dazugepackt hatte.
  Es wird auch mit -1 = einen Tag vorher funktionieren, weil ein das Datum zerlegt wird und daraus neues Datum gebaut wird, immer auf den 01.mm.yy gesetzt.
  Ein Tag vorher ist halt auch zwangsweise immer einen Monat vorher.
  Diese Idee finde ich ganz nett.
  
  Es ist aber nicht ganz klar, ob es jetzt überhaupt um Delphi oder um...
• Forum: Datenbanken

  AW: Vormonat ermitteln

   
    by Rollo62, 3. Mai 2023
  Vielleicht ist das eine Möglichkeit ?
  https://entwickler-ecke.de/viewtopic.php?p=407179&sid=644b5bcb6098e469e1b1da599aa8a398
  
  
  function Vormonat(aDatum: TDateTime): String;
  var J, M, T : word;
  begin
  DecodeDate(aDatum,J,M,T);
  aDatum := EncodeDate(J,M,1);
  Result := FormatDateTime('MMMM',aDatum-1);