ICsv RemoveColumn (add/remove CSV column)

[Gintaras]

Function CsvRemoveColumn

Code:

Copy      Help

;/
function ICsv&csv column

;Removes CSV column.

;column - 0-based column index.


int i j nr(csv.RowCount) nc(csv.ColumnCount)
ARRAY(str) a.create(nr)

for i 0 nr
,str& s=a[i]
,for j 0 nc
,,if(j=column) continue
,,lpstr v=csv.Cell(i j)
,,s.fromn(s s.len v len(v)+1)

csv.Clear
for i 0 nr
,csv.AddRowMS(i nc-1 a[i])