Function CreateDir

Uses Unit SysUtils

A função CreateDir cria um novo diretório e retorna True se o diretório puder ser criado com sucesso, caso contrário, retorna false.

Sintaxe da sua utilização:

CreateDir('Nome_do_diretório');

Ex::

procedure TForm1.BitBtn12Click(Sender: TObject);begin
       CreateDir('Márcio');end;