几个DLL的函数的C原形，翻译成Delphi 语法因该怎么写
RESULT PreViewWindow(void * * pViewWindow);
RESULT Build(HANDLE, hDev, BOOL bVPreview = true, BOOL bAPreview = true);
int GetVideoInfo(HANDLE hDev, int &value1, int &value2);

这几个是一个DLL的函数的C原形，翻译成Delphi 语法因该怎么写，谢谢

[解决办法]
RESULT PreViewWindow(void * * pViewWindow);
RESULT Build(HANDLE, hDev, BOOL bVPreview = true, BOOL bAPreview = true);
int GetVideoInfo(HANDLE hDev, int &value1, int &value2);

type
PPPointer = ^PPointer;
TResult = RESULT;

function PreViewWindow(pViewWindow: PPPointer): TResult;
function Build(hDev: THandle; bVPreview: BOOL = True; bAPreview: BOOL = True): TResult;
function GetVideoInfo(hDev: THandle; var value1, value2: Integer): Integer;

[解决办法]
int GetVideoInfo(HANDLE hDev, int &value1, int &value2);
function GetVideoInfo(hDEV: THandle; var value1, value2 : Integer): Integer;

int GetVideoInfo(HANDLE hDev, int * value1, int * value2);
function GetVideoInfo(hDEV: THandle; value1, value2 : PInteger): Integer;


[解决办法]
HRESULT PreViewWindow(void * * pViewWindow);
type
TArrayPointer = Array Of Pointer;
function PreViewWindow(pViewWindow: TArrayPointer): Integer;

HRESULT Build(HANDLE, hDev, BOOL bVPreview = true, BOOL bAPreview = true);
function Build(hDev: HWND;bVPreview: BOOL=True;bAPreview: BOOL=True): Integer;

int GetVideoInfo(HANDLE hDev, int &value1, int &value2);
function GetVideoInfo(hDev: HWND;var value1: Integer;var value2: Integer): Integer;