SetLocaleInfo(LOCALE_USER_DEFAULT,LOCALE_SSHORTDATE,pchar('yyyy-MM-dd'));

解决方案 »

  1.   

    formmatdatetime('yyyy-mm-dd',date);返回的就是你想要的!
      

  2.   

    LongDateFormat := 'yyyy-mm-dd';
      

  3.   

    DateSeparator:='-';
      ShortDateFormat:= 'yyyy-mm-dd';
      LongDateFormat := 'yyyy-mm-dd';  formatdatetime('yyyy-mm-dd',date);
      

  4.   

    shortDateFormat := 'yyyy-mm-dd';
      

  5.   

    在工程里写 :shortDateFormat := 'yyyy-mm-dd';
      

  6.   

    在工程文件中
    Application.Initialize; 后增加
    DateSeparator:='-';
    ShortDateFormat:= 'yyyy-mm-dd';
      

  7.   

    DateSeparator:='-';
    ShortDateFormat:= 'yyyy-mm-dd';
    LongDateFormat := 'yyyy-mm-dd';
    formatdatetime('yyyy-mm-dd',date);
      

  8.   

    strtodatetime(formatdatetime('YYYY-MM-DD',NOW()))
      

  9.   

    strtodatetime(formatdatetime('YYYY-MM-DD',NOW()))
    简练
      

  10.   

    Table1.Fieldbyname('Birthday').EditMask:='!9999\年!99\月!99\日;1; ';
    这里注意'1;'后面有个空格
      

  11.   

    打开控制面版里的区域设置,然后选择日期页标签,把日期格式设为“yyyy-MM-dd”就可以了。