Вниз
Скачать: CL | DM;

Проверьте на глючность   Найти похожие ветки 

← →
engine ©   (2007-10-22 10:54) [0]

Господа, раз уж пошло такое увлечение файлами и фаловыми системами вцелом, позвольте внести свою лепту.
Какими недостатками обладает первый кусок по сравнению со вторым. Свиду никаких глюков пока замечено не было.
От данного кода требуется только получение размера файла. Никаких других действий с файлами не предусматривается.
Ну и главное требование — скорость подсчета.

for i := 0 to CheckFileList.Items.Count — 1 do
  if CheckFileList.Checked[i] then
    if  FindFirstFile(PChar(CheckFileList.Items[i]),FindData) <> INVALID_HANDLE_VALUE
    then
      Result := Result + FindData.nFileSizeLow;

   

for i := 0 to CheckFileList.Items.Count &#151; 1 do
  if CheckFileList.Checked[i] then
    begin
      HANDLE := FindFirstFile(PChar(CheckFileList.Items[i]),FindData);
      if  HANDLE <> INVALID_HANDLE_VALUE
      then
        begin
          Windows.FindClose(Handle);
          Result := Result + FindData.nFileSizeLow
        end
    end;


← →
MBo ©   (2007-10-22 11:04) [1]

имена файлов уже были занесены в CheckFileList, так почему бы не запомнить и их размеры?


← →
engine ©   (2007-10-22 11:38) [2]

> [1] MBo ©   (22.10.07 11:04)

Имена файлов берутся из плей-листа , а там нет размеров


← →
Denis__ ©   (2007-10-22 12:54) [3]

А плей-лист не ты писал? почему бы не запомнить размеры сразу?(но не показывать их пользователю).


← →
Desdechado ©   (2007-10-22 12:59) [4]

> Какими недостатками
В первом поиск не финализируется, а во втором зачем-то после каждой неудачи в цикле.


← →
engine ©   (2007-10-22 13:29) [5]

> [4] Desdechado ©   (22.10.07 12:59)

А возможно финализировать поиск в первом случае, без введения дополнительной переменной?


> [3] Denis__ ©   (22.10.07 12:54)

Плей-лист не я писал.


← →
engine ©   (2007-10-22 13:31) [6]

> [4] Desdechado ©   (22.10.07 12:59)

Во втором случае, стормозил.


← →
Denis__ ©   (2007-10-22 13:36) [7]

Исходники есть? Поправь под себя.


← →
clickmaker ©   (2007-10-22 13:36) [8]


> Какими недостатками обладает первый кусок по сравнению со
> вторым

там нету FindClose )


← →
engine ©   (2007-10-22 13:38) [9]

> [8] clickmaker ©   (22.10.07 13:36)

Да, знаю я , что его там нет. Сам же писал. :)
Чем это грозит?


← →
engine ©   (2007-10-22 13:44) [10]

> [4] Desdechado ©   (22.10.07 12:59)

Кстати, судя по справке, во втором случае FindClose должен
вызываться на каждой итерации, т.к. имя файла на новой итерации меняется.
Не стоит торопиться с FindClose, если мы собираемся искать FindNextFile.
Или я опять что-то не так понял?


← →
clickmaker ©   (2007-10-22 13:53) [11]


> Чем это грозит?

утечка ресурсов


← →
Anatoly Podgoretsky ©   (2007-10-22 16:37) [12]

> engine  (22.10.2007 11:38:02)  [2]

Для плей листов не интересны размеры файлов, а интересно время воспроизведения.


← →
engine ©   (2007-10-22 19:00) [13]

> [12] Anatoly Podgoretsky ©   (22.10.07 16:37)

Дык и я о том же, а мне интересны размеры :)



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.48 MB
Время: 0.022 c
3-1183542343
HID
2007-07-04 13:45
2007.11.18
Группировка и суммирование строк в таблице dbf


15-1192084652
Azize
2007-10-11 10:37
2007.11.18
Microsoft vs Borland


2-1192632556
DevilDevil
2007-10-17 18:49
2007.11.18
Окрасить фон меню и закладки


8-1169730583
olegnik
2007-01-25 16:09
2007.11.18
Трансформирование растров


2-1193504034
Steep
2007-10-27 20:53
2007.11.18
Поиск папок




   Наверх