Datum von DateTimePicker in eine Ini File schreiben

[DeddyH]

Klar kann man.

Delphi-Quellcode:

var Ini: TIniFile;
    i:   Integer;
begin
  ini := TIniFile.Create('C:\Versuch.ini');
  try
    // Zum Speichern
    For i := 0 to ComponentCount - 1 do
    begin
      If Components[i] Is TEdit then
        ini.WriteString('Daten',(Components[i] as TEdit).name,(Components[i] as TEdit).text)
      else if Components[i] is TDateTimePicker then
        ini.WriteDate('Daten',(Components[i] as TDateTimePicker).name,(Components[i] as TDateTimePicker).Date);
        //oder auch als String, wenn Dir das lieber ist
        //ini.WriteString('Daten',(Components[i] as TDateTimePicker).name,FormatDateTime('dd.mm.yyyy',(Components[i] as TDateTimePicker).Date)); 
    end;
  finally
    ini.Free;
  end;
end;