Danke für die schnelle Antwort!
1. Double und Extended habe ich schon probiert, leider geht's immer nicht.
2. Ich denke, die Fehlermeldung hat mit sin() und cos() nichts zu tun,
da ich gerade NUR "Rotationsmatrix[1.1]:=3;" geschrieben habe, tritt der Fehler immer wieder auf.
1.)
Datentyp real wird nicht direkt von der FPU unterstützt und sollte vermieden werden:
Delphi-Quellcode:
type
Matrix_3x3 = array[1..3, 1..3] of Double; // oder Extended
2.)
Sin() und Cos() erwarten ein Argument im Bogenmass.
Ich vermute mal ganz stark, dass deine Trackbars auf "Grad" ausgerichtet sind.
Daher müsstest du die Funktion DegToRad() benützen.
Um Schreibarbeit zu vermeiden würde ich folgende Hilfs-Funktionen verwenden:
Delphi-Quellcode:
function SinDeg(value:Extended):Extended;
begin
result := Sin(DegToRad(value));
end;
function CosDeg(value:Extended):Extended;
begin
result := Cos(DegToRad(value));
end;
Rotationsmatrix[1.1]:=CosDeg(TrackBar4.Position)*CosDeg(TrackBar3.Position);
3.) ich glaub' nicht, dass der Fehler in dem Codestückchen ist, dass du uns gezeigt hast.