Source := '12345678';
Target := Copy(Source, 3, 4);=3456
pos('b','abcd'); =2
StringReplace('2008-3-22', '-', '', [rfReplaceAll]);=2008322
Source := '12345678';
Target := Copy(Source, 3, 4);=3456
pos('b','abcd'); =2
StringReplace('2008-3-22', '-', '', [rfReplaceAll]);=2008322
转载于:https://www.cnblogs.com/edisonchen/archive/2011/01/19/1939074.html