WinAPI: CreateDirectory - 建立檔案夾

WinAPI: CreateDirectory - 建立檔案夾

//聲明:
CreateDirectory(
  lpPathName: PChar;                        {目錄名}
  lpSecurityAttributes: PSecurityAttributes {TSecurityAttributes 結構的指針}
): BOOL;

//TSecurityAttributes 是 _SECURITY_ATTRIBUTES 結構的重定義
_SECURITY_ATTRIBUTES = record
  nLength: DWORD;                {結構體的大小}
  lpSecurityDescriptor: Pointer; {安全描述}
  bInheritHandle: BOOL;          {安全描述的對象能否被新建立的程序繼承}
end;


//舉例:
var
  dir: string;
begin
  dir := 'c:\temp\TestDir';
  CreateDirectory(PChar(dir), nil); {第二個參數一般設為 nil, 表示使用系統預設的安全屬性}
end;