Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.03.07;
Скачать: CL | DM;

Вниз

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

 
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]

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




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

Текущий архив: 2002.03.07;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.014 c
6-19275
End
2001-12-19 22:46
2002.03.07
Help!!!


1-19150
kserg@ukr.net
2002-02-21 12:07
2002.03.07
Вопрос по TEdit - как установить курсор в последнюю позицию текста(без выделения)


6-19276
Aleksandr
2001-12-20 13:39
2002.03.07
Как работать с посылкой сообщения по локальной сети?


3-19070
DmitryB
2002-02-08 01:57
2002.03.07
Ищу компонент


3-19061
некто_02
2002-02-02 03:02
2002.03.07
dbExpress и Oracle