type tperson = record name:string[5]; birthday:tdate; case happy:boolean of true: (birthplace:string[20]); false:(country:string[10]; join:string[10]; joindate,getoutdate:tdate); end; 請問如果宣告像這樣用欄位變動的記錄有什麼好處，而且在實作區 到底要怎麼譔寫，才能使用case ... of 敘述句裏的變數…。 實在搞不懂…謝謝。

It is similar to union in C. e.g.

APerson: TPerson;
{...}
APerson.birthplace := 'Birthplace';
ShowMessage(APerson.country); { will show 'Birthplace' }

剛試了一下…果真如此 版主所說的是"或"的意思嗎 那請問用欄位變動一定要記錄型態嗎？因為對於均由同一個記憶體位置開始 讀取資料看不懂: 是 -- type | tperson = record | name:string[5]; -- birthday:tdate 還是 -- case happy:boolean of | true: (birthplace:string[20]); | false:(country:string[10]; | join:string[10]; -- joindate,getoutdate:tdate); 這二部份裏面的欄位是沒有交集？所以只能擇其一？問的很模糊：希望看的懂

No, it is not "或". You may want to look for "Variant parts in records" in Delphi help  class="code">TRect = packed record case Integer of 0: (Left, Top, Right, Bottom: Integer); 1: (TopLeft, BottomRight: TPoint); end; ARect.Left and ARect.TopLeft.X are referring to the same value/memory.

這裏有一篇: http://delphi.ktop.com.tw/topic.php?TOPIC_ID=18405    --- 每個人都是一本書

謝謝… 大致上了解你們所說的也就是有序數的型態case .. of 0: 1 2 3共三個區塊 1: 1 2 3 4共七個參數 三個區塊共用七個參數 可是假若是不平均的電腦是怎麼分配的呢？

你好： 如果上面的說明你能不明白，這篇 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=32757內容也有提到相關解答。如果你的問題已獲解答，記得給分結案喔 < src="http://sourceprovide.deepen.com.tw/K_Top/bp.gif">