Crear un arbol de directorios  

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

Truco accedido 60 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;