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

Вниз

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

 
Lucifer ©   (2005-05-31 16:47) [0]

Здравствуйте!
Вопрос такой:
Как отследить, что пользователь вставил новй диск в дисковод, т.е. дисковод закрылся и в нём торчит диск?

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


 
lucifer ©   (2005-05-31 17:18) [1]

Есть конечно такой способ:
через какой-то промежуток времени проверять на наличие диска в приводе вообще - сравнимать метку диска с предыдущими проверками и если она поменялась - то значит диск вставлен новый! Но тогда другой вопрос - как узнать метку диска в приводе?


 
OSokin ©   (2005-05-31 18:16) [2]

Через FMExtensionProc, используя FMS_GETDRIVEINFO (это по WinAPI в справке описано, какой юнит подключать - не помню) или через GetVolumeInformation.


 
lucifer ©   (2005-05-31 18:19) [3]

GetVolumeInformation - А МОНА ПО ЭТОМУ НЕМНОГО ПО ПОДРОБНЕЕ, А ТО В СПРАВКЕ ВСЕ ПО АНГЛИЙСКИ, А Я С НИМ НЕ СОВСЕМ ДРУЖУ, А РУССКОЙ СПРАВКИ ПОД РУКОЙ СЕЙЧАС НЕТ. в ПРИНЦИПЕ КАК И ВРЕМЕНИ!


 
rOOse ©   (2005-05-31 18:26) [4]

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;


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


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


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


 
lucifer ©   (2005-05-31 18:44) [6]

rOOse - СПАСИБО КАЖЕТЬСЯ ПОЛУЧИЛОСЬ!!
Игорь Шевченко - Что те не нравиться?


 
Игорь Шевченко ©   (2005-05-31 18:48) [7]

lucifer ©   (31.05.05 18:44) [6]

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


 
lucifer ©   (2005-05-31 18:55) [8]

Игорь Шевченко - А по твоему форум нужен для чего???
Для того, чтобы такие как ты ("умные") сидели и мешали людям спокойно общаться? А??
Или всё-таки для того, чтобы те, которые что-то не знают, не могут найти по каким-то там причинам (возможно просто возможности нет) нужное им???


 
Игорь Шевченко ©   (2005-05-31 18:58) [9]

lucifer ©   (31.05.05 18:55) [8]

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

Изучай.


 
Profi ©   (2005-05-31 18:58) [10]

Удалено модератором
Примечание: Offtopic



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

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

Наверх




Память: 0.49 MB
Время: 0.06 c
1-1121315291
jcrush
2005-07-14 08:28
2005.07.31
RSS XMLDoc не обновляется :(


4-1117618328
-=S.S=-
2005-06-01 13:32
2005.07.31
Работа с giveio.sys


14-1120489191
Soft
2005-07-04 18:59
2005.07.31
Давайте раз и навсегда откроем и закроем проблему МАГИИ!


3-1119553881
chi
2005-06-23 23:11
2005.07.31
Что понимается под свойством Handle для таблицы Paradox?


14-1121038345
Soft
2005-07-11 03:32
2005.07.31
Где грань между наукой и инженерным проектом.