Delphi-Quellcode:
DateTimePicker1.Date:= Date;
DateTimePicker1.MinDate:=Trunc(date)-10;
DateTimePicker1.MaxDate:= Trunc(date);
obenstehender Code funktioniert bei mir in Vista problemlos
also vermutlich bei dir:
Delphi-Quellcode:
// aktuelles Datum setzen
DateTimePicker1.Date := Date();
// Min/Max-Datum setzen
DateTimePicker1.MinDate := Trunc (adsTblAuftrag.FieldByName('ErfassDatum').AsDateTime);
DateTimePicker1.MaxDate := trunc(Date);
sorry, hab überlesen, dass es erst beim zweiten mal auftritt.
Delphi-Quellcode:
DateTimepicker1.minDate:= 0;
DateTimepicker1.maxdate:= Date +100;
//sicherstellen das Datum grösser ist als einzufügendes Datum und bestehendes Datum
//jetzt neues Datum setzen
DateTimePicker1.Date:= Date +10;
DateTimePicker1.MinDate:=Trunc(date);
DateTimePicker1.MaxDate:= Trunc(date)+10;