那位高人解释一下这语句什么意思
typeTFilelistItem=record
dwFileLength:Cardinal;
dwAttr1,dwAttr2:Word;
Name:array[0..$1f7] of Char;
end;
TP2KApi2Callback=procedure(Status:Integer) stdcall;
TP2KApi3Callback=procedure(Status:Integer; lpszIFName:PChar) stdcall;
TP2KApiProgressFunc=procedure(var fl:array of TFileListItem; urIndex,TotalCount:Integer) stdcall;
const
P2KAPIDLL='p2kapi3.dll';
function P2K_Init(StatusProc:TP2KApi2Callback): Integer; stdcall; external P2KAPIDLL;
function P2K3_Init(StatusProc:TP2KApi3Callback): Integer; stdcall; external P2KAPIDLL;