关于delphi中的TRECT{在现等待}

Question

TEST1.dll动态库的原型如下（由VC编译而成）：
TEST1_API BOOL _stdcall  OpenMedia(HANDLE hPlayer,unsigned char far *lpFilename,HWND hwndMain,HWND hwndVideoshow,RECT *pVideorect)
{
//return 42;

return TRUE;
//return 5;
}
在delphi中如下声明：
MPOpenProc    = function(hPlayer:THandle;lpFilename:PChar;hwndMain:HWND;hwndVideoshow:HWND;pVideorect:TRECT):boolean;stdcall;
如下调用：
DLLHandle:=LoadLibrary('TEST1.dll');
@DllOpen            :=GetProcAddress(DLLHandle,'OpenMedia');
DllOpen(FhPlayer,FlpFilename,FhwndMain,FhwndVideoshow,FpVideorect)；在VC中调试dll，发现其他的参数都能够传过去，就是pVideorect:TRECT出现错误，编译不通过，
请问是不是TRECT与VC中的RECT定义不同而不兼容呢？还是我这边没有用指针，如果要用该如何定义？

Answer 1

试试
MPOpenProc    = function
(hPlayer:THandle;lpFilename:PChar;hwndMain:HWND;hwndVideoshow:HWND;var pVideorect:TRECT):boolean;stdcall;

Answer 2

TRECT与VC中的RECT的定义可以兼容，VC的传递主要是通过指针，DELPHI的传递主要是通过形参！