You have to add ShowSelectedResults to the class definition.
Simplest is to throw it in the public declaration section
public
{ Public declarations }
procedure ShowSelectedResults;
It's likely you need to change hline1 to headline below too:
for i := 0 to hline1.Count -1 Do