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.