Nun soll dieses Datum als Vorgabe an einen CalendarDialog übergeben werden. Der Wert steht nach Übergabe auch in .date.
Der Kalender jedoch zeigt mir das aktuelle Tagesdatum und nicht den gewünschten Wert aus .date
Code: Alles auswählen
LDatum := GetIniFile('Auftrag', 'Leistungsdatum', FormatDateTime('dd.mm.yyyy', now));
dtmBasis.Calendar.Title := 'Leistungsdatum';
dtmBasis.Calendar.Date := StrToDate(LDatum, 'dd.mm.yyyy'); // Das funktioniert, wird aber im Kalender nicht angezeigt.
dtmBasis.Calendar.Execute;
WriteIniFile('Auftrag', 'Leistungsdatum', FormatDateTime('dd.mm.yyyy', dtmBasis.Calendar.Date));