project.dpr

不许干坏事哦,只可以学习研究,自己看啦不许干坏事哦,只可以学习研究,自己看啦

{
  Anskya NoImport APISearchEngine Demo By Anskya
  Email:[e-mail]
  Web:Www.Anskya.Net
  QQ:115447
}
PROGRAM Project;

CONST
  MessageBoxA = $572D5D8E; //的Crc32数值

VAR
  MessageBox : FUNCTION(hWnd:longWord;lpText,lpCaption:PChar;uType:longWord) : Integer; STDCALL;
  LoadLibrary:function(lpLibFileName: PChar): longWord; stdcall;

BEGIN
  BuildCRC32Table;
  @LoadLibrary:=MyLoadLibraryA;
  MessageBox:=GetProcAddress(LoadLibrary('user32.dll'),MessageBoxA);
  Messagebox(0,'无导入表EXE[Win2k下PE没有导入表无法运行所以保留ExitProcess函数]','Hello Word!',0);
END.