救救我这可怜的人吧! delphi高手请进来好吗?

Question

在主程序前加以下句子：
SHORTDATEFORMAT :='mm/dd/yyyy';

Answer 1

var yourdate:TdateTime;
formatdatetime('yyyy-mm-dd',yourdate);即可；
建议你查阅delphi 帮助关于formatdatetime,你要变成文字都可以

Answer 2

   如果你是直接采用控件TQRSysData时出现上面的情况，那么是否试过将操作系统的时间改成你需要的格式呢？如果没有的话，那么你可以先试着将它改为你要的格式，然后看看你的程序运行的效果。另外还有一个解决的办法，你可以直接用TLabel或者TQRLabel控件来显示时间，将它的Caption属性用时间串来赋价。该时间串的格式可以由Formatdatetime函数来获得。不知道我能否帮到你？Happy a good time!

Answer 3

    一个更笨很笨的方法，编写一个字符串处理函数，取最后两位换算成数值，若>50，则前面加19，若<50前面加20，够用一百年。

Answer 4

修改相应的 TDateTimeField 的 DisplayFormat 特性等于 'mm/dd/yyyy'