The following example creates a directory "C:tempif" it does not already exist.
uses FileCtrl;
procedure TForm1.Button1Click(Sender: TObject);
begin
if not DirectoryExists('c:temp') then
if not CreateDir('C:temp') then
raise Exception.Create('Cannot create c:temp');
end;
Example입니다. 즐거운 하루되세요.
The following example creates a directory "C:tempif" it does not already exist.
uses FileCtrl;
procedure TForm1.Button1Click(Sender: TObject);
begin
if not DirectoryExists('c:temp') then
if not CreateDir('C:temp') then
raise Exception.Create('Cannot create c:temp');
end;