用户输入年份和月份的字符串,格式为 YYYYMM ,如 200506如果判断用户输入的字符串是否合法呢?

解决方案 »

  1.   

    if TryStrToDate('2005/06/'+'01',s) then  showmessage('ok');
    將你的字串組成日期格式后再轉
      

  2.   

    try
      StrTodate('200506'+'01');
    except
        on e: Exception do
        begin
          showmessage(‘请输入有效的日期’);
          exit;
        end;
    end;
      
      

  3.   


    //判断指定字符串是否为日期格式的函数
    function isDate(Const aDateStr:String):Boolean;
    begin
      result:=True;
      try
        StrToDate(aDateStr);//尝试将字符串转换为日期
      except
        result:=False;//如果出错,则返回False;
      end;
    end;