delphi的bug ,气的吐血(100分)

U

ufo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-08-22

• #21

这个问题确实头大。
等几天吧，用d2009，string默认是unicode的了。
其实，全部用unicode也不见得效率低，因为nt操作系统的内核api也是unicode的（用字母w结尾）
我们用ansi类型参数调用ansi版的api（用字母a结尾），
而ansi版的api只是把ansi转换为unicode，然后再调用w结尾的api
多跑了一道工序

 

A

aerobull

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-08-22

• #22

正确结果:
ShowMessage(IntToStr(AnsiPos('一', '我会被气的吐血')));
delphi2009中已经没问题；
ShowMessage(IntToStr(Pos('一', '我会被气的吐血')));
返回0

 

U

ufo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-08-22

• #23

aerobull 正解
看了一下 AnsiPos的源码，有使用 mbTrailByte 函数来检测是否双字节文字防止中途错误拆分。

 

R

rwlin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-08-22

• #24

aerobull的方法不错,哈哈
也是一种解决方法...
看看,一探讨就出方案了,哈哈哈..

 

S

SupermanTm

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-08-23

• #25

用 AnsiPos 就可以了

 

R

rwlin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-08-23

• #26

好啦,结账了,,,大家有份..

 

R

rwlin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-08-23

• #27

散分