Ver Mensaje Individual
  #4  
Antiguo 01-12-2008
Avatar de hjpires
hjpires hjpires is offline
Registrado
 
Registrado: sep 2007
Ubicación: Trelew - Chubut - Argentina
Posts: 7
Reputación: 0
hjpires Va por buen camino
perdon por la demora en la respuesta, para poder cargar un listview con varias columnas tendrias que hacer lo siguiente:

// en este ejemplo cargo el listView con registros de una tabla.
// LSTarchivos es el objeto ListView.
begin
ADOQvwArchivosEnProceso.First; // objeto adoquery
LSTarchivos.Items.Clear; // limpio los items del listView antes de cargarlo
// con las instrucciones siguientes, 1ro reservo el espacio en memoria para
// almacenar la lista (no es necesario, es a efectos que la carga de la lista
// se haga más rápido
// 2do. al utilizar beginUpdte y endUpdate, se realiza la carga completa y
// y luego se despliega en pantalla. sino se pone esto, se carga un registo
// y se dibuja en pantalla, haciendo el proceso mas ineficiente.
LSTarchivos.AllocBy := ADOQvwArchivosEnProceso.RecordCount;
LSTarchivos.Items.BeginUpdate;
// comienzo la carga de los registros al listView.
while not ADOQvwArchivosEnProceso.Eof do begin
With LSTarchivos.Items.Add do begin
subItems.Add(ADOQvwArchivosEnProceso['descAplicativoOperatoria']);
subItems.Add(ADOQvwArchivosEnProceso['descLote']);
subItems.Add(ADOQvwArchivosEnProceso['descDATArchivoProceso']);
subItems.Add(ADOQvwArchivosEnProceso['cfOperatoria']);
subItems.Add(ADOQvwArchivosEnProceso['idDATlote']);
end;
ADOQvwArchivosEnProceso.Next;
end;
LSTarchivos.Items.EndUpdate;
end;

OBS: recuerda que para poder visualizar en el listView más de una columna, deberas establecer el estilo del mismo en vsReport.
Responder Con Cita