Ver Mensaje Individual
  #4  
Antiguo 13-03-2014
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola mantraxer21.

No conozco el control JvDateTimePickerEdit, pero con un TDateTimePicker podrías hacer:
Código Delphi [-]
...

uses DateUtils;

procedure TForm1.DateTimePicker1Exit(Sender: TObject);
var
  d1,d2: TDateTime;
begin
  d1:= DateTimePicker1.DateTime;
  d2:= Now;
  // Si la fecha ingresada es menor o igual a la fecha actual o es día no hábil ...
  if ((d1 <= d2) or (DayOfTheWeek(d1)>5)) then
    raise Exception.Create('El día seleccionado no es válido'); // Mostrar error
  //...
end;
No usé el evento OnChange por que el control TDateTimePicker lo dispara dos veces cuando se cambia la fecha desplegando el calendario, por lo que obtendrías duplicado el mensaje de error. Tal vez el control que usas no tenga ese comportamiento y puedas incluir el código de verificación en él.

Saludos
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita