[[enecumene]]

Hola, a ver, intenta con esto:

Código Delphi [-]
var
  Fecha: TDateTime;
begin
  if not TryStrToDate(RxDateEdit.Text, Fecha) then
  begin
    ShowMessage('Algo va mal');
  end;
end;

Saludos.