Модераторы: Snowy, bartram, MetalFan, bems, Poseidon, Riply

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> TDriver - как юзать??? 
:(
    Опции темы
gonzales
Дата 7.6.2006, 14:17 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 241
Регистрация: 13.3.2006

Репутация: нет
Всего: 2
кто нить пользовал компонент - TDriver?
не могу разобраться как подключать свой драйвер и как читать из Регистра устройства

 
--------------------
- мастер, мастер, запорол..., все четыре запорол!!!- я ж тебе только три давал!!!???- да я и образец запорол!!!!
PM MAIL   Вверх
Yanis
Дата 7.6.2006, 14:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 2937
Регистрация: 9.2.2004
Где: Москва

Репутация: 13
Всего: 111
Цитата(gonzales @  7.6.2006,  15:17 Найти цитируемый пост)
кто нить пользовал компонент - TDriver?
не могу разобраться как подключать свой драйвер и как читать из Регистра устройства

А автору не пробовал написать? Иногда помогает... 


--------------------
user posted image *щёлк*
PM MAIL WWW ICQ   Вверх
Snowy
Дата 7.6.2006, 14:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 30
Всего: 484
http://forum.vingrad.ru/index.php?act=Sear...er&skipped= 
PM MAIL   Вверх
gonzales
Дата 7.6.2006, 14:53 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 241
Регистрация: 13.3.2006

Репутация: нет
Всего: 2
автору уже написал,
поиском тоже прошелся, видать я первыйsmile 
--------------------
- мастер, мастер, запорол..., все четыре запорол!!!- я ж тебе только три давал!!!???- да я и образец запорол!!!!
PM MAIL   Вверх
Romikgy
Дата 7.6.2006, 15:30 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Любитель-программер
****


Профиль
Группа: Участник Клуба
Сообщений: 7326
Регистрация: 11.5.2005
Где: Porto Franco Odes sa

Репутация: 13
Всего: 146
Цитата(gonzales @  7.6.2006,  13:17 Найти цитируемый пост)
как подключать свой драйвер

какой свой драйвер?
Цитата(gonzales @  7.6.2006,  13:17 Найти цитируемый пост)
 как читать из Регистра устройства

Код

Далее типо так: 
код Pascal/Delphi    
1:    
2:    
3:    
4:    
5:    
6:    
7:    
 Driver1.SetPort($50,$70,true);    
 //while (Driver1.PortInOut[$64] and 2 <> 0) do;    
 Driver1.PortInOut[$60]:=$ed;    
 {0бит - включить светодиод Scroll Lock;    
  1бит - включить светодиод Num Lock;    
  2бит - включить светодиод Caps Lock;}    
 Driver1.PortInOut[$60]:=$2; //включаем Num Lock    


PS: Не проверял...

http://forum.vingrad.ru/index.php?showtopi...&hl=tdriver
Код

1. Вообще-то в TDriver-е енто написано... что делает ента функция.PS: Модифицируется карта разрешения ввода-вывода.
  


--------------------
Владение русской орфографией это как владение кунг-фу — истинные мастера не применяют его без надобности. 
smile
PM   Вверх
gonzales
Дата 7.6.2006, 18:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 241
Регистрация: 13.3.2006

Репутация: нет
Всего: 2
а вот еще вопрос в тему,
есть функция DeviceIOControl(hDriver,$9C406408,@inBuffer,4,@outBuffer,4,BytesReturned,nil)

что есть в ней второй параметр? 
--------------------
- мастер, мастер, запорол..., все четыре запорол!!!- я ж тебе только три давал!!!???- да я и образец запорол!!!!
PM MAIL   Вверх
Yanis
Дата 7.6.2006, 18:59 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 2937
Регистрация: 9.2.2004
Где: Москва

Репутация: 13
Всего: 111
Цитата(gonzales @  7.6.2006,  19:15 Найти цитируемый пост)
что есть в ней второй параметр?

В справку заглядывал? Так нехочется цитировать справку....
Цитата
dwIoControlCode

Specifies the control code for the operation. This value identifies the specific operation to be performed and the type of device on which the operation is to be performed. The following values are defined: 

Value    Meaning
FSCTL_DISMOUNT_VOLUME    Dismounts a volume.
FSCTL_GET_COMPRESSION    Obtains the compression state of a file or directory
FSCTL_LOCK_VOLUME    Locks a volume.
FSCTL_READ_COMPRESSION    Reserved for future use.
FSCTL_SET_COMPRESSION    Sets the compression state of a file or directory.
FSCTL_UNLOCK_VOLUME    Unlocks a volume.
FSCTL_WRITE_COMPRESSION    Reserved for future use.
IOCTL_DISK_CHECK_VERIFY    Obsolete. Use IOCTL_STORAGE_CHECK_VERIFY
IOCTL_DISK_EJECT_MEDIA    Obsolete. Use IOCTL_STORAGE_EJECT_MEDIA
IOCTL_DISK_FORMAT_TRACKS    Formats a contiguous set of disk tracks.
IOCTL_DISK_GET_DRIVE_GEOMETRY    Obtains information on the physical disk's geometry.
IOCTL_DISK_GET_DRIVE_LAYOUT    Provides information about each partition on a disk.
IOCTL_DISK_GET_MEDIA_TYPES    Obsolete. Use IOCTL_STORAGE_GET_MEDIA_TYPES
IOCTL_DISK_GET_PARTITION_INFO    Obtains disk partition information.
IOCTL_DISK_LOAD_MEDIA    Obsolete. Use IOCTL_STORAGE_LOAD_MEDIA
IOCTL_DISK_MEDIA_REMOVAL    Obsolete. Use IOCTL_STORAGE_MEDIA_REMOVAL
IOCTL_DISK_PERFORMANCE    Provides disk performance information.
IOCTL_DISK_REASSIGN_BLOCKS    Maps disk blocks to spare-block pool.
IOCTL_DISK_SET_DRIVE_LAYOUT    Partitions a disk.
IOCTL_DISK_SET_PARTITION_INFO    Sets the disk partition type.
IOCTL_DISK_VERIFY    Performs logical format of a disk extent.
IOCTL_SERIAL_LSRMST_INSERT    Enables or disables placement of a line and modem status data into the data stream.
IOCTL_STORAGE_CHECK_VERIFY    Checks for change in a removable-media device.
IOCTL_STORAGE_EJECT_MEDIA    Ejects media from a SCSI device.
IOCTL_STORAGE_GET_MEDIA_TYPES    Obtains information about media support.
IOCTL_STORAGE_LOAD_MEDIA    Loads media into a device.
IOCTL_STORAGE_MEDIA_REMOVAL    Enables or disables the media eject mechanism.
 

For more detailed information on each control code, see its topic. In particular, each topic provides details on the usage of the lpInBuffer, nInBufferSize, lpOutBuffer, nOutBufferSize, and lpBytesReturned parameters.
 


--------------------
user posted image *щёлк*
PM MAIL WWW ICQ   Вверх
Girder
Дата 7.6.2006, 21:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Лентяй 2
***


Профиль
Группа: Участник Клуба
Сообщений: 1993
Регистрация: 12.5.2004

Репутация: 25
Всего: 155
Что бы подключить драйвер... тебе достаточно прописать:
1. DriverPath
2. DriverName
3. DeviceName - NT

Ну а потом... воспользываться "автоматом" DriverInstall() - Функция установки(и получения дескриптора) драйвера(в одном флаконе)

Все остальное... по вкусу.

PS: После чего используй DriverIoControl  


--------------------
Как слышим, так и пишим.
Истина где-то там...
PM   Вверх
gonzales
Дата 7.6.2006, 21:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 241
Регистрация: 13.3.2006

Репутация: нет
Всего: 2
спасибо, буду пробовать 
--------------------
- мастер, мастер, запорол..., все четыре запорол!!!- я ж тебе только три давал!!!???- да я и образец запорол!!!!
PM MAIL   Вверх
gonzales
Дата 7.6.2006, 23:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 241
Регистрация: 13.3.2006

Репутация: нет
Всего: 2
Цитата

3. DeviceName - NT


не совсем понял, что сюда писать? 
--------------------
- мастер, мастер, запорол..., все четыре запорол!!!- я ж тебе только три давал!!!???- да я и образец запорол!!!!
PM MAIL   Вверх
Girder
Дата 8.6.2006, 01:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Лентяй 2
***


Профиль
Группа: Участник Клуба
Сообщений: 1993
Регистрация: 12.5.2004

Репутация: 25
Всего: 155
имя устройства 


--------------------
Как слышим, так и пишим.
Истина где-то там...
PM   Вверх
gonzales
Дата 8.6.2006, 11:04 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 241
Регистрация: 13.3.2006

Репутация: нет
Всего: 2
Цитата

имя устройства


это я понял, что имя устройства, где его взять, или это не важно, если я от фонаря напишу?

Добавлено @ 11:07 
Цитата

DriverInstall()


почему то не возвращает true, хотя и ошибок никаких нет 
--------------------
- мастер, мастер, запорол..., все четыре запорол!!!- я ж тебе только три давал!!!???- да я и образец запорол!!!!
PM MAIL   Вверх
gonzales
Дата 8.6.2006, 12:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 241
Регистрация: 13.3.2006

Репутация: нет
Всего: 2
Код

driver1.DriverPath:='C:\WINDOWS\system32\drivers';
driver1.DriverName:='FlyPCI.sys';
driver1.DeviceName:='Beholder';
if driver1.DriverInstall=true then
showmessage('ok');
 
--------------------
- мастер, мастер, запорол..., все четыре запорол!!!- я ж тебе только три давал!!!???- да я и образец запорол!!!!
PM MAIL   Вверх
Girder
Дата 8.6.2006, 12:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Лентяй 2
***


Профиль
Группа: Участник Клуба
Сообщений: 1993
Регистрация: 12.5.2004

Репутация: 25
Всего: 155
Цитата(gonzales @  8.6.2006,  13:11 Найти цитируемый пост)
driver1.DeviceName:='Beholder';
 smile 

PS:
Цитата(gonzales @  8.6.2006,  13:11 Найти цитируемый пост)
FlyPCI.sys
Прицепи его.
 


--------------------
Как слышим, так и пишим.
Истина где-то там...
PM   Вверх
gonzales
Дата 8.6.2006, 12:41 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 241
Регистрация: 13.3.2006

Репутация: нет
Всего: 2
прицепил

Добавлено @ 12:49 
все, с этим разобрался, сразу не сообразил вскрыть sys файл и посмотреть секцию data

Добавлено @ 12:55 
а почему при закрытии приложения вылезает ошибка доступа к драйверу???
нужно ли выполнять driver1.DriverRemove; 

Присоединённый файл ( Кол-во скачиваний: 13 )
Присоединённый файл  FlyPCI.sys 4,04 Kb
--------------------
- мастер, мастер, запорол..., все четыре запорол!!!- я ж тебе только три давал!!!???- да я и образец запорол!!!!
PM MAIL   Вверх
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: WinAPI и системное программирование"
Snowybartram
MetalFanbems
PoseidonRrader
Riply

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Delphi обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • 99% ответов по WinAPI можно найти в MSDN Library, оставшиеся 1% здесь

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, bartram, MetalFan, bems, Poseidon, Rrader, Riply.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: WinAPI и системное программирование | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0604 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.