Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   desplazar listview para ver siempre ultimo (https://www.clubdelphi.com/foros/showthread.php?t=73422)

alquimista 20-04-2011 11:48:23

desplazar listview para ver siempre ultimo
 
Muy buenas...
Tengo un ListView con varias columnas y voy añadiendo cada x segundos una fila nueva..
Cuando se llena el listview en la pantalla me gustaria que siempre se viese la ultima fila añadida desplazando las demas hacia arriba.

Un saludo

ecfisa 20-04-2011 15:14:58

Hola alquimista.

Te pongo un ejemplo con un Timer que va creando items en un ListView, dejando seleccionado siempre el último:
Código Delphi [-]
...
implementation
var
  Con: Integer = 0;

procedure TForm1.Timer1Timer(Sender: TObject);
var
  it: TListItem;
begin
  Inc(Con);
  it:= ListView1.Items.Add;
  it.Caption:= IntToStr(con);
  it.MakeVisible(False); // hace visible haciendo scroll si es necesario 
  it.Selected:= True;   //  lo selecciona
end;
...

Un saludo.

alquimista 20-04-2011 16:41:26

Solucionado

Muchas gracias lo termino de probar y funciona de maravilla.
Con solo las 2 lineas ultimas.

Impresionante...

Lo dicho, muchas gracias:D:D:D:D:D


La franja horaria es GMT +2. Ahora son las 14:31:00.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi