Funktion Max, Min um Werte zu vergleichen

Aton · Beiträge: 125 Windows XP D7 Enterprise

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

markieren

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?

Gast Erhaltene Danke: 1

dafür gibt es overload oder arrays.

Bsp:

markieren

Delphi-Quelltext

1:
2:

function blubb(a: integer): ... ; overload;
function blubb(a, b: integer): ...; overload;

bms · Verfasst: 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.

_________________
VORSICHT: Ich behersche seit heute die Fünf-Finger-Handflächen-Herz-Explodier-Schlag-Kampf-Technik >

Aton · Beiträge: 125 Windows XP D7 Enterprise

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.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme