请问如何删除字符串中的最后一个字符？(0分)

G

gyluwoo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-12-10

• #1

比如 /aaa/ba
变为： /aaa/b

删除了a

 

X

xianguo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-12-10

• #2

Delete(s, 1, 1);

 

X

xianguo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-12-10

• #3

换马甲了？
你就不会举一反三？

 

T

TSoft

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-12-10

• #4

function DeleteLaststr(str:string):string;
begin
Delete(str,Length(str),1);
Result :=str;
end;

 

B

blackg

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-12-10

• #5

如果只是要你说的效果。这样也可以实现啊！
copy('/aaa/ba',1,length('/aaa/ba')-1)

 

G

gyluwoo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-12-10

• #6

xie!