请问vc中的union在delphi中如何声明？

[vcshcn]

比如：
typedef struct _IMAGE_IMPORT_DESCRIPTOR {
union {
DWORD Characteristics;
WORD OriginalFirstThunk;
};
DWORD TimeDateStamp;
DWORD ForwarderChain;
DWORD Name;
DWORD FirstThunk;
} IMAGE_IMPORT_DESCRIPTOR;

[chechy]

type
IMAGE_IMPORT_DESCRIPTOR = record
TimeDateStamp, ForwarderChain, Name, FirstThunk: DWORD;
case Integer of
0:(Characteristics:DWORD);
1:(OriginalFirstThunk:WORD);
end;

[Atlantis]

楼上

[csdnhuang]

有先被别人答了.

[chechy]

Pascal的语法不允许先声明变体。不过可以变通：
type
Hello = record
case Integer of
0:(Characteristics:DWORD);
1:(OriginalFirstThunk:WORD);
end;
IMAGE_IMPORT_DESCRIPTOR = record
a: Hello;
TimeDateStamp, ForwarderChain, Name, FirstThunk: DWORD;
end;

[vcshcn]

谢谢您的答复
这个结构是要影射如内存的，所以变体部分一定要在上面，结构不能变
是这样：
type
IMAGE_IMPORT_DESCRIPTOR = record

case Integer of
0:(Characteristics:DWORD);
1:(OriginalFirstThunk:WORD);
TimeDateStamp, ForwarderChain, Name, FirstThunk: DWORD;
end;

[vcshcn]

影射入内存的，用一个指针指向内存。
所以前后顺序不能变