Delphi 带星期几的日期格式化

把日期按日期+星期几的格式输出

方法1：DatetoStr + DayOfWeek计算 ，这种办法灵活，但计算量大，不再祥叙。

方法2：FormatDateTime

具体代码如下：//这里需要用FormatDateTime，DatetoStr没有这种效果

ShowMessage(FormatDateTime('yyyy-MM-dd(dddd)',Now)); //2017-05-16(星期二) 括号里4个d

ShowMessage(FormatDateTime('yyyy-MM-dd(ddd)',Now));//2017-05-16(周二)  括号里3个d