TStringList und Änderung in OnChange

[Schwedenbitter]

Hallo,

ich stehe vor folgendem Rätsel:

Ich habe ein Object gebaut, das von TStringList abgeleitet ist und im Grunde bloß auf OnChange reagiert. Sinn ist es, einen Stack nachzubauen, der mir Dateien öffnet, wenn ich der StringList einen Eintrag hinzufüge. Natürlich muss ich dann abgearbeitete Einträge löschen, was ich in der Procedure mache, die OnChange zugeordnet ist. Zum Debuggen erscheint eine Meldung.

Eigenartiger Weise erscheint diese aber immer 2x. Meine Vermutung geht jetzt dahin, dass OnChange auch aufgerufen wird, wenn ich den abgearbeiteten Eintrag lösche.

Ist meine Vermutung richtig?
Gibt es eine Lösung für das Problem?

Im Grunde kann ich ja leere Strings ignorieren. Aber mir gefällt das nicht wirklich. Ich habe den Quelltext mal angefügt. Falls jemand meine Beschreibung nicht versteht, sollte meine Frage anhand dessen nachvollziehbar werden.

Gruß, Alex