pos問題

如字符串:
   vResult := '導致無聲音   觸摸板觸失靈|ABCDE|FGH|';
用pos函數
        for i := 0 to MaxCount do  array_s[j] := '';
        i:= pos('|',vResult) ;
        j:=0;
        while i > 0 do
        begin
          array_s[j] := copy(vResult,1,i-1);
          vResult := copy(vResult,i+1,length(vResult));
          inc(j);
          i := pos('|',vResult) ;
        end;
盡然得到這樣的結果:
array_s[0] := 導致無聲音   ; 
array_s[1] := 摸板   ;
array_s[2] := 失靈   ;
array_s[3] := ABCDE   ;
array_s[4] := FGH   ;
觸字和|怎麼被解釋成一樣了。系統是用繁體delphi編寫的，數據庫也是繁體。
客戶端如果是繁體的，就不會出現這樣的情況。
客戶端如果是簡體的，就會出現上述情況。