主要的功能函式如下：
uses uselectdriveremovable;
procedure tform20.formcreate(sender: tobject);
begin
btn_tosd.enabled := chkdriveremovable;
end;
//u盤的 插入和刪除windows會給所有的程式發出wm_devicechange 資訊
//這句放在private裡面
//procedure wmdevicechange(var msg: tmessage); message wm_devicechange;
procedure tform20.wmdevicechange (var msg: tmessage);
begin
case msg.wparam of
32768: btn_tosd.enabled := true; //'u盤插入';
32772: btn_tosd.enabled := chkdriveremovable; //'u盤拔出';
end;
end;
procedure tform20.btn_tosdclick(sender: tobject);
var fpath:string;
begin
label1.caption := '(正在選擇)';
fpath := selectdriveremovable(self);
:= '已選擇 '+fpath;
end;
呼叫的form中的核心**：
comboboxdisk.itemindex := 0;
comboboxdisk.onchange(nil);
if showmodal = mrok then
begin
fdisk := comboboxdisk.text;
result := fdisk.substring(0,2) + '\';
free;
exit;
endelse
begin
free;
abort;//中止程式
end;
end;
end;
end;
Windows 檢測碟符是否為U盤
storage property query結構體 typedef struct storage property query storage property query，pstorage property query 用於儲存將要查詢的碟符裝置的屬性 storage device descrip...
u盤固定碟符 高手固定U盤碟符有絕招
方案一 1 在u盤的某個位置放置乙個ini檔案，暫取名為 changeusb.ini 放在u盤的根目錄，ini檔案只需要兩行 紅色為注釋 subj curdrv 刪除原有的u盤的碟符 show r 1,u 給u盤新分配碟符為u 2 在winpe的核心配置檔案中加一行load命令，這行load命令建議...
u盤固定碟符 如何固定PE下的U盤碟符
方法一 1 在u盤目錄中建立乙個ini檔案,取名為 usb.ini 雙擊開啟,在裡面輸入 subj curdrv show r 1,u 2 在winpe的核心配置檔案中加一行load命令,建議這行load命令放在修正usb驅動之後,通過load命令的前導符 將自動載入u盤中的 usb.ini 檔案。...