如何定義一個合成陣列?? |
答題得分者是:Justmade
|
ivankuo
中階會員 發表:132 回覆:272 積分:95 註冊:2002-11-21 發送簡訊給我 |
|
Justmade
版主 發表:94 回覆:1934 積分:2030 註冊:2003-03-12 發送簡訊給我 |
Static :Type TMyVarArray = Array [1..10] of Variant; MyArray : TMyVarArray MyArray[1] := 12123; MyArray[2] := 'afdfe';Dynamic :Type TMyVarArray = Array of Variant; MyArray : TMyVarArray SetLength(MyArray,4); MyArray[0] := 12123; MyArray[1] := 'afdfe';VarArray :MyVarArray : Variant; MyVarArray := VarArrayOf([12123,'afdfe',245.45,Form.Color]); 發表人 - Justmade 於 2003/05/30 15:02:27 |
P.D.
版主 發表:603 回覆:4038 積分:3874 註冊:2006-10-31 發送簡訊給我 |
引言: 我想要定一個陣列可是元素有不同的型態,請問如何定義ㄋ??jsutmade 兄的做法是指這個陣列的型別不確定, 而我 還有另一種方式我常用的, 是指這個陣列擁有不同的元素型態 (因為你沒有說明清楚, 不知有沒有誤解你的意思) Type TmyArray = Array of Record str: String; int: Integer; bol: boolean; end; procedure TForm1.Button1Click(Sender: TObject); var newAry: TmyArray; begin setLength(newAry,10); newAry[0].str:= 'A'; newAry[0].int:= 1; newAry[0].bol:= True; newAry[1].str:= 'B'; newAry[1].int:= 2; newAry[1].bol:= False; ..... end;發表人 - P.D. 於 2003/05/30 16:02:35 |
ivankuo
中階會員 發表:132 回覆:272 積分:95 註冊:2002-11-21 發送簡訊給我 |
|
ivankuo
中階會員 發表:132 回覆:272 積分:95 註冊:2002-11-21 發送簡訊給我 |
|
syntax
尊榮會員 發表:26 回覆:1139 積分:1258 註冊:2002-04-23 發送簡訊給我 |
|
ivankuo
中階會員 發表:132 回覆:272 積分:95 註冊:2002-11-21 發送簡訊給我 |
|
ivankuo
中階會員 發表:132 回覆:272 積分:95 註冊:2002-11-21 發送簡訊給我 |
|
pgdennis
資深會員 發表:41 回覆:526 積分:443 註冊:2002-05-23 發送簡訊給我 |
引言: 我知道array是元素的集合, 但是newAry[0]不是其中一個元素ㄇ?? 一個元素不是指向一個記憶體位置的資料, 那.str和.int和.bol 是又把此元素的記憶體位置指向另外三個記憶體位置ㄇ?? newAry[0].str:= 'A'; newAry[0].int:= 1; newAry[0].bol:= True;P.D兄的方法是宣告一堆由record所組成的array 而newAry[0]就是array中的第一個record 阿這個reocrd又有三個成員組成(str,int,nol) ..這樣的關係不知你瞭不瞭 永遠追不上技術更新的速度~~< src="http://140.134.4.20/~g8905202/pucca.gif">
------
星期一,二...無窮迴圈@@ |
pgdennis
資深會員 發表:41 回覆:526 積分:443 註冊:2002-05-23 發送簡訊給我 |
引言: 我知道array是元素的集合, 但是newAry[0]不是其中一個元素ㄇ?? 一個元素不是指向一個記憶體位置的資料, 那.str和.int和.bol 是又把此元素的記憶體位置指向另外三個記憶體位置ㄇ?? newAry[0].str:= 'A'; newAry[0].int:= 1; newAry[0].bol:= True;P.D兄的方法是宣告一堆由record所組成的array 而newAry[0]就是array中的第一個record 阿這個reocrd又有三個成員組成(str,int,nol) ..這樣的關係不知你瞭不瞭 永遠追不上技術更新的速度~~< src="http://140.134.4.20/~g8905202/pucca.gif">
------
星期一,二...無窮迴圈@@ |
ivankuo
中階會員 發表:132 回覆:272 積分:95 註冊:2002-11-21 發送簡訊給我 |
|
P.D.
版主 發表:603 回覆:4038 積分:3874 註冊:2006-10-31 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |