delphi字符串按字符串分割 Edit1aa1aa2 按aa分割结果 Edit1 1 2