IPB
ЛогинПароль:

> ВНИМАНИЕ!

Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.

Наладить общение поможет, если вы подпишитесь по почте на новые темы в этом форуме.

2 страниц V < 1 2  
 Ответить  Открыть новую тему 
> работа с TShellListView и TShellTreeView, переход по папкам
сообщение
Сообщение #21


Пионер
**

Группа: Пользователи
Сообщений: 111
Пол: Мужской
Реальное имя: Рома

Репутация: -  0  +


*окончательно чуствует себя идиотом и уползает под кровать* blush.gif сенк


--------------------
Цитата
          .     .
           \__/
          (**)
(>:=:=:~~ 
  ^ ^ ^ ^ 

Креветка присваивания :DDD
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #22


Пионер
**

Группа: Пользователи
Сообщений: 111
Пол: Мужской
Реальное имя: Рома

Репутация: -  0  +


можно последний вопрос? smile.gif
вот если в папке нет файлов - вот сюда вставить проверку?
Код

procedure TMForm.StartClick(Sender: TObject);
var
  i: integer;
  iT: T;
begin
  Bypass(IncludeTrailingPathDelimiter(Shell.SelectedFolder.PathName));

  for i:= 1 to pred(Length(arr)) do
    if arr[i].count=0 then begin

    end;

...

end;

и вот как тут удрать из arr один элемент? как в простом массиве - выдернуть и остальные сдвинуть? или можно проверку на количество файлов сделать ещё при обходе? sad.gif сори я уже ваще туплю sad.gif


--------------------
Цитата
          .     .
           \__/
          (**)
(>:=:=:~~ 
  ^ ^ ^ ^ 

Креветка присваивания :DDD
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #23


Гость






Я что, просто так сказал

Цитата
  // теперь здесь: по нажатию кнопки заполняем контейнер информацией
MyAddFolderToGrid(IncludeTrailingPathDelimiter(Shell.SelectedFolder.PathName));

// здесь можно отсортировать контейнер по любому полю, сделать все что нужно
// ...
? Еще не догадался, что можно сделать? Правильно, отсортировать так, что все нулевые элементы будут отброшены в самый конец, а все остальные останутся на своих местах. И потом уменьшить длину...

Можно изменить контейнер на TList / TObjectList в конце концов, если с ними будет удобнее работать...
 К началу страницы 
+ Ответить 

2 страниц V < 1 2
 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 6.12.2020 8:44
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name