By the way, does Free Pascal generic support generic constraints yet? Also, this format seems more natural to me:<br><br>TCollection<T: TCollectionItem> = class<br> property Count: Integer;<br> property Items[Index: Integer]: T;<br>
end;<br><br>TStatusPanels = class(TCollection<TStatusPanel>);<br><br>rather than ...<br><br>generic TCollection<T> = class // no constrain ability<br>
property Count: Integer;<br>
property Items[Index: Integer]: T;<br>
end;<br><br>TStatusPanels = specialize TCollection<TStatusPanel>;<br>