救急:如何用DELPHI复制引导扇区

                            
我这几天老师要我用DELPHI来复制引导扇区,于是我去网上找了找,发现   
  利用CreateFile并将路径名设为"\\.\X:"可以打开逻辑盘,并进行读写  
  于是我先读写C盘的引导扇区  
  FileHandle   :=   CreateFile('\\.\C:',   GENERIC_READ,   FILE_SHARE_READ   or   FILE_SHARE_WRITE,,   0,   0);  
      if   FileHandle   =   INVALID_HANDLE_VALUE   then  
      begin  
          MessageBox(GetDesktopWindow,   '错误',   'ERROR',   MB_OK);  
          ExitProcess(0);  
      end;  
     
      if   ReadFile(FileHandle,   Buf,   512,   ReadCount,   nil)   then  
  然后我想把BUF里内容存贮在f:\test.dat里,发现DELPHI好像有这个函数的。  
  于是我先用   cc:=filecreate('f:\test.dat');  
      filewrite(cc,buf4,512);  
  后来test.dat里说  
  NTLDR   is   missingÿ  
  Disk   errorÿ  
  Press   any   key   to   restart  
  后来我用了readfile(cc,buf3,512,ReadCount,   nil);  
  还是出现一样的错误!  
  向大虾求救,火急!如果不行的话,能不能在DELPHI下实现主引导扇区的复制呢!  
 

查看回复