Maximum aus einer StringGrid Spalte berechnen

[Technikus]

Guten Morgen,

ich bin auf der Suche nach einem (oder eher mehreren )Fehler(n) für die Berechnung eines Maximums aus einem Stringgrid.
(Delphi 2005)

Delphi-Quellcode:

const c= 1000;
type
Tleistung= array[1..c] of double;

function Optimum(n:integer):double;
var
i:integer;
max:double;
leistung:Tleistung;
begin
 max:=0;
 for i:=1 to n do begin
  leistung:= StrToFloat(StringGrid1.Cells[3,i]);{Stringgrid1.Cells wird als nicht deklearierter Bezeichner festgestellt}
  if leistung[i] > max then max:= leistung[i];
 end;
 return max;{return und max wie beim StringGrid1.Cells}
end;

zweite Sache: wenn ich das "c" von const beliebig _also vom Nutzer des Programms- machen möchte muss ich das wie anstellen?
Danke
Technikus