急啊，idftp问题

Question

procedure getftptthread.execute;
var
tStream:TFileStream;
Target:TMemoryStream;
afile:string;
BytesToTransfer:integer;
begin
Target:=TMemoryStream.Create;
afile:='xpsp1all.ISO';
  if FileExists(aFile) then //如果文件已经存在
    tStream := TFileStream.Create(aFile, fmOpenWrite) else
    tStream := TFileStream.Create(aFile, fmCreate);
    tstream.Size;
    BytesToTransfer := 1024;
      form1.IdFTP1.Get(aFile,tStream,True);
      form1.ListBox1.Items.Add(inttostr(tstream.size));
      Target.CopyFrom(tStream,BytesToTransfer);//取出资源
      target.SaveToFile('E:\upftp\'+afile);
    target.Free;
  end;
有哪位朋友知道
要怎么实现idftp 的断点续传
的吗

Answer 1

我也想知道，正在找這方面的資料~~~~~