怎样指定字符串长度(30分)

Q

QQ989753

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-04

• #21

我当然知道不能通过，我就是什么都不懂，也可以在机器上一试，不通过，可我现在问你的
是原因，不是现象，要不然，为什么叫挑战呢？

 

影

影 子

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-04

• #22

啊哈，如果你什么都不懂，那我还懂什么呢？
数组下界默认是从0开始，数组的名称直接作为数组首地址指针。

如果非要从1开始，可以考虑下面两种
//move('124',s[1],High(s));
//strCopy(@s[1],'124');

 

Q

QQ989753

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-04

• #23

这不是“非”与“不非”的问题，也许有些时候我们应在从根本上找找原因，正视一下问题，
就事论事，而不是……

 

影

影 子

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-04

• #24

呵呵，定义从0开始，就象pchar一样使用。
从1开始可以象下面一样。
type
pArr = ^TArr;
TArr = array [1..9] of char;
var
s: pArr;
ss: string;
begin
ss := '124';
s := Addr(ss[1]);
showmessage(pchar(@s[1]))
end;