大华播放sdk转换delphi很多值获取不正确，请高人帮看看
C++
BOOL PLAY_GetPictureSize(
LONG nPort,
LONG *pWidth,
LONG *pHeight
);

自己转换为delphi
---------调用声明------------
function PLAY_GetPictureSize(nPort:LongInt; var pWidth, pHeight: PLongInt): BOOL; stdcall; external SdkDll;
--------------------------------

var aa,bb:PLongInt;

GetMem(aa,SizeOf(aa));GetMem(bb,SizeOf(bb));
PLAY_GetPictureSize(0,aa,bb);Caption:=IntToStr(aa^)+' '+inttostr(bb^);
FreeMem(aa);FreeMem(bb);

本来想获取视频的宽度和高度结果返回值每次都不一样而且还特别大，请高人指点。
[解决办法]
function PLAY_GetPictureSize(nPort:LongInt; pWidth, pHeight: PLongInt): BOOL; stdcall; external SdkDll;


var aa,bb:LongInt;
PLAY_GetPictureSize(0,@aa,@bb);
Caption:=IntToStr(aa^)+' '+inttostr(bb^);
[解决办法]
PLongInt 你还加var做什么
[解决办法]
var pWidth, pHeight: PLongInt;若么去掉var,若么把PLongInt换成Longint