Где я напутал с типом переменной?

[Kuzya69]

Хочу посмотреть результат работы кода:

@GetInf:= GetProcAddress(GetModuleHandle(kernel32),'GetNativeSystemInfo')

Для этого разнес функцию на составляющие:

var Addr: Cardinal;
begin
Addr:= GetModuleHandle(kernel32);
Addr:= GetProcAddress(Addr,'GetNativeSystemInfo');
@GetInf:= Addr;
end;

Но теперь компиллятор ругается на "GetProcAddress..." :

[DCC Error] Trm1.dpr(491): E2010 Incompatible types: 'Cardinal' and 'Pointer'

[p51x]

HMODULE WINAPI GetModuleHandle(
  _In_opt_ LPCTSTR lpModuleName
);

FARPROC WINAPI GetProcAddress(
  _In_ HMODULE hModule,
  _In_ LPCSTR  lpProcName
);

Ну вы разве не видите, что один из них указатель? Да как бы и по логике это понятно...

[Stilet]

var Addr: Pointer;  hModule:THandle;
begin
hModule:= GetModuleHandle(kernel32);
Addr:= GetProcAddress(hModule,'GetNativeSystemInfo');
Addr - содержит указатель или 0
end;