wolfran_hack,
Cita:
Empezado por wolfran_hack
...esta cerca, el tema que se borra todo el contenido y no lo devuelve y el mensaje sale en blanco...
|
Revisa esta imagen:
La imagen anterior es una muestra del funcionamiento del código del
Msg #4 el cual
funciono correctamente con una muestra de 1000 valores generados de la siguiente forma:
Código Delphi
[-]
procedure TForm1.Button2Click(Sender: TObject);
var
i : Integer;
begin
ListView1.Clear;
for i := 1 to 1000 do
begin
with ListView1.Items.Add do
begin
SubItems.Add('Name-' + IntToStr(i));
SubItems.Add('DNI-' + IntToStr(i));
end;
end;
end;
El
programa completo para su revisión esta disponible en el link:
http://terawiki.clubdelphi.com/Delph...chListView.rar
Espero sea útil
Nelson.