Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Доступность сетевых ресурсов [D5, Win2k]


teapot ©   (2004-09-14 16:11:00) 

Сетевой pесуpс подключен как локальный диск.  Могу ли я программно узнать, доступен ли в данный момент ранее смаппированный ресурс, если я не знаю его полного сетевого имени, а известна только буква драйвера, под которой он был подключен?

Вариант
function DriveExists(Drive: Byte): boolean;
begin
 Result := Boolean(GetLogicalDrives and (1 shl Drive));
end;

procedure TForm1.Button1Click(Sender: TObject);
var
 Drive: byte;
begin
 for Drive := 0 to 25 do
   if DriveExists(Drive) then
     ListBox1.Items.Add(Chr(Drive + $41));
end;

показывает только локальные драйвера.


teapot   (2004-09-14 22:08:00) [1]

Собственно говоря, для того и нужно знать о доступности ресурса, чиобы записать туда (или прочесть).
Все же логичнее было бы сначала убедиться, что есть КУДА писать. А то телега, вроде, впереди лошади получается.


Jeer   (2004-09-14 18:10:00) [2]

Попробуй записать и узнаешь.


Наверх

Титульная страница Поиск, карта сайта Написать письмо