Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Как проверить, что в CD-ROm вставили новй диск?

Lucifer © (2005-05-31 16:47:00)
Здравствуйте!
Вопрос такой:
Как отследить, что пользователь вставил новй диск в дисковод, т.е. дисковод закрылся и в нём торчит диск?

Заранее благодарен за любую инфу!

Игорь Шевченко (2005-05-31 18:58:00) [1]
lucifer © (31.05.05 18:55) [8]

http://ln.com.ua/~openxs/articles/smart-questions-ru.html

Изучай.

Profi (2005-05-31 18:58:00) [2]
Удалено модератором
Примечание: Offtopic

lucifer (2005-05-31 18:55:00) [3]
Игорь Шевченко - А по твоему форум нужен для чего???
Для того, чтобы такие как ты ("умные") сидели и мешали людям спокойно общаться? А??
Или всё-таки для того, чтобы те, которые что-то не знают, не могут найти по каким-то там причинам (возможно просто возможности нет) нужное им???

Игорь Шевченко (2005-05-31 18:48:00) [4]
lucifer © (31.05.05 18:44) [6]

Мне не нравится крик на форуме. Мне не нравится, что ты ленишься сам искать нужное тебе решение и напрягаешь незнакомых людей.

lucifer (2005-05-31 18:44:00) [5]
rOOse - СПАСИБО КАЖЕТЬСЯ ПОЛУЧИЛОСЬ!!
Игорь Шевченко - Что те не нравиться?

Игорь Шевченко (2005-05-31 18:29:00) [6]

> А МОНА ПО ЭТОМУ НЕМНОГО ПО ПОДРОБНЕЕ, А ТО В СПРАВКЕ ВСЕ
> ПО АНГЛИЙСКИ, А Я С НИМ НЕ СОВСЕМ ДРУЖУ

С головой сначала подружись.

rOOse (2005-05-31 18:26:00) [7]
procedure TForm1.Button1Click(Sender: TObject);
var
VolName: array [0..255] of char;
FSName : array [0..100] of char;
VolSN: PDWORD;
MaxCompLen,FSFlags: Cardinal;

begin
VolSN:=nil;
if (GetVolumeInformation('g:\',VolName,255,
VolSN, MaxCompLen, FSFlags,FSName,100)) then
label1.Caption:=AnsiString(VolName);
end;

lucifer (2005-05-31 18:19:00) [8]
GetVolumeInformation - А МОНА ПО ЭТОМУ НЕМНОГО ПО ПОДРОБНЕЕ, А ТО В СПРАВКЕ ВСЕ ПО АНГЛИЙСКИ, А Я С НИМ НЕ СОВСЕМ ДРУЖУ, А РУССКОЙ СПРАВКИ ПОД РУКОЙ СЕЙЧАС НЕТ. в ПРИНЦИПЕ КАК И ВРЕМЕНИ!

OSokin (2005-05-31 18:16:00) [9]
Через FMExtensionProc, используя FMS_GETDRIVEINFO (это по WinAPI в справке описано, какой юнит подключать - не помню) или через GetVolumeInformation.

lucifer (2005-05-31 17:18:00) [10]
Есть конечно такой способ:
через какой-то промежуток времени проверять на наличие диска в приводе вообще - сравнимать метку диска с предыдущими проверками и если она поменялась - то значит диск вставлен новый! Но тогда другой вопрос - как узнать метку диска в приводе?

Наверх

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