Delphi - borrar seleccionado en filelistbox

 
Vista:

borrar seleccionado en filelistbox

Publicado por manolo (16 intervenciones) el 12/03/2003 18:23:13
¿Cómo puedo borrar todos los archivos seleccionados en un FileListBox?

Gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:borrar seleccionado en filelistbox

Publicado por Ernesto D'Spirito (706 intervenciones) el 12/03/2003 20:58:47
Para borrar los archivos seleccionados en un FileListBox, puedes usar un código como el siguiente:

var
Camino : string;
i : integer;
begin
Camino := FileListBox1.Directory;
if (Camino <> '') and not (Camino[Length(Camino)] in ['\', ':']) Then
Camino := Camino + '\';
for i := FileListBox1.SelCount-1 downto 0 do
DeleteFile(Camino + FileListBox1.Selected[i]);
end;

USA ESTE CÓDIGO CON PRECAUCION. SE ELIMINARÁN ARCHIVOS DEL DISCO DURO. USA BAJO TU PROPIO RIESGO Y RESPONSABILIDAD.

Espero que te sirva.

Ernesto D'Spirito
http://www.latiumsoftware.com/es/index.php
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar