Jak można wysłać listview do pliku csv lub do xls'a?? Szukałe i nie znalazłem nic niestety.
A i tak przy okazji jak ustawić pionowy opis kolumny w listview?? da się?
Jak można wysłać listview do pliku csv lub do xls'a?? Szukałe i nie znalazłem nic niestety.
A i tak przy okazji jak ustawić pionowy opis kolumny w listview?? da się?
do do csv to zależy czym chcesz separować wartości (coma separated value) ale spotkałem sie z różnymi wersjami oddzielane np ';' lub jakimis innymi dziwnymi znakami. No ale jak już wiesz czym mają być oddzielane to nie ma wiekszego problemu,
deklarujesz zmienną plikową i zapisujesz wszystko po kolei
var
F: TextFile;
begin
AssignFile(F,'plik.csv');
Rewrite(F); // lub reset jak CI jest potrzebne
Write(F,ListView1.Items.Item[indeks].Caption,';'); // gdzie ; to znak separacji
Write(F,ListView1.Items.Item[indeks].SubItems->Strings[indeks komórki],';');
CloseFile(F);
end;
Oczywiscie po zapisaniu każdego wiersza musisz przejść do następnej linii (writeln)
Dzięki!
A jak do tego dodać SaveDialog - aby pytał gdzie zapisać??
if SaveDialog1.Execute() then
begin
AssignFile(F, SaveDialog1.FileName);
(...)
end;