菜鸟问题，关于文件的读写和传递文件的句柄

Question

我需要写一个函数，把一个已经打开的文件的句柄传递到函数中，然后在函数中对这个文件进行读写操作，这个函数该如何定义啊？主要是文件句柄的变量类型，和如何取得文件句柄我不知道。

Answer 1

哪位大虾帮帮忙啊，在线等。procedure TFormMain.Button1Click(Sender: TObject);
var
   TF1: TextFile;
begin
   AssignFile(TF1,Edit1.Text);
   Reset(TF1);   ReadBlock();   Flush(TF1);
   CloseFile(TF1);
end;我想在ReadBlock()这个自定义函数中对TF1这个文件进行处理，怎么把TF1传递过去呢？

Answer 2

那就自己Type一个类型等于TextFile

Answer 3

delphi看来的确衰落了，无言~~~