Hallo,
vielen Dank für Eure Antworten.
Die Fehlermedung 'Incompatible Types' Array und dyn. Array kam von einer falschen Array-Var.
Jetzt läuft es!
Ich habe noch eine Frage: Warum muß im Funktionskopf das Array of Double als Konstante deklariert werden ?
Ich habe noch die Funktion IndexOfMinValue geschrieben:
Delphi-Quellcode:
function IndexOfMinValue_1(Const x : Array of Double): Integer;
Var
Index : Integer;
MinValue : Double;
begin
Result := high(x);
MinValue := MaxDouble;
for Index := 0 to high(x) do begin
if x[Index] < MinValue then begin
Result := Index;
MinValue := x[Index];
end;
end;
end;
Wendelin