Seems easy but i don't see the MinDate value beeing tested:
- Code: Select all
procedure TIWEditOrderItem.SetValidFrom(const Value: TDateTime);
var
FormatString : String;
begin
FValidFrom := Value;
FormatString := ARR_WEBDATEFORMAT[UserSession.IMSession.WebDateFormat];
dtpCancelDate.JQDatePickerOptions.DateFormat := FormatString;
dtpCancelDate.Date := FValidFrom;
dtpCancelDate.JQDatePickerOptions.MinDate := Value;
end;
FormatString = 'd-m-yyyy'
When should the internal check on MinDate take place ?
Eric