Свободное дисковое пространство на сетевом диске в Delphi

я делаю программу для A2 Computing, которая экспортирует много данных. Объем моего жесткого диска в локальной сети составляет около 50 МБ, так что это хороший кандидат для проверки ошибки «нет места на диске».

В настоящее время, когда программе не хватает места, происходит сбой во время экспорта с ошибкой ввода-вывода 112. Я хотел бы заранее предупредить, если файл может выйти за пределы доступного пространства.Я знаю, насколько велик будет файл (в среднем 24,8 байта на запись), поэтому все, что мне нужно сделать, это выяснить, сколько места свободно.

Поскольку я работаю с сетевым диском с таким путем к файлу, как \\ qmcsan1 \ Cxxxxx $ \ filename.csv , как мне использовать такие функции, как DiskFree для вычисления доступных Космос? Любая такая функция также должна обрабатывать локальные диски, такие как C: / .

Любые идеи очень ценятся.

8
задан Thomas O 15 December 2011 в 09:17
поделиться