DelphiÕâôÁéÒìµÄ£¿

Delphi(Pascal) code:

var
str:array of string;
i:Integer;
j:Integer;
begin
SetLength(str,1);
for i:=0 to 4 do
begin
j:=Length(Str);
SetLength(str,Length(str)+1);
Str[Length(Str)]:='xxxx';
end;
ShowMessage(str[0]);
ShowMessage(str[1]);
ShowMessage(str[2]);
ShowMessage(str[3]);
end;



¼¸¸öÆæ¹ÖµÄµØ·½£¬µ÷ÊÔ·¢ÏÖ£¬iµÄÖµÔÚµÚÒ»´ÎÑ­»·¾ÓÈ»ÊÇ5£¬µÚ2´ÎÊÇ4£¬µÚ3´ÎÊÇ3.¡£¡£¡£ ²»ÊÇÓ¦¸Ã´Ó0-4µÄÂ𣿣¿£¿

»¹ÓУ¬ÎªÊ²Ã´j:=Length(Str);Ϊʲôһֱ¸æËßÎÒÊÇËæ»úÊý£¿µ÷ÊÔ·¢ÏÖstrÀïÃæµÄÔªËظöÊýȷʵÊÇÔÚµÝÔöѽ£¡µÃµ½Êý×éµÄ³¤¶ÈÔõô¸ã£¿LengthÒ²²»ÐУ¬SizeOfÒ²²»ÐУ¿

¸ãÁ˼¸Ì죬·¢ÏÖDelphiÌ«²»ÊʺÏÎÒÓÃÁË£¬Ôõô¶¼ÕâôÆæ¹ÖµÄ£¬ºÍ¹ÛÄîºÜ³åÍ»

---

LZ ÔÚÓÞŪ´óÖÚ£¿

---

ÄÇÊDZàÒëÆ÷ÓÅ»¯µÄ½á¹û¡­¡­

---

ÒýÓÃ

  µÃµ½Êý×éµÄ³¤¶ÈÔõô¸ã£¿LengthÒ²²»ÐУ¬SizeOfÒ²²»ÐУ¿

high(Str)µÃµ½Êý×éÉϱê
low(Str)µÃµ½Êý×éϱê

¾Í¿ÉÒԵõ½Êý×éÔªËصÄÊýÁ¿ÁË£¬²»ÖªµÀÄã˵µÄÊý×éµÄ³¤¶ÈÊDz»ÊÇÕâ¸ö£¿£¿

---

ÎÒ²»¹ÜÓÃÓÃɶ¶¼²»ÐÐ

°ÑÁéÒìµÄͼ·¢ÉÏÀ´




×îÏ·½¾ÓÈ»Óиö  never used??????Fuck

---

µ±±àÒëÆ÷¡°ÈÏΪ¡±µÝ¼õºÍµÝÔöЧ¹ûÒ»Ñùʱ£¬ÒòΪµÝ¼õµ½0Ö´ÐÐËٶȸü¿ì£¬ËùÒÔÄã¾Í¾õµÃ¡°ÁéÒ족ÁË

---

j˵ÊDZ»ÓÅ»¯ÁË£¿£¿£¿ÄÇÎÒÔõôµÃµ½Êý×éÔªËصĸöÊý°¡£¿£¿£¿

---

°ÑCompilerÀïÃæµÄOptimaztion¹Øµô£¬¾Í¿ÉÒÔÈ¥µôÓÅ»¯Ñ¡ÏîÁ