Повторю вопрпос:Взаимодействие OpenDialog и функции DiskFree(0)

← →
Спрашивающий (2003-03-04 01:26) [0]

Попробуйте положить на форму
TFilenameEdit из библиотеки Rx или стандартный
TOpenDialog(в взаимодействии с Edit и кнопкой)
ну и еще кнопку в обработчике которой
написать функцию определения свободного места на текущем диске

procedure TForm1.Button1Click(Sender: TObject);
begin
Form1.Caption:=IntToStr(DiskFree(0));
end;

Затем откройте (посредством TFilenameEdit или
OpenDialog1(в взаимодействии с Edit)) файл
из папки имеющей в своем имени 2 и более точки(или запятые)например C:\Be.t.ta\Файл.htm.
И выполните Form1.Caption:=IntToStr(DiskFree(0));
Баг Вы увидете сами.
Это из за точек(запятых)(именно двух и более в любой
Но почему именно дает сбой функция DiskFree(0), DiskSize(0),
и как избавиться от этой ошибки .

← →
Спрашивающий (2003-03-04 02:43) [1]

Если я чего-то делаю не так это одно, но если баг действительно имеет место то думаю он может всплыть во многих программах поэтому хотелось бы всетаки узнать мнение МАСТЕРОВ!

← →
Спрашивающий (2003-03-04 06:46) [2]

Список символов можно расширить например
+ ., ; ;. и т.д. возможно
функций тоже......

← →
Спрашивающий (2003-03-04 09:39) [3]

Я в полном унынии второй день ни кто ни может дать совет у меня
из-за этой бодяги прога летит. Приходится делать разные обходные примочки.

← →
DN © (2003-03-04 10:20) [4]

не могу проверить, у меня не стоит RX.
так что возвращает DiskFree(0), может у тебя диск недоступен или ешё что?

← →
smok_er (2003-03-04 10:34) [5]

Нет, этот баг действительно имеет место быть...
Моим знакомым он даже замечен в The Bat!, когда создаем папку и в имени ставим несколько точек. После этого папку не будет видно в бате вообще.

← →
Спрашивающий (2003-03-05 01:51) [6]

Повторю вопрпос:Взаимодействие OpenDialog и функции DiskFree(0) Найти похожие ветки