StringReplace函数的用法示例:
 
比如将日期和时间中间的“-”和“:”去掉
 
Label1.Caption :=StringReplace(datetostr(date),'-','',[rfReplaceAll]);
 
Label2.Caption :=StringReplace(timetostr(time),':','',[rfReplaceAll]);
 
那么Label1和Label2就会显示如下(示例):
 
20100122(原先是2010-01-22)
 
120523(原先是12: 05: 23)