怎样把一个字符串变量分为两个串？串中有中文和字母！(10分)

例如：x=你好mm你好　或　x=你,好mm你好
要求分出的串在9个字节内，每二个分出是正确的，但第一个＂好＂就分为两部份了？？？

procedure SplitStrEX(const S: String; SplitLen: Integer; var sl: TStringList);
var
I, J, K: Intger;
begin
if not Assigned(sl) then sl:= TStringList.Create;
I:= 9; J:= 1;
repeat
if I >= Length(S) then
I:= Length(S)
else if bytetype(S, I) = mbLeadByte then Dec(I);

sl.Add(Copy(S, J, I));
J:= I + 1;
I:= I + 9;
until I>= Length(S);
end;

接受答案了.