Also einen Fehler habe ich schonmal gefunden.
Du solltest dich übrigens mit der setlength Funktion vertraut machen, die nimmt auch 3 Parameter an
hah, Delphianfänger
aber danke für den Hinweis! Wird mir sicher ein paar Zeilen in Zukunft ersparen
Du muß selbstverständlich die Skalarproduktsumme immer wieder für jedes Element MEMatrix[i,j] neu-initialisieren, am besten setz mal die Summe direkt vor der k-Schleife auf Null:
Delphi-Quellcode:
for j := 0 to Length(MEMatrix[0])-1 do
begin
//Errechnen der Ergebniswerte aus den eingebenen Matritzen
summe := 0;
for k := 0 to Length(M1Matrix[i])-1 do
begin
summe := summe + (M1Matrix[i,k] * M2Matrix[k,j]);
end;
MEMatrix[i,j] := summe;
StringGrid3.Cells[j,i] := IntToStr(summe);
end;
Danke! Daran lag es, ärgere mich gerade selber über sowas banales
alles funktioniert jetzt perfekt!
Den einzigen "Bug" den ich jetzt noch habe ist, dass in dem StringGrid an der Position 1,1 zwar eine Zahl steht, diese allerdings erst sichtbar ist wenn ich drauf klicke?! Oo sehr seltsam.. alle anderen sind sichtbar.