возникает ошибка, связанная с StrToInt в Delphi

[Kurai]

написала программу, возникают ошибки (написаны после кода)

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, Grids;

type
  TForm1 = class(TForm)
    StringGrid1: TStringGrid;
    StringGrid2: TStringGrid;
    Label1: TLabel;
    Label2: TLabel;
    Button1: TButton;
    Button2: TButton;
    Edit1: TEdit;
    Edit2: TEdit;
    Button3: TButton;
    procedure Button1Click(Sender: TObject);
    procedure FormActivate(Sender: TObject);
    procedure Button2Click(Sender: TObject);
    procedure Button3Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;
const
  Nmax=10;
Type
Mas2 = array[1..Nmax,1..Nmax] of extended;         // Объявление типа
                                             //двухмерного массива размерностью Nmax
var
  Form1: TForm1;
  A : Mas2;                        // Объявление двухмерного массива
  N, M, i, j, jmax : integer;
 implementation

{$R *.dfm}
procedure TForm1.FormActivate(Sender: TObject);
begin
StringGrid1.RowCount:=n;
StringGrid1.ColCount:=m;
StringGrid2.RowCount:=n;
StringGrid2.ColCount:=m;
end;
procedure TForm1.Button1Click(Sender: TObject);
var i,j,jmax:integer;
    max:extended;
begin
for i:=1 to n do
for j:=1 to m do
a[i,j]:=Strtoint(Stringgrid1.Cells[j-1,i-1]); //создаем матрицу
for i:=1 to n do
  begin
    max:=a[i,1];jmax:=1;
    for j:=1 to m do
    if a[i,j]>max then
      begin
        max:=a[i,j]; //ищем максимальный в строке
        jmax:=j; //его номер в строке
      end;
    StringGrid2.Cells[jmax-1,i-1]:=StrToInt(a[i,jmax]); //выводим во 2-ю таблицу
    a[i,m+1]:=max; //зарисываем в дополнительный столбец матрицы
  end;
end;
procedure TForm1.Button2Click(Sender: TObject);
var i,j,l:byte;
    x:extended;
begin
    for i:=1 to n-1 do
    for j:=i+1 to n do
    if a[i,m+1]>a[j,m+1] then //по возрастанию значений в последнем столбце
    for l:=1 to m+1 do
      begin
        x:=a[i,l]; //переставляем строки
        a[i,l]:=a[j,l];
        a[j,l]:=x;
      end;
for i:=1 to n do
for j:=1 to m do  //последний столбуц не выводим
StringGrid1.Cells[j-1,i-1]:=StrToInt(a[i,j]);
end;

procedure TForm1.Button3Click(Sender: TObject);
var i:byte;
n,m:integer;
begin
N:=StrToInt(Edit1.Text);
M:=StrToInt(Edit2.Text);

{Задание числа строк и столбцов в таблицах}
   StringGrid1.RowCount:=N;
   StringGrid1.ColCount:=M;
   StringGrid2.RowCount:=N;
   StringGrid2.ColCount:=M;
end;

end.

Ошибки:
[DCC Error] Unit1.pas(64): E2250 There is no overloaded version of 'StrToInt' that can be called with these arguments
[DCC Error] Unit1.pas(64): E2250 There is no overloaded version of 'StrToInt' that can be called with these arguments

Меняла на IntToStr - не помогло... не могу понять, что не так

[Lauraldo]

Элементарно. Использовать FloatToStr вместо IntToStr)

[eshik]

я начинающий пользователь этой програмки и пока возникают такие глупые вопросы как этот: напишите мне пожалуйста как правильно будет вывести значение х:4:2. FloatToStrF(x,ffFixed а что дальше я не знаю ...

[noxin]

Если х:4:2 означает кол-во цифр до и после запятой, то

FloatToStrF(x,ffFixed,4,2);