大华播放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);

本来想获取视频的宽度和高度结果返回值每次都不一样而且还特别大，请高人指点。

[鐵蛋]

关注一下 。

[sxper]

我也在学习怎么改他的通道名称么。你会的么。麻烦给下代码把。

[果然厉害]

引用 2 楼 sxper 的回复:

我也在学习怎么改他的通道名称么。你会的么。麻烦给下代码把。

我只是研究下播放部分的sdk，没研究网络sdk，估计帮不到你。不好意思

[武稀松]

var pWidth, pHeight: PLongInt;若么去掉var,若么把PLongInt换成Longint

[mdejtod]

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^);

[虎子8]

PLongInt 你还加var做什么

[果然厉害]

引用 4 楼 mdejtod 的回复:

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^);

这种方法试过后报错。把Caption:=IntToStr(aa^)+' '+inttostr(bb^); 换成Caption:=IntToStr(aa)+' '+inttostr(bb);竟然成功了，不过不是每次都能获取正确的值。

[果然厉害]

引用 5 楼 xsl510079027 的回复:

PLongInt 你还加var做什么

你教训的是，的确不该这么加，我对指针几乎一窍不通，谢谢指教。

[果然厉害]

引用 6 楼 wr960204 的回复:

var pWidth, pHeight: PLongInt;若么去掉var,若么把PLongInt换成Longint

我这么做竟然也成功了，原来可以不用指针。崩溃中。。。。谢谢你的提醒。 function PLAY_GetPictureSize(nPort:LongInt; var pWidth, pHeight: LongInt): BOOL; stdcall; external SdkDll; var aa,bb:LongInt; PLAY_GetPictureSize(0,aa,bb); Caption:=IntToStr(aa)+' '+inttostr(bb);