怎样将2006-06-27这种格式的日期转为6-27这种只显示月份和日期格式?

Question

怎样将2006-06-27这种格式的日期转为6-27这种只显示月份和日期格式?

Answer 1

自己写个转换函数吧month(theDate)
day(theDate)
分别得到月份和日期

Answer 2

●function DateToStr(Date: TDateTime): string; 描述： 
使用 DateToStr 函数能得到 TDateTime 日期时间类型的日期部分。日期的转换格式依赖于 
全局变量 ShortDateFormat。 ●function DayOf(const AValue: TDateTime): Word; 描述： 
对于给定的TDateTime类型的日期时间，使用 DayOf 函数能得到该日期是该月份的第几天。 
该函数的返回数值在 1 到 31 之间 
注意：DayOf 函数得到的结果与 DayOfTheMonth 相同。 例如： 
showmessage(inttostr(dayof(now))); 
得到的是：19 （今天是 某月19日） ●function MonthOf(const AValue: TDateTime): Word; 描述： 
根据给定的TDateTime类型的时间日期参数AValue，MonthOf函数能得到该年份的该月份数。 
MonthOf返回数值为 1 到 12。 
注意：MonthOf函数得到的数值与MonthOfTheYear函数相同 
MonthOf（date）+DateToStr(Date)  就是结果

Answer 3

MonthOf（date）+ '-'+DateToStr(Date)  就是结果

Answer 4

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShortDateFormat := 'm-d';
  showMessage(DateToStr(now));
end;

Answer 5

Caption := FormatDateTime('m"-"d', Date);