StringReplace函数

stringreplace

label1.Caption := stringreplace('2008-09-02','-','/',[rfReplaceAll]);

function StringReplace(const S, OldPattern, NewPattern: string; Flags: TReplaceFlags): string;

S:源字符串；

OldPattern：要被替换的字符串；

NewPattern：替换的字符串；

Flags：有两种参数:1. rfReplaceAll，将出现的所有要被替换的字符串都替换掉；       2.rfIgnoreCase,只替换掉第一次出现的要被替换的字符串。这个参数要加上中括号才行。