選擇乙個資料夾 Delphi

2022-10-10 21:48:17 字數 762 閱讀 5221

在delphi中,選擇乙個資料夾的操作主要有兩種方法。一種是通過「開啟」對話方塊(opendialog)控制項,通過定位乙個檔案來間接實現。另一種是利用delphi提供的selectdirectory函式。這個函式是在filectrl單元中定義的。 

第二種方法還有乙個附加的好處,它可以使用root引數限定根目錄的位置,並且不能再向上返回。

示例**如下:

uses

filectrl;

procedure

tform1.button3click(sender: tobject);

varstrcaption,strdirectory:string;

wstrroot:widestring;

begin

strcaption:='

這是瀏覽資料夾的說明文字,可以根據需要進行書寫。

' +#13#10+'

一般二行文字就滿了。';

//該引數是瀏覽資料夾視窗的顯示說明部分

wstrroot:='

d:\greensoft';

//這個引數表示所顯示的瀏覽資料夾視窗中的根目錄,預設或空表示「我的電腦」。

selectdirectory(strcaption,wstrroot,strdirectory);

label1.caption:=strdirectory;

//傳遞結果,其中引數strdirectory表示函式的返回值

label1.refresh;

end;

delphi 選擇資料夾,路徑選擇,瀏覽資料夾

選擇資料夾,路徑選擇,資料夾資源管理器 推薦 selectdirectory vcl.filectrl.hpp if selectdirectory 請選擇目錄 daopath selectdirectory include filectrl.hpp const seldirhelp 1000 vo...

delphi之選擇資料夾路徑 選擇檔案路徑

一 opendialog選擇檔案路徑 procedure tform4.but2click sender tobject varchobak topendialog begin chobak topendialog.create nil if chobak.execute then begin sh...

Delphi 資料夾操作

uses shellapi 建立資料夾 procedure tfrmmain.cxbutton1click sender tobject begin createdirectory pchar extractfilepath paramstr 0 microblue nil end 刪除資料夾,放到...