Пытаюсь собрать старый проект, а мне ошибка вылезает: E2003 Undeclared identifier: 'LoadList' 7я строка: Code: function GetAllDirs: TStringList; var eList: TStringList; i: integer; begin eList := TStringList.Create; frmMain.IdFTP.List(eList); frmMain.IdFTP.DirectoryListing.LoadList(eList); // <<<<<<<<<<<<<<<<<<<<<< eList.Clear; for i := 0 to frmMain.IdFTP.DirectoryListing.Count -1 do begin if frmMain.IdFTP.DirectoryListing.Items[i].ItemType = ditDirectory then eList.Add(frmMain.IdFTP.DirectoryListing.Items[i].FileName); end; Result := eList; end; В IdFTPList.pas: Как быть?