🚀 go-pugleaf

Witam.

W klasie formularza menu głównego mam zadeklarowaną taką zmienną:

Dim arrTaskRuns As New ArrayList

W trakcie pracy aplikacji mam potrzebę usuwania z tej zmiennej obiektów,
które mają jakąś określoną właściwość. Np. wartość pola .GetStatus jest
jakaś-tam lub jakaś-tam-inna.

Pierwszy pomysł był taki, żeby to "przelecieć" For Each ... Next i
pousuwać, ale okazało się, że po usunięciu któregokolwiek obiektu
generowany jest błąd przy Next (że nie można iterować bo zmieniła się
kolekcja).

Drugi pomysł był taki, żeby robić For-Next w pętli Do-Loop i wyskakiwać z
For-Next za każdym razem jak się usunie obiekt, a z pętli Do-Loop jeżeli
nie było ani jednego usunięcia. I to działało, ale przy dużych ilościach
obiektów bardzo powoli (i nie dziwota).

Obecnie działa tak, że obiekty, które mają pozostać, są w pętli For-Next
przepisywane do lokalnej zmiennej (klasy ArrayList), a na koniec czyszczę
arrTaskRuns i podstawiam do niej tą zmienną lokalną. Działa całkiem szybko,
ale wymaga (w najgorszym razie) dwa razy więcej pamięci.

Wpadłem więc na pomysł żeby zajrzeć do helpa - owszem, są różne przykłady,
ale nic o usuwaniu w pętli :)

Kolejny pomysł - zajrzę na Google, a w międzyczasie zapytam na grupie
vbasic, może mi ktoś coś zasugeruje...

-- 
PL