Topic: Validation of date field

Please let me know how to validate for empty date field ( not empty ) using script.
I have problem with script like below:

procedure mm_add_edit_edDate_OnExit (Sender: string);
begin

     if mm_add_edit.edDate.?????????? = '' then
     begin
          ShowMessage('Prosze podac date testu.');
          mm_add_edit.edDate.Color := clRed;
         
     end;
end;

Thanks
Jerry

Re: Validation of date field

procedure mm_add_edit_edDate_OnExit (Sender: string);
begin
     if mm_add_edit.edDate.Checked=False then
     begin
          ShowMessage('Prosze podac date testu.');
     end;
end;


For validate data on form, i recommend use event OnClick of button for save data.

procedure mm_add_edit_ButtonSave_OnClick (Sender: string; var Cancel: boolean);
begin
     if mm_add_edit.edDate.Checked=False then
     begin
          ShowMessage('Prosze podac date testu.');
          Cancel := True; // This cancel the action button
     end;
end;

but you can't use property edDate.Color, this don't work in Windows anymore.

Dmitry.

Re: Validation of date field

Thank you very much for you help and prompt reply.
Waiting for latest version 1.41