![]()  | 
	
 
  | 
| 
		 
			 
			#1  
			
			
			
			
		 
		
		
	 | 
||||
		
		
  | 
||||
| 
	
	
		
			
			 Помогите с проблемой. 
		
	
		
		
		
		
			
		
		
		
		
	
		
		
	
	
	Как сделать чтобы При нажатии на кнопку, программа проверяла наличие диска в дисководе? Если диск есть, то ShowMessage с подтверждением, иначе - сообщение об отсутствии диска.  | 
| 
		 
			 
			#2  
			
			
			
			
		 
		
		
	 | 
|||
		
		
  | 
|||
| 
	
	
		
			
			 Попробуй прочитать метку тома. 
		
	
		
		
		
		
		
	
		
		
	
	
	 | 
| 
		 
			 
			#3  
			
			
			
			
		 
		
		
	 | 
||||
		
		
  | 
||||
| 
	
	
		
			
			 Есть парочка функций... 
		
	
		
		
		
		
			
		
		
		
		
	
		
		
	
	
	GetDriveType GetVolumeInformation http://delphidevelop.ru/publ/33-1-0-224 http://delphi-faq.zoxt.net/a79.htm  | 
| 
		 
			 
			#4  
			
			
			
			
		 
		
		
	 | 
||||
		
		
  | 
||||
| 
	
	
		
			
			 Спасибо. Немного помогло 
		
	
		
		
		
		
			
		
		
		
		
	
		
		
	
	
	 | 
| 
		 
			 
			#5  
			
			
			
			
		 
		
		
	 | 
|||
		
		
  | 
|||
| 
	
	
		
			
			 Можно проще. Попытаться найти на сд какой нидь файл (*.*). Если найден знач есть диск. 
		
	
		
		
		
		
			
		
		
		
		
	
		
		
	
	
	 | 
| 
		 
			 
			#6  
			
			
			
			
		 
		
		
	 | 
||||
		
		
  | 
||||
| 
	
	
		
			
			 Цитата: 
	
  |