Sumário
-
Índice
Exemplo de uso
procedure
TForm1.EvDateEdit1DateError(Sender: TObject);
begin
ShowMessage(TEvDateEdit(Sender).Text + ' não é uma data válida!');
end
;