关于日期显示的问题

我想把今天的日期如：2003-4-18附值给edit组件（不是这样的形式edit1.text:=****-**-**），请问有什么其他的方法么，例如Delphi中是不是还有其他的字符串定义了日期（即和计算机上的日期同步）类似与edit.text:=data（data就是日期）这样的方法啊~~~~~~请各位高手教我啊~~~~~~~