Demo mit Ini's

[mOzZzI]

also, bis jetzt bin ich so weit gekommen, aber das funzt nicht...

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;
begin
ini:= TiniFile.Create('D:\config.ini');
Label1.Caption:=ini.ReadString('DATE', 'STARTDATE', DateToStr(Date));
Label2.Caption:=ini.ReadString('DATE', 'STARTDATE', DecodeDateTime(Date)) //Undefinerter Bezeichner DecodeDateTime;