一些字符串截取的函数
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