Ik wilde graag een integerlist, maar dan één waar ik alsnog een string, of een object of iets anders bij kon stoppen. Tevens wilde ik kunnen sorteren op Integer, zodat ik ook snel kon zoeken (binary search) op integer.
Hoewel dat soort units vast al wel bestaan, kon ik er geen één vinden die aan mijn eisen voldeed, dus heb ik maar even quick en dirty de TStringList gekopiëerd en aangepast. (Ik had 'm snel nodig, en dit ging sneller dan zoeken )
Al met al een unit, met vrij weinig commentaar, maar het werkt ook wel een beetje vanzelfsprekend. Alleen de Compare method werkt een beetje anders dan in TStringList. Ik weet even niet meer waarom ik dat zo gedaan heb.
Al met al geloof ik wel dat het redelijk werkt.
De unit is zonder header, zonder class-prefix, zonder garantie en zonder verdere omhaal of uitleg te downloaden van:
http://www.goleztrol.nl/download/uIntegerList.zip
Bookmarks