Größter Wert aus StringGrid

[peetfree]

Soo, ich hab da nochmal etwas nachgelesen und den Code weiter angepasst. Allerdings hab ich jetzt noch mehr Fehlermeldungen als vorher, und weiß noch weniger wieso...

Hier mal mein Code

Delphi-Quellcode:

function GetMaxFromStringGrid():Integer;
var aRow,  max: Byte ;
begin
  max:=0;
  for aRow:=0 to 6 do
    if (Form8.StringGrid1.RowHeights[aRow]>-1) then
  begin
      if (StrToFloat(Form8.StringGrid1.Cells[1, aRow]) > max) then
     max:=StringToFloat(Form8.StringGrid1.Cells[1, aRow]);
     end;

     Form8.Edit6.Text:= FloatToString(max) ;
end;

Und hier die Fehlermeldungen:

1. Statement expected but 'function' found
2. Undeclared Identifier 'StringToFloat'
3. Undeclared Identifier ' FloatToString'


und dann noch zwei die sich auf den nachfolgenden code beziehen, allerdings ohne das eingefügte nicht kommen:

4. Declaration expected but "If" found (Bezieht sich auf das was unmittelbar nach end kommt)
5. '.' expected but ';' found (bezieht sich auf das procedure end; ganz am ende)

Ich hoffe ihr könnt mir nochmal helfen.

Liebe Grüße Peter