2 for Schleifen

[mentaltec]

Zitat von gee21:

Delphi-Quellcode:

for I := 0 to form2.ListBox2mainliste.Items.Count - 1 do
   for I2 := 0 to form2.ListBox1Pfade.Items.Count - 1 do 
      if (directoryexists(form2.ListBox1Pfade.Items[i2]+form2.ListBox2mainliste.Items[i]) &&
      form2.ListBox2mainliste.ItemIndex > 0) then
         form2.ListBox2MainListeSORTED.Items.Add(form2.ListBox1Pfade.Items[i2] + 
         form2.ListBox2mainliste.Items[i]);

mit dem if temp=form2.ListBox2mainliste.Items[i] =false Konstrukt sorgst Du doch dafür, dass immer nur das erste I2 matcht
ausserdem gibt es hier viele Puristen, für dei ein Test auf false gaaanz böhse ist, also wenn, dann if (x <> y)