2 / 2 / 1
Регистрация: 11.05.2016
Сообщений: 27
|
|
1 | |
Проверка на наличие CD диска в дисководе26.09.2016, 09:40. Показов 2228. Ответов 11
Метки нет (Все метки)
0
|
26.09.2016, 09:40 | |
Ответы с готовыми решениями:
11
проверить наличие диска в дисководе Проверка диска на наличие ошибок Проверка диска на наличие ошибок сломала диск Проверка диска на наличие ошибок в домашних условиях |
2 / 2 / 1
Регистрация: 11.05.2016
Сообщений: 27
|
|
26.09.2016, 11:21 [ТС] | 4 |
0
|
25 / 25 / 22
Регистрация: 18.09.2014
Сообщений: 218
|
|
26.09.2016, 11:40 | 5 |
Ольга_келешек, ссылка рабочая
1
|
82 / 82 / 39
Регистрация: 17.02.2016
Сообщений: 464
|
|
26.09.2016, 12:59 | 6 |
1
|
2 / 2 / 1
Регистрация: 11.05.2016
Сообщений: 27
|
||||||
26.09.2016, 13:36 [ТС] | 7 | |||||
вот этот пример у меня был...
на строку x := DiskInDrive('a'); ошибка.. [DCC Error] Unit1.pas(64): E2010 Incompatible types: 'Integer' and 'Boolean'
1
|
82 / 82 / 39
Регистрация: 17.02.2016
Сообщений: 464
|
||||||
26.09.2016, 13:42 | 8 | |||||
Сообщение было отмечено Ольга_келешек как решение
Решение
потому что проверять надо примерно так
1
|
26.09.2016, 13:44 | 9 |
потому что функция DiskInDrive() возвращает true\false, а вы пихаете ее результат в Integer
Добавлено через 1 минуту а функция эта просто проверяет есть ли такой диск, а не проверяет CDROM ли это
1
|
97 / 97 / 25
Регистрация: 25.04.2016
Сообщений: 525
|
|||||||||||
26.09.2016, 14:02 | 10 | ||||||||||
Понятнее будет вот так:
И посмотрите описание для GetDriveType - например CDROM это "DRIVE_CDROM"
2
|
97 / 97 / 25
Регистрация: 25.04.2016
Сообщений: 525
|
|
26.09.2016, 14:18 | 11 |
Вот пример работы GetDriveType (консольное приложение).
2
|
2 / 2 / 1
Регистрация: 11.05.2016
Сообщений: 27
|
||||||
27.09.2016, 05:28 [ТС] | 12 | |||||
Добавлено через 11 минут Уф, разобралась.... вот такое решение в итоге у меня получилось, слегка коряво... но в целом устраивает)
0
|
27.09.2016, 05:28 | |
27.09.2016, 05:28 | |
Помогаю со студенческими работами здесь
12
Windows XP не видит диска в дисководе Автоматический запуск диска в дисководе (Windows 7) Виснет компьютер при наличии CD/DVD диска в дисководе Как убрать сообщение об ошибке отсутствия диска в дисководе Искать еще темы с ответами Или воспользуйтесь поиском по форуму: |