一个C TO DELPHI的问题(50分)

;在C语言中有一个共用体的概念， 它定义的结构如何在DELPHI中如何定义
才能达到同样的效果， 例如下面是用C 定义的一个例子：
typeedef union tagRCV_HISTORY_STRUCTEx
{
struct
{
float fopen;
float fhigh;
float flow;
float close;
float volume;
WORD advance;
};
REC_EKE_HEADEx m_head;

}RCV_HISTORY_STRUCTEx;

TREC_EKE_HEADE_record = record
fopen: double;
flow: double;
...
end;

TRCV_HISTORY_STRUCTEx = record
case Integer of
0:
REC_EKE_HEADx: TREC_EKE_HEADE_record;
1:
Other_Record: TOther_Record;
end;

你可以在Delphi帮助中查找关键字:
Variant parts in records

接受答案！