type

TMessage = packed record
Msg: Cardinal;
case Integer of
0: (
WParam: Longint;
LParam: Longint;
Result: Longint);
1: (
WParamLo: Word;
WParamHi: Word;
LParamLo: Word;
LParamHi: Word;
ResultLo: Word;
ResultHi: Word);
end;

delphi中定義TMessage的type如上：

我想問的地方是紅色和綠色的地方。

1。在record型態中用case of是什麼意思？(紅色)

2。result是做何用？因為TMsg中並沒有這個相類似的欄位。(綠色)

麻煩一下了。

===================引 用 文 章===================
1. 相當於 C 的 union, WParam 和 (WParamLo WParamHi) 指向同一記憶體, 如此類推
2. Windows API 的回傳值

======================================================================

不好意思，因為我並沒有學過c，所以不了解第一點的回答，如果不麻煩的話，是否可以舉例說明。

謝謝。

我想請問的是什麼時候，

TMessage = packed record
Msg: Cardinal;
WParam: Longint;
LParam: Longint;
Result: Longint;

end;

什麼時候又是,

TMessage = packed record
Msg: Cardinal;
WParamLo: Word;
WParamHi: Word;
LParamLo: Word;
LParamHi: Word;
ResultLo: Word;
ResultHi: Word;

end;