procedure TForm1.N10Click(Sender: TObject);
var
i,j:integer;
begin
h:=6;w:=6;
Formmas;
NewGame;
N2Click(Sender);
end;
end.