为什么我为表格添加一条日期纪录的时候会出现如:2001-10-21 12:25:30
我不想要后面的时间,该怎么做。
我试着在FromCreate事件中加入:DateFormat:='YYYY-MM-DD'为什么不行。
该怎么做,谢谢。
还有一件事:我想写一个组件,用TEdit做父类,加一个功能,是他只能输入日期值.
哪里有地方提供下载的,或者源码也行啊。谢谢

解决方案 »

  1.   

    直接用Tcalendar输入吧。
    不要时间则使用
    formatedate('YYYY-MM-DD',Now())
    转化为字符串就行了。
      

  2.   

    //设置日期显示格式为 yyyy-mm-dd
    procedure TfrmEmployeeMain.FormShow(Sender: TObject);
    begin
       DateSeparator :='-';
       ShortDateFormat :='yyyy-mm-dd';
       LongDateFormat := 'YYYY-MM-DD HH:MM:SS';
    end; 
    好像我用这个就可以了
      

  3.   

    我想写一个组件,用TEdit做父类,加一个功能,是他只能输入日期值.
    哪里有地方提供下载的,或者源码也行啊。谢谢
      用DateTimePicker之类的控件
      

  4.   

    'yyyy-mm-dd' 中'mm'要'MM'才是两位的天数
      

  5.   

    lionlsl(林) 谢谢你,你的办法我也试了,可是还是不行。
    我是这样的Procedure Frm_MainCreate(Sender:TObject);
        begin
          DateSeparator :='-';
          ShortDateFormat :='YYY-MM-DD';
          TimeSeparator:=':'; 
          TiemSeparator :=':';  
          TimeFormat:='HH:MM:SS';
        end;
    请问有没有好的办法呢?
    为什么我要这个不行。
      

  6.   

    我一添加纪录就自动的加上时间.我用的控件是:TDateTimePicker。
    而且我发现我所加入的纪录中,日期是不一样的,但是时间都是一样的。
    如:
    2001-10-21  12:20:35
    2003-01-18  12:20:35
    为什么会这样,能分析一下吗?