首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
您现在的位置: 程式碼之家 >> 編程語言 >  >> 更多程式語言 >> Delphi

Delphi 調用 WinAPI:GetDriveType 判斷磁碟機類型

     編輯:Delphi

一行 API 辨識:固定碟、可移除碟、光碟、網路磁碟、RAM 碟

GetDriveType 傳入根目錄字串 (如 'C:\'),回傳 UINT 型別代碼,對應七種磁碟類型。適用於安裝程式檢查目標磁碟、備份軟體過濾磁碟機等場景。

函數宣告


function GetDriveType(lpRootPathName: PChar): UINT; stdcall;

回傳值對照表

常數值類型說明
DRIVE_UNKNOWN0未知無法判斷
DRIVE_NO_ROOT_DIR1根目錄不存在路徑無效
DRIVE_REMOVABLE2可移除磁碟USB 隨身碟、軟碟機
DRIVE_FIXED3固定磁碟內建硬碟、SSD
DRIVE_REMOTE4網路磁碟對應網路磁碟機
DRIVE_CDROM5光碟機CD/DVD/BD
DRIVE_RAMDISK6RAM 磁碟虛擬磁碟

範例:判斷 C: 類型


procedure TForm1.FormCreate(Sender: TObject);
var
  c: Cardinal;
begin
  c := GetDriveType('C:\');
  ShowMessage(IntToStr(c)); // 通常回傳 3 (固定磁碟)
end;

注意:DRIVE_REMOVABLE (2) 包含軟碟機與 USB 大量儲裝裝置;若需區分 USB 還需查詢裝置屬性。

  1. 上一篇文章:
  2. 下一篇文章:
Copyright © 程式碼之家 All Rights Reserved