字附串替换问题？(20分)

X

xbbtzhao

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-03-31

• #1

字附串替换问题？
字附串1：0000000000
字附串2:12
字附串3:ABC
字附串2替换字附串1的第一、二位得12000000000
字附串3替换字附串1的第三、四、五位得12ABC000000
有什么好办法？

 

K

Kisber

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-03-31

• #2

1)有规律吗？
2)是不是就是这样的顺序？
3)自己copy吧，没有好办法：
Result := 字符串2 + 字符3 + Copy(字符串1, Length(字符串2 + 字符3), MaxInt);

 

F

flyingwater007

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-03-31

• #3

字附串2替换字附串1的第一、二位得12000000000
这个可以用StuffString函数
字附串3替换字附串1的第三、四、五位得12ABC000000
如果替换工作量不大的话，这个自己截取处理吧

 

X

xbbtzhao

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-03-31

• #4

楼上的朋友们可能没有理解我的意思：
如：有一个两个长度的字附串，来替换别一个字附串的长度的第三、四位字附串。
S:='0000000000'
比如S1='123',要从S的第三位开始替换那么替换后的字附S为0012300000；.
比如S1='abc',要从S的第七位开始替换那么替换后的字附S为000000abc0；

 

X

xbbtzhao

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-03-31

• #5

cxTextEdit1.Text：=123456789a
cxTextEdit1.Text:=copy(cxTextEdit1.Text,1,3)+'ABC'+copy(cxTextEdit1.Text,7,10)
除了这样还有没有其办法。