Простой вопрос

← →
cypher (2002-02-16 16:40) [0]

Есть функция проверки существования директории DirectoryExist, если ей передать A:/ и в дисковод не вставить дискетку, Винда ругнется, типа - "Диск не готов". Как избавиться от этого сообщения?

← →
VID (2002-02-16 19:36) [1]

Очень странно, так как в этом случае у меня, например, такой ьастдайной ругани не возникало. Функция преспокойно возвращает FALSE и всё .

Ты не мог бы привести код, где вызывается эта функция ?

← →
cypher (2002-02-16 22:13) [2]

procedure TForm1.BuildNetShareList;
var
I: Integer;
LastCaption: String;
FindItem: TListItem;
begin
with ListView1 do begin
Items.BeginUpdate;
try
Items.Clear;
ShareList.Refresh;
for I := 0 to ShareList.Count - 1 do
with Items.Add, ShareList[I] do begin
////////////////////////////////////
if DirectoryExists(Path) then ImageIndex := 0
else ImageIndex := 4;
///////////////////////////////////
Caption := ShareName;
Data := ShareList[I];
SubItems.Add(Path);
SubItems.Add(Remark);
end;
AlphaSort;
finally
Items.EndUpdate;
end;
end;
end;

Функция заполняет ListView расшареными папками..
Если расшарить флоппик - ругается... В 9x не проворял, но в XP ругается...

← →
cypher (2002-02-16 22:17) [3]

ой... меня колбасит...
окошко он мне выдавал при запуске из дельфей..
при запуске exe ничего не говорит =)))

← →
VID (2002-02-17 02:39) [4]

значит проблема решена ? :))

← →
cypher (2002-02-17 16:54) [5]

Ну в принципе - да, только интересно, почему окошко появляется при запуске из дельфей...

← →
VID (2002-02-17 19:49) [6]

а фиг его знает...у меня такое сообщение ни в каком случае не появляется ...

← →
nick_vstu (2002-02-17 20:59) [7]

В Delphi есть возможность настраивать - прерываться программе во время возникновения ошибок (даже если они в конструкции try...) или нет. Это где-то в настройках компилятора вроде.

← →
VID (2002-02-17 21:13) [8]

Это ты про галочку "STOP ON DELPHI EXCEPTIONS ". TOOL - Debugger Options , вкладка Language Exceptions.

Я и включал и выключал эту опцию - в приведённом случае разницы нет, собщение как у cypher не появлялось ни в одном из случаев ...

← →
cypher (2002-02-17 21:15) [9]

Народ, я не пью! =)))) серьезно... В дельфях окошко есть, просто exe- нет...

У меня Дельфи 5, WinXP Pro rus

← →
cypher (2002-02-18 00:13) [10]

Гы.... а в Win98 окшко невыскакивает даже изпод Дельфей... тока дисковод жужжит! =)

← →
VID (2002-02-18 08:51) [11]

Да, дело явно в ОСи...

Простой вопрос Найти похожие ветки