Nur mit Delphi gehts nicht, aber in Pascal mit Delphi und VisualStudio installeirt schon. (bzw einfach die richtigen Compiler)
Nico ging ja nur davon aus, dass es mit Delphi alleine nicht geht, sollte er gemeint haben, dass man in Pascal keinen Treiber programmieren kann hat er halt unrecht.
Delphi-Quellcode:
//Here the simplest system driver example on pascal (must be compiled with Delphi 3 compiler)
unit Driver;
interface
function DriverEntry(DriverObject, RegistryPath: pointer): integer;
stdcall;
implementation
function DbgPrint(Str: PChar): cardinal;
cdecl;
external '
ntoskrnl.exe'
name '
_DbgPrint';
function DriverEntry(DriverObject, RegistryPath: pointer): integer;
begin
DbgPrint('
Hello World!');
Result := -1;
end;
end.
//And make file to compile and link this
//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
//linker from MSVC
//link.exe /DRIVER /ALIGN:32 /BASE:0x10000 /SUBSYSTEM:NATIVE /FORCE:UNRESOLVED /ENTRY:DriverEntry$qqspvt1 Driver.obj ntoskrnl.lib /out:Driver.sys
Hier sogar ein Delphi Driver Developement Kit
http://hxdef.org/download/DDDK004.zip
Auch wenn da einige Tricks/Hacks bei sind, funktionieren sollte es ^^