Auch wenn ich weiß, dass der Compiler es automatisch macht, so schreibe ich persönlich doch lieber
Code:
function MaxValue(const Data: array of Single): Single;
var
I: Integer;
startL: Integer;
endL: Integer;
begin
Result := Data[Low(Data)];
startL:= Succ(Low(Data));
endL:= High(Data);
for I := startL to endL do
if Result < Data[I] then
Result := Data[I];
end;
Und ob max absolut sein soll oder nicht, wäre noch zu klären.
Tomy