IsDate 日付チェック

Delphi 標準関数には残念ながらありません。
ただし簡単に作れるのでその一例をあげます。

■ IsDate関数の例
function IsDate(S : string): boolean;  
var
  d : TDateTime;
begin
  Result  :=  True;
  try
    d :=  StrToDate(S);
  except
    on  E : EConvertError do  begin
      Result  :=  False;
    end else
      raise;
  end;
end;

これだと日付の変換に失敗した場合に Delphi IDE でエラーダイアログが表示されてしまいます。それを抑制するには [ ツール | デバッガオプション ] - "言語固有の例外" の "Delphi の例外で停止" のチェックを外します。

■ IsNumeric関数の使用例
procedure TForm1.Button1Click(Sender: TObject);  
begin
  if not IsDate('1999/12/12')  then  begin
    ShowMessage('変換エラー');
  end;
end;