去掉符号(42分)

D

D影子D

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-08

• #1

比如：'&f:/1.txt'怎么去掉其中的'&'
注意要在不同位置都能去掉，多个也要去掉
最后得到f:/1.txt

 

B

bowl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-08

• #2

判断copy(edit1.text,n,1)的值　不等于&的加到另一个string里去　

 

D

dhl2001

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-08

• #3

str2='';
for i:=0 to length(str1)-1 do
if str1<>'&' then str2=str2+str1;

 

天

天真

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-08

• #4

StringReplace(S, '&','',[rfReplaceAll])

 

B

bowl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-08

• #5

可以收帖了　　楼上的方法最好用

 

K

kingdeezj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-08

• #6

function deleSP_Char(sStr, SP: string): string;//sStr要处理的字符串，SP要截取的字符（串）
begin
while pos(sp,sStr)>0 do begin
delete(sStr,Pos(sp,sStr),1)
end;
result:=sStr;
end;

 

J

jrq

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-08

• #7

strpos() copy()
楼上已经解决了

 

B

bowl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-08

• #8

眼看着我的分数　　４２－－２０－－１０－－......　　　　[]
还有什么好方法吗？　　[]

 

D

D影子D

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-08

• #9

多人接受答案了。