300分: 如何读、写Win2K的分区表(10分)

  • 主题发起人 主题发起人 wql
  • 开始时间 开始时间
W

wql

Unregistered / Unconfirmed
GUEST, unregistred user!
不好意思,转个弯,绝对是300分:

http://www.delphibbs.com/delphibbs/dispq.asp?lid=802364
 
大家继续啊!!!
 
你去Google上搜索一下 " SystemIO " 吧!
 
谢谢!
我去看看!
 
debug
-a 100
; XXXX ; mov bx,0200
; ; ; ; ;mov ax,0201
; ; ; ; ;mov cx,0001
; ; ; ; ;mov dx,0080
; ; ; ; int 13
; ; ; ; ;int 3
-g=100
-d 200
把分区表的信息读到200开始的扇区
 
to xwing111:
Win 2k下用int13是不对的!
会出错!
 
大家继续啊!

回答出来加300分没有问题!!!
 
可能需要用到winNT的底层技术 WDM
 
给你个读的例子,写的没敢试验,因为我只有一个HD.[:D]

procedure TForm1.Button1Click(Sender: TObject);
var ;hFile:THandle ;
; ; ;bytesread:DWORD;
; ; ;buf: array[0..511] of char ;
; ; ;Security: TSecurityAttributes;

begin

;hFile:=CreateFile('//./PhysicalDrive0',GENERIC_READ, FILE_SHARE_READ or FILE_SHARE_WRITE, nil ,OPEN_EXISTING,FILE_FLAG_SEQUENTIAL_SCAN,0);
; if hFile=INVALID_HANDLE_VALUE then
; begin
; ; ShowMessage('No file exists yet.' );
; ; Exit;
; end;
; if not ;ReadFile(hFile, buf, sizeof(buf), bytesread, nil) then showmessage('Error');

end;
 
帮你up一下
 
to ib6study:
请到 http://www.delphibbs.com/delphibbs/dispq.asp?lid=802364
拿分,非常感谢 !
 
后退
顶部