＋设为首页 ＋添加到收藏夹
谁知道将下面这个masm中的结构体转化成delphi中的结构体，散分。
IMAGE_IMPORT_DESCRIPTOR STRUCT
union
Characteristics dd ?
OriginalFirstThunk dd ?
ends
TimeDateStamp dd ?
ForwarderChain dd ?
Name1 dd ?
FirstThunk dd ?
IMAGE_IMPORT_DESCRIPTOR ENDS
type DWORD=longword;
type
IMAGE_IMPORT_DESCRIPTOR=pack record
//union --->Delphi不支持C/C++中的聯合
Characteristics:DWORD;
//OriginalFirstThunk:DWORD;//OriginalFirstThunk就是Characteristics的值,看看C/C++
TimeDateStamp:DWORD
ForwarderChain:DWORD
Name1:DWORD
FirstThunk:DWORD
end;
over!收功
type
subrec=record //做一个联合
case Integer of
0: ( Characteristics :dword );
1: ( OriginalFirstThunk :dword);
end;
IMAGE_IMPORT_DESCRIPTOR=packed record
subitem:subrec;//嵌入一个结构！
TimeDateStamp :dword;
ForwarderChain :dword;
Name1 :dword;
FirstThunk :dword;
END ;
