Erstellen einer Tabelle mit Sinus- und Cosinus Werten

[hamptoncourt]

Ja, soweit hab ich das mit der Berechnung auch ... aber er soll es ja als externe Datei speichern ... z.B. als test.dat .... Wenn ich aber SafeArray benutze, sagt er mir, dass er die nicht kennt. Muss ich dann erst als Variable "SafeArray : TSafeArray" Festlegen??? Aber als was leg ich dann den Typ TSafeArray fest??? Oder mache ich das grad total falsch ... ??? Ich bin verwirrt *lol*


type
TSinCosTabelle = array[0..900] of double;
TArrayData = array of string[20];
var
ArrayData: TArrayData;
SinusTabelle : TSinCosTabelle;
CosinusTabelle : TSinCosTabelle;
i : Integer;

for i := 0 to 900 do
begin
SinusTabelle[i] := DegToRad(Sin( 0.1 * i));
CosinusTabelle[i] := DegToRad(Cos( 0.1 * i ));
end;

SaveArray(ExtractFilePath(Application.ExeName) + 'test.dat', ArrayData);
end;