Ein wahrscheinlich massiver Fehler noch:
Delphi-Quellcode:
if vergleich<>ebg
then libanzeige.Items.Delete(i);
Wie bereits gesagt, ebg ist nicht gesetzt. Es hat also keinen Wert. Daher ist es wahrscheinlich immer <> Vergleich. Du musst ebg doch einen Wert zuweisen, wenn du ebg mit irgendwas vergleichst
