为什么text[i]取出的字符串中若有中文就会有乱码？(40分)

F

froggorf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-30

• #1

为什么text取出的字符串中若有中文就会有乱码？
英文则没有此问题？难道就是因为Delphi是english？

 

Y

YoungSun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-30

• #2

我的理解,可能是因为text方式每次取出的是一个字节.

 

U

ugvanxk

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-30

• #3

赋到widestring就可以了

 

F

froggorf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-30

• #4

具体说说如何赋到widestring

 

U

ugvanxk

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-30

• #5

s:widestring;
s:=memo.text;
s

 

W

wlmmlw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-30

• #6

late

 

完

完颜康

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-30

• #7

朋友～一个汉字占两个字节阿

 

H

hbezwwl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-30

• #8

就是楼上说的用widestring就行。

 

R

renyi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-30

• #9

就是，一个汉字占两个字节，text只取了其中的一半，当然出现乱码。

 

S

savenight

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-30

• #10

procedure TForm1.Button1Click(Sender: TObject);
var
s:string;
destwidechar;
destsize:integer;
begin
s:='ab我向三剑客c';
destsize:=length(s);
dest:=AllocMem(destsize);
StringToWideChar(s,dest,destsize);
caption:=dest[6];
FreeMem(dest,destsize);
end;

 

硬

硬木花椒

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-30

• #11

l来晚了，555

 

P

pmlpml

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-02

• #12

ugvanxk 的方法是正解，这个问题可以结束了

 

X

xiao_min

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-03

• #13

嘻嘻，我也认为那是正解
procedure TForm1.Button1Click(Sender: TObject);
var
s:widestring;
text:string;
begin
text:='a我是男的bc' ;
s:=text;
caption:=s[3];
end;
结果，CAPTION为“是”

 

S

savenight

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-03

• #14

var
s:widestring;
text:string;
begin
text:='a我是男的bc' ;
s:=text[4]; //愚蠢，我在这里搞错了，sorry
caption:=s;
end;

 

F

froggorf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-04

• #15

多人接受答案了。