在一个字符串上追加一个char(20分)

臧马 · 2006-07-17

散分?散分?散分?散分?散分?

兰凌 · 2006-07-17

什么意思啊？

xiaoxiao586 · 2006-07-17

[?][?][?]
你在说什么哦？

我爱PASCAL · 2006-07-17

s:string;

s:=s+s;
报错，类型不匹配

newsmile · 2006-07-17

s:=s+byte(s);

newsmile · 2006-07-17

看错了，s:=s+s;当0<i<=length(s)时是可以的（D5及以上版本）。

我爱PASCAL · 2006-07-17

多谢多谢，
s:string;
c:char;
s:=s+c;
怎么处理呢？

白河愁 · 2006-07-17

var
s:string;
c:char;
begin
s:= '1234';
c:= '5';
s:= s+c;
showmessage(s);
end;

d7下编译通过？

xeen · 2006-07-17

楼主在开玩笑?
直接 s := s+c;

qqnm · 2006-07-17

同意白河愁，那样做没问题

我爱PASCAL · 2006-07-17

s:=s+chr(48)
报错，类型不对

xuegaoyili · 2006-07-17

var
s:string;
c:char;
begin
s:= '1234';
c:= '5';
setLength(s,Length(s)+1);
s[Length(s)-1]:=c;
showmessage(s);

想着这样行。没试。可以试一下

木桩 · 2006-07-17

也没问题(Delphi2006下)
试着用强制转型： s:=pChar(s)+Chr(48);
或者 s:=s+String(Chr(48));

我爱PASCAL · 2006-07-17

是我自已搞错了，我把
s设成integer了。
惊动大家了。

我爱PASCAL · 2006-07-18