Как написать драйвер виртуального привода CD/DVD?

[Virus25]

Привет всем кто знает способ написания на Delphi виртуальный CD\DVD привод зарание спасибо.

[Пепел Феникса]

драйвер на Делфи не напишешь

[FaTaL]

Почему не напишешь?

[Пепел Феникса]

ну я более имел в виду что не скомпилишь как драйвер...
это лучше в асм.

[maxionans]

А в сети говорят, что все-таки можно. Цитирую текст:

Пишем драйвер на delphi.

О том, как по нашей методике сделать невозможное - написать на delphi драйвер режима ядра, даже есть статья на rsdn, и всем интересующимся я рекомендую ее прочитать. Здесь же я приведу пример простейшего драйвера и содержимое make.bat для его сборки.

1.
2. interface
3.
4. function driverentry(driverobject, registrypath: pointer): integer; stdcall;
5.
6. implementation
7.
8. function dbgprint(str: pchar): cardinal; cdecl; external ′ntoskrnl.exe′ name ′_dbgprint′;
9. function driverentry(driverobject, registrypath: pointer): integer;
10.
11. begin
12. dbgprint(′hello world!′);
13. result := -1;
14. end;
15. end.

Файл make.bat:
dcc32.exe -jp -$a-,b-,c-,d-,g-,h-,i-,j-,l-,m-,o+,p-,q-,r-,t-,u-,v-,w+,x+,y- driver.pas
link.exe /driver /align:32 /base:0x10000 /subsystem:native /force:unresolved /entryriverentry$qqspvt1 driver.obj ntoskrnl.lib /outriver.sys

Для компиляции нам понадобится файл ntoskrnl.lib из ddk. Мы получим драйвер размером в килобайт, который выводит сообщение [hello world] в отладочную консоль и возвращает ошибку, а потому не остается в памяти и не требует определения функции driverunload. Для запуска драйвера используй kmdmanager от four-f. Увидеть результаты его работы можно в софтайсе или dbgview.

Главная проблема, из-за которой на delphi нельзя писать полноценные драйвера, - отсутствие ddk. Для написания драйверов нужны заголовочные файлы на api-ядра и описания большого количества системных структур. Все это богатство есть только для С (от microsoft) и для masm32 (от four-f). Есть слух, что ddk для паскаля уже существует, но автор продает его за деньги и сильно этот факт не афиширует.

[Пепел Феникса]

хм...не знал, честно

Все это богатство есть только для С (от microsoft) и для masm32 (от four-f).

а ну это не проблема

[Virus25]

Сообщение от maxionans

А в сети говорят, что все-таки можно. Цитирую текст:

Спасибо я попробую.

[Virus25]

Есть ещё один вопросик а где можно дастать кряк к VisioForge Video Info ActiveX Edition 1.50.1?