c++轉pascal的程式 |
尚未結案
|
cherng32
一般會員 發表:26 回覆:24 積分:10 註冊:2002-09-18 發送簡訊給我 |
|
terrychen
尊榮會員 發表:90 回覆:794 積分:501 註冊:2003-05-01 發送簡訊給我 |
|
timhuang
尊榮會員 發表:78 回覆:1815 積分:1608 註冊:2002-07-15 發送簡訊給我 |
hi, 請參考:
struct tfield { int itemset[11]; struct tfield *pointer; } *dat[tablesize]; .. type PField = ^TField; TField = record itemset: Array[0..10] of Integer; pointer: PField; end; var dat: Array[0..tablesize-1] of PField;不過 pointer 在 delphi 中是保留字, 雖然上面的宣告可以使用, 但建議你還是換一個變數名!! |
Leway
一般會員 發表:43 回覆:71 積分:22 註冊:2003-07-29 發送簡訊給我 |
struct tfield { int itemset[11]; struct tfield *pointer; }*dat[tablesize]; dat是鏈表陣列 先用遞歸定義鏈表 type PNode = ^TNode; TNode = record itemset: Array[0..10] of Integer; Next: PNode; end; 然後宣告陣列 var dat: Array[0..tablesize-1] of PNode;========================= 為學日益,為道日損,損之又損,以致於無。為無為,而無不為。 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |