Entwickler-Ecke

Sonstiges (Delphi) - Funktion Max, Min um Werte zu vergleichen


Aton - Di 13.04.04 22:08
Titel: Funktion Max, Min um Werte zu vergleichen
Hallo Forum,

gibt es eine Funktion in Delphi, die Werte vergleicht und den größten zurückgibt?
z.B.

r := Max(4.22, 2.34); // r wäre 4.22

Wenn nein, wie programmiere ich die? Eine Funktion, wie


Delphi-Quelltext
1:
2:
3:
4:
function Max(r1, r2: Real): Real;
  begin
    if (r1>r2) then Result := r1 else Result := r2;
  end;


kann ich auch. Aber wie geht das für andere Übergabewerte (z.B. r1,r2 und r3) unter dem gleichen Funktionsnamen?


Anonymous - Di 13.04.04 22:32

dafür gibt es overload oder arrays.

Bsp:


Delphi-Quelltext
1:
2:
function blubb(a: integer): ... ; overload;
function blubb(a, b: integer): ...; overload;


bms - Di 13.04.04 22:34

D7 Enterprise haben aber Max nicht kennen? Guck dir in der Math Unit die Funktion Max an. Da hast du bereits alles.


Aton - Mi 14.04.04 07:35

Hallo,

@obb: Danke, so werde ich es machen.
@bms: Ich kenne auch nur das, was in der Delphi Hilfe steht. Außerdem kann die Funktion Max in der Unit Math nur zwei Argumente vergleichen. Ich wollte aber zwei, drei, vier, .... Trotzdem danke, für den Tipp mit der Math Unit.

Gruß Jens.