Mega Code Archive

 

Categories / Delphi / Files

 

CreateRemove folder

Title: Create/Remove folder Use CreateDirectory and RemoveDirectory for this. var St1: array[0..MAX_PATH-1] of Char; ... procedure TForm1.Button1Click(Sender: TObject); begin St1:='c:\temp'; CreateDirectory(St1, nil); end; procedure TForm1.Button2Click(Sender: TObject); begin St1:='c:\temp'; RemoveDirectory(St1); end;