Crear un arbol de directorios  

Enviado Por: Lord Trancos
Web : www.geocities.com/lordtrancos
Email: abel@ontinet.com
Fecha: 19/02/00

Truco accedido 76 veces

 


El siguiente ejemplo, creará el siguiente árbol de directorios: 


   c:\
      kk\
         uno\
            dos\



  • Añade 'FileCtrl' en el uses de tu form 

     procedure TForm1.Button1Click(Sender: TObject);
 begin
   ForceDirectories('c:\kk\uno\dos');
 end;