Ver Mensaje Individual
  #4  
Antiguo 12-12-2017
juank1971 juank1971 is offline
Miembro
 
Registrado: feb 2008
Posts: 230
Reputación: 17
juank1971 Va por buen camino
Otra Manera con FindDrawable

Saludos si a mí me paso lo mismo, es un hueco en los tutoriales y los videos que he visto casi todos solamente muestran la forma de crear los TlistView y TListBox pero en casi ninguno está la forma de acceder a la información mostrada, yo me pase casi una semana buscando en todas partes incluso la misma ayuda del Delphi y realmente pase trabajo para encontrar eso.

La forma que también me gusto que vi de Daniele Teti, para acceder a los resultados de los ítems en el TlistView por el nombre fue esta:



Código Delphi [-]
procedure TForm1.ListView1ItemClick(const Sender: TObject;
    const AItem: TListViewItem);
    var Test:string;
  begin
    Test := AItem.Objects.FindDrawable('ItemDePrueba').Data.asstring;
    ShowMessage(Test);
  end;
ItemDePrueba es un item que agrege al Tlistview
también creo que se puede asignar valores a esa propiedad data, no es solo para leer
Responder Con Cita