Inkompatible Datentypen in Procedures bei Arrays mit Double bzw. Extended

[KodeZwerg]

Ich meine das es nur so funktionieren kann.

Delphi-Quellcode:

type
  TExtArr: Array of Extended;
  TDblArr: Array of Double;

...


procedure ExtArr(AArr: TExtArr);
begin
end;

procedure DblArr(AArr: TDblArr);
begin
end;

...

var
  MeinExt: TExtArr;
  MeinDbl: TDblArr;
begin
  SetLength(MeinExt, 1);
  SetLength(MeinDbl, 1);
  MeinExt[0] := 0.0;
  MeinDbl[0] := 0.0;
  ExtArr(MeinExt);
  DblArr(MeinDbl);