我在delphi自带的demos里面找到了一个关于ftp原代码的编写过程,其中有一些代码不太明白,请高手指点啊
procedure TfrmFtp.ChageDir(DirName: String);
Var
  LS: TStringList;
begin
  LS := TStringList.Create;
  try
    SetFunctionButtons(false);
    IdFTP1.ChangeDir(DirName);
    IdFTP1.TransferType := ftASCII;
    CurrentDirEdit.Text := IdFTP1.RetrieveCurrentDir;
    DirectoryListBox.Items.Clear;
    IdFTP1.List(LS);
    DirectoryListBox.Items.Assign(LS);
    if DirectoryListBox.Items.Count > 0 then
      if AnsiPos('total', DirectoryListBox.Items[0]) > 0 then //这里是什么意思啊'total'代表什么啊??????????
         DirectoryListBox.Items.Delete(0);
  finally
    SetFunctionButtons(true);
    LS.Free;
  end;
请高手帮忙解决啊
end;