Р а з д е л ы
Новости
Гостевая
Форум
Чат
Учебники
Программы
Статьи по Delphi
Статьи по Html
Компьютерные статьи
Java скрипты
Приколы
Отправить SMS
Мои разработки
 
К о н т а к т ы

ICQ: 445511525
e-mail: ZORBI@bk.ru

c o p y r i g h t
p r o g r a m m i n g
d e s i g n e d
by ZORBI

Т р о и ц к   г
 
С с ы л к и


 
С ч е т ч и к и
Rambler's Top100
 
..:: Статьи ::..
Как узнать букву CD-ROM 

   var DriveType: UInt;
     DriveType := GetDriveType(PChar('F:\'));
     if DriveType = DRIVE_CDROM then ShowMessage('Сидюк');

Источник: www.blackman.wp-club.net  
Hosted by uCoz