Programación General > Delphi

 Exportar Una Lista De Carpetas A Un Archivo....

(1/1)

Rothariger:
Hola gente...
necesito hacer lo siguiente q una persona elija x cantidad de carpetas, le de a un boton exportar, y me cree un archivo para abrirlo con el nero, o el easy cd creator, o cualquiera de esos programas, y puedan grabar en un cd, todas esas carpetas...


alguna forma facil de lograrlo??? o algun lugar q toque ese tema???


gracias.

vermicida:
No sé hasta qué punto puedes hacer eso, ya que (Nero al menos) los archivos que guarda de compilaciones no son de texto plano legible, tiene su propio formato. Aún así, te diré que las carpetas que seleccionas (hay componentes para ello) las puedes exportar a un txt mediante una lista de strings. Por ejemplo, puedes hacer que cada vez que se selecciona una carpeta se agregue la ruta al txt. Te pongo el código para que lo veas:

En el private del form:
private
sLista: TStringList;

Función que crea la lista:
procedure Form1.CreaLista();
begin
sLista:=TStringList.Create;
end;

Función que agrega líneas:
procedure Form1.AgregaLinea();
begin
sLista.Add(Memo1.Lines.Strings[iIndice]); // Suponiendo que obtienes la línea de un memo
end;

Función que guarda el txt:
procedure Form1.GuardaTxt();
begin
sLista.SaveToFile('C:\RutaDelArchivo\Lista.txt');
end;

Espero haber servido de ayuda :lol:

Rothariger:
bueno gracias, lo voy a probar...

Navegación

[0] Índice de Mensajes