Como dice
cocute, tambien creo que seria mejor usar un TListBox...
Aqui escribi un pequeno codigo que hace algo parecido...
Muestra un panel mientras el item del TListBox tiene el foco en algun elemento.
Código Delphi
[-]procedure TForm1.ListBox1Click(Sender: TObject);
begin
panelfoto.caption:=ListBox1.Items[ListBox1.ItemIndex];
end;
procedure TForm1.ListBox1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
var
APoint: TPoint;
Index: integer;
begin
APoint.X:=X; APoint.Y:=Y;
Index:= ListBox1.ItemAtPos(APoint, True);
If Index>-1 then
begin
ListBox1.ItemIndex:=Index;
ListBox1Click(Sender);
end;
panelfoto.visible:=Index>-1;
end;
Solo es otra idea...Saludos