problemas al guardar listview

[[nlsgarcia]]

BioStudio,

Revisa este código:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
   S : TStringList;
   i : Integer;
   Item : String;

begin

   S := TStringList.Create;

   for i := 0 to ListView1.Items.Count-1 do
   begin
      Item := ListView1.Items.Item[i].Caption + ',' + ListView1.Items[i].SubItems.CommaText;
      S.Add(Item);
   end;

   S.SaveToFile(ExtractFilePath(Application.ExeName) + 'archivo.csv');
   S.Free;

end;

Este código genera un archivo CSV con los elementos del Listview en el directorio de la aplicación.

Espero sea útil

Nelson.