Ver Mensaje Individual
  #4  
Antiguo 19-01-2010
cloayza cloayza is offline
Miembro
 
Registrado: may 2003
Ubicación: San Pedro de la Paz, Chile
Posts: 913
Reputación: 22
cloayza Tiene un aura espectacularcloayza Tiene un aura espectacular
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
Responder Con Cita