[DUG] ListView - Scroll Event

[Eric A]

(Delphi 7)

I  wish to detect the user selecting a row (item) in a ListView component to display child records for  the item in another control.  

There is no "OnScroll" event for this control.  I can use the "OnClick" event OK for a selection cia the mouse, but how do I detect when a user scrolls on to a record by using the arrow keys (or PgUp, PgDn or moving the scrollbar ?

I have tried the using the OnChange event but it seems that there are two events generated for each movement by the arrow keys.

Does anyone have a code snippet to accomplish this?

Eric.
 		 	   		  
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://listserver.123.net.nz/pipermail/delphi/attachments/20140727/44dc9aa8/attachment.html