Ayuda Comparacion.
Hola, bueno me ha surgido un problema, estoy intentando comparar 2 listbox me explico.
Cargo en 2 listbox el contenido de 2 carpetas Si en 1 listbox tengo a paco.exe y perez.exe y en el segundo Listbox otro a paco.exe y juanjo.exe Juanjo.exe es diferente a los otros y como es diferente a el primer textbox quiero que se borre el archivo. Por el foro , lei una funcion que borraba el contenido de un directorio , era de "marcoszorrilla" Pero en este caso quiero borrar archivos de un directorio que no sean iguales a otro directorio a traves de 2 listbox, se como cargar y que se muestren , me faltaria esta parte. no la entendi muy bien, y la comparacion iria por los operadores en este caso seria " a<>b " no? si estoy equivocado corriganme , pero no se como aplicarlo para borrar los archivos desiguales. Gracias si pueden ayudarme me vendria muy bien |
No se si entendí bien Paco...
Puedes comenzar con un recorrido sobre la lista dos, donde están los archivos que potencialmente quieres borrar. Tomas cada elemento y lo buscas en la lsita uno... puede ser con
Si el resultado es -1 quiere decir que el archivo no ha sido encontrado y lo eliminas físicamente con
¿Si entendí bien lo que querías? |
Mas o menos asi la ruta ya estaria indicada y de esa carpeta ya cargarian al list eso ya perfect
es algo asi lo que quiero parecido a lo que me has dicho mira, por ejemplo: ListBox1.Items <> Listbox2.Items Si son desiguales los elementos de una lista y otra, que se borren pero no de la lista si no los archivos asi en bruto. Las carpetas que contienen los archivos, previamente fueron cargadas y marcadas en un edit, para no tener que meter la ruta en el code. Si el nombre de un archivo de listbox1 no aparece en el listbox2 , que se borre el archivo de diferente nombre del listbox2 no se si me explico Es hay mi gran duda |
Hola Paco Fernandez.
Si deseas que se borren los archivos de determinadas carpetas sin mediar intervención del usuario, no hay necesidad de usar ListBox, digamos que los únicos componentes visuales requeridos son dos TEdit para ingresar las rutas a las carpetas. Lo que no especificaste y no tengo en claro, es si queres:
Llamada ejemplo:
Saludos. |
Una verdadera maravilla de codigo amigo, eres grande .
Mas que nada es como la opcion 2 , pero creo que pensando un poco podre aplicarlo pa la funcion 2 Tremendo codigo, muchas gracias sobre todo por comentarlo asi entiendo como funciona y me sirve bastante mas. |
La franja horaria es GMT +2. Ahora son las 00:59:37. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi