"Zahlen übergeben"...

[minimops]

Delphi-Quellcode:

procedure zeigedaten(Cols : array of integer);
var
  I: Integer;
begin
  for I := 0 to High(Cols) do listview1.columns[Cols[I]].width := 0;
end;