Demo mit Ini's

[mOzZzI]

Tutmir Leid aber ich komme echt nicht wieter...

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
var ini: TIniFile;
begin
  ini:= TiniFile.Create('D:\config.ini');
  ini.WriteDate('DATE', 'STARTDATE', Date);
  ini.Free;
end;

procedure TForm1.Button1Click(Sender: TObject);
var ini: TiniFile;
jahr:word;

begin
ini:= TiniFile.Create('D:\config.ini');
Label1.Caption:=ini.ReadString('DATE', 'STARTDATE', DateToStr(Date));
Label2.Caption:=
DaysBetween(DecodeDate(Jahr, Monat , Tag))-DaysBetween(now); //<< Hier komme ich nicht weiter
end;