求去除汉字之间空格的函数(10分)

L

lzfown

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-07-12

• #1

求去除汉字之间空格的函数：
如：‘大 富 翁’到‘大富翁’

 

L

lzfown

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-07-12

• #2

在线等待，立即给分

 

T

terryapp

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-07-12

• #3

tempstr := stringreplace(edit1.text, ' ', '', [rfReplaceAll]);

 

L

lzfown

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-07-12

• #4

o ,回去试试，应该能行的，谢谢
先给分吧