请教一个中文字符串处理的问题：怎样才能把一个WideString类型的字符串像String类型一样用Str[i]来处理每一个字

Question

怎样才能把一个WideString类型的字符串像String类型一样用Str[i]来处理每一个字,我要把一个含有中英文的字符串对其中的每一个字逐个分析，并把其中的一部分取出来，该怎么做？谢谢！

Answer 1

type
  TCode = record
    Low: Char;
    high: Char;var
  wStr: WideString;
  i: Integer;
begin
  wStr := Edit1.Text;
  for i := 1 to Length(wStr) do
    ShowMessage(TCode(wStr[i]).high + TCode(wStr[i]).low);
end;

Answer 2

你要整个的话，WideString本来就可以var
  wStr: WideString;
  i: Integer;
begin
  wStr := Edit1.Text;
  for i := 1 to Length(wStr) do
    ShowMessage(wStr[i]);
end;