怎样处理指向文件的指针？！

Question

我要在delphi中调用一个vc的dll中的
GenerateCryptText(int BlockLength,int KeyLength,int DataMode,CRYPT_ENC_BLOCK_ROUND Crypt_Enc_Block_Round,int CryptRound,FILE* CryptFile)函数。
在delphi中定义：
GenerateCryptText=procedure(BlockLength, KeyLength,DataMode:integer; Crypt_Enc_Block_Rounds:CRYPT_ENC_BLOCK_ROUND; cryptRound:integer;CryptFile:pfile);stdcall;
其中pfile=^file of byte函数的意思是要产生按照一定数据模式加密的二进制文件，这个文件存储在CryptFile中。我想先建立一个文件，然后将指针传给这个函数。不知道该如何去做，那位兄弟帮帮忙吧！

Answer 1

var
  F: file of byte;
pfile：^file of byte；
begin
  {$I-}
  AssignFile(F, FileName);pfile：=@F;..
  

Answer 2

AssignFile(F, FileName);pfile：=@F;..