Perdido con el TListView

[[Ohcan]]

Hola Bustio,

Te paso un código que uso para insertar en los ListViews.
Espero que te ayude.

Código Delphi [-]
 procedure TwPrincipal.InsertaMsg(ListView:TListView; const Mensaje: String);
 begin
   //Para insertar mensajes en ListViews
   ListView.SmallImages := ListaIconosLv;
   ListView.Items.Add;
   ListView.Items[ListView.Items.Count-1].Caption := 'ElCaption';
   ListView.Items[ListView.Items.Count-1].ImageIndex := 2;
     ListView.Items[ListView.Items.Count-1].SubItems.Add('UnSubitem');
   ListView.Items[ListView.Items.Count-1].SubItems.Add(Mensaje);
 end;

Saludos.