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');
啊哈，如果你什么都不懂，那我还懂什么呢？ 数组下界默认是从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;
呵呵，定义从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;
