"Zahlen übergeben"...

[Markus]

Hallo,

ich habe eine procedure geschrieben, die ein FResult-Ergebnis (MySQL) in einer Listview anzeigt. Nun würde ich gern noch nen Parameter übergeben, der bestimmte Spalten ausblended, also

Delphi-Quellcode:

listview1.columns[0].width := 0;

Wie kann ich nun eine Art Menge übergeben?

Der Aufruf soll z.B. so aussehen:

Delphi-Quellcode:

zeigedaten(listview1,[0,4,5]);

dann sollen die Spalten 0, 4 und 5 ausgeblendet werden.

Was muss das für ein Paramter sein?

[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;