API之五在PB中如何獲取目錄信息

在PB中如何獲取目錄信息

　　⑴獲取當前目錄。通過GetCurrentDirectory函數可以獲取當前目錄，該函數聲明爲：

　　Function Ulong GetCurrentDirectoryA(Ulong buflen, ref String dir) Library ″kernel32.dll″

　　參數2爲接收當前目錄的字符緩衝區，前面必須加ref表示地址引用；參數1用來指定字符緩衝區的長度。調用過程爲：

　　String curdir

　　curdir=Space(256)

　　//爲字符緩衝區開闢內存空間

　　GetCurrentDirectoryA(256,curdir)

　　MessageBox(″Current Directory″,curdir)

　　⑵獲取Windows及系統目錄。要用到GetWindowsDirectory和GetSystemDirectory兩個函數，須作如下聲明：

　　Function Uint GetWindowsDirectoryA(ref String dir,Uint buflen) Library ″kernel32.dll″

　　Function Uint GetSystemDirectoryA(ref String dir,Uint buflen) Library ″kernel32.dll″