Delphi TListBox OnClick / OnChange?

Есть ли хитрость, чтобы получить "По изменению" тип функциональности с TListBox? Я могу создать подкласс для компонента и добавить свойство, и т. Д. Затем выполнять код OnClick только в случае изменения индекса ... Я также могу взломать его с помощью переменной уровня формы для хранения текущего индекса, но мне просто интересно, могу ли яЯ пропускаю очевидное, прежде чем идти тем или иным путем.