du musst den zugriffs- operator Items realisieren; probiere es mal so:
Delphi-Quellcode:
type TPolynom = record
private
function GetCoef(idx:Integer):double;
procedure PutCoef(Idx: Integer; value:double);
public
A: array of Double;
Grad:integer;
// usw.
property Items[Idx: Integer]: double read GetCoef write PutCoef; default;
end;
var FX,FZ: TPolynom;
dann kannst du auch schreiben und lesen der koefizienten wie folgt realisieren
Delphi-Quellcode:
setLength(FX.A,10);
setLength(FZ.A,10);
FX.Grad := 1;
FX.A[0] := -2;
FX.A[1] := 1; //x-2
FZ := FX;
FZ[0] := -4;
grüsse