Code:
procedure TForm1.Button6Click(Sender: TObject);
var
i,j,summe:integer; mitte:real;
begin
edit2.Visible:=true;
summe := 0;
for i := Low(Myarray) to High(Myarray) do
for j := Low( MyArray[i]) to High( MyArray[i]) do
Summe := Summe + MyArray[i,j];
end;
mitte:= Summe/4;
edit2.Text:= inttostr(mitte);
end;
Jetz gehts schon besser aber irgendwie bekomme ich die Fehlermeldung "[Hinweis] uZufall.pas(133): Auf 'summe' zugewiesener Wert wird niemals benutzt" und "[Hinweis] uZufall.pas(130): Variable 'mitte' wurde deklariert, aber in 'TForm1.Button6Click' nicht verwendet"