Проверьте на глючность

← →
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  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)

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

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

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

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

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

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

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

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