Ver Mensaje Individual
  #2  
Antiguo 29-11-2011
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 38
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Cita:
no añadir duplicados a listbox
hola busque por el foro pero sin embargo no logro comprender al 100% como evitar añadir archivos dos veces
Hola.

Código Delphi [-]
...
var
  i: Integer;
begin
  if OpenDialog1.Execute then
    for i:= 0 to Opendialog1.Files.Count-1 do
      if ListBox1.Items.IndexOf(opendialog1.Files[i]) = -1 then
        ListBox1.Items.Add(OpenDialog1.Files[i]);
end;

Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita