@ MrSpock:
Delphi-Quellcode:
var
Ini: TIniFile;
sj,path,today,tomorrow: String;
dnr: Integer;
...
dnr:=DayOfWeek(Date);
today:=DateToStr(Date);
if dnr=5 then tomorrow:=DateToStr(Date+3)
else if dnr=6 then tomorrow:=DateToStr(Date+2)
else tomorrow:=DateToStr(Date+1);
Es soll halt, falls der momentane Tag Nr. 5 (Freitag) oder 6 (Samstag) ist, jeweils 3 bzw. 2 Tage weitergerechnet werden.
Da ich mir bei Delphi nicht sicher war, wie man das Datum korrekt weiterrechnet, hab ichs mal auf primitive Weise versucht, weiterzurechnen.
Kann natürlich sehr gut sein, dass dort auch dann der Fehler liegt..
@ mkinzler: Danke. Nun bekomm ich aber noch einen Fehler bezüglich unpassender Feldtypen.