Bedingung: nächster Monat beginnt

[Newcomer91]

Okay, ich probiers.

[Newcomer91]

Problem gelöst, danke an alle ;)

Delphi-Quellcode:

function CurrentMonthFileName(const DestDir: string): string;
const MY_EXTENSION = 'txt';
begin
  Result := Format('%s%s.%s',[IncludeTrailingPathDelimiter(DestDir),
                              FormatDateTime('yyyy-mm',Date),
                              MY_EXTENSION]);
end;

hats gebracht ;)

[skh]

noch eine Alternative zu deinem Progrämmchen..

Gib mal in deiner Textdatei in der ersten Zeile folgendes ein:

.LOG

anschliessend abspeicherm und neu öffnen
jetzt steht nach jedem NEU-ÖFFNEN am Ende der letzten Textzeile
die aktuelle Uhrzeit und das Datum

[hitzi]

Zitat:

Zitat von skh (Beitrag 1070795)

.LOG

Funktioniert tatsächlich :shock: Was ist der Sinn hinter dieser versteckten Funktion? Was ist wenn ich wirklich mal .LOG im Texteditor abspeichern will ohne dann immer das Datum und die Zeit mit an gehangen zu bekommen?

[Newcomer91]

Cool, hätt ich das mal eher gewusst. Hab Das Datum und Uhrzeit ding mit DateandTime gelöst. ;)
geht beides.

[skh]

Zitat:

Zitat von hitzi (Beitrag 1070798)

Zitat:

Zitat von skh (Beitrag 1070795)

.LOG

Funktioniert tatsächlich :shock: Was ist der Sinn hinter dieser versteckten Funktion? Was ist wenn ich wirklich mal .LOG im Texteditor abspeichern will ohne dann immer das Datum und die Zeit mit an gehangen zu bekommen?

:arrow: da passiert nichts, es sei denn du schreibst den Eintrag an den Anfang der Datei!!

[Sir Rufo]

Zitat:

Zitat von skh (Beitrag 1070795)

noch eine Alternative zu deinem Progrämmchen..

Gib mal in deiner Textdatei in der ersten Zeile folgendes ein:

.LOG

anschliessend abspeicherm und neu öffnen
jetzt steht nach jedem NEU-ÖFFNEN am Ende der letzten Textzeile
die aktuelle Uhrzeit und das Datum

:warn: Das ist aber eine Funktion des Windows-Text-Editors und keine Funktion des Betriebssystems.

Bei einem x-beliebigen anderen Editor wird da nichts passieren (es sei denn, die hätten das auch eingebaut)