Die größer Zahl nehmen ?

[thomas2009]

Hallo

kann man in Delphi die direkt die größer zahl nehmen ?

ich möchte nicht folgendes machen

Delphi-Quellcode:

if x > y then begin z:=x; end else begin z:=y; end:

Sondern z:=groesser(x;y):

Oder gibt es sowas in delphi nicht ?

[DeddyH]

Max (Unit math, glaube ich).

[Meflin]

http://www.delphibasics.co.uk/RTL.asp?Name=Max

[Matze]

Hi,

nur als Ergänzung, damit du siehst, was es tolles in Delphi gibt: Man kann selbst Funktionen schreiben. :stupid:

Delphi-Quellcode:

function groesser(const a, b: Integer): Integer;
begin
  if a > b then
    Result := a
  else
    Result := b;
end;

Das ist ungetestet. Der Aufruf (fast so wie du es möchtest):

Delphi-Quellcode:

z := groesser(x, y):

Das gilt nun für Integer-Zahlen (ganze Zahlen).

Grüße, Matze

[himitsu]

und damit du siehst wie gut deine If-Abfrage war :angel:

die eine Max-Funktion aus der Unit Math

Delphi-Quellcode:

function Max(const A, B: Integer): Integer;
begin
  if A > B then
    Result := A
  else
    Result := B;
end;

[thomas2009]

Mit der Funktion geht auch aber Delphi macht dach von alleine

Max(3,11):=11;

Danke

[Meflin]

Zitat:

Zitat von thomas2009

Mit der Funktion geht auch aber Delphi macht dach von alleine

Max(3,11):=11;

Was soll da hießen "von alleine"? Das macht garnix von alleine. Max ist einfach nur eine Funktion, die mitgeliefert wird. Ob du die verwendest oder eine selbstgeschriebene ist Jacke wie Hose - beides ist nicht "von alleine".

[Matze]

Die Frage ist immer, ob es sich lohnt, eine große Mathematik-Unit einzubinden für eine noch so einfache Funktion.
Aber gut, die Dateigröße spielt heute kaum mehr eine Rolle und von der Geschwindigkeit her wird es ähnlich sein.

Aber es ist richtig, was Meflin sagt und es wäre gut, wenn du das auch verstehen würdest, denn solche Grundlagen sind immer hilfreich.

PS: Lustig, mein runter getippter Code oben nahezu identisch mit dem der Math-Unit, sehe ich gerade (Bezeichner, Formatierung).

Grüße, Matze

[himitsu]

nja, die Math-Unit selber braucht nicht mehr platz, als man davon verwendet (keine Initialisierung vorhanden) ... nja, außer daß sie die rießige Unit SysUtils einbindet ... aber wenn man diese Unit eh schon drin hat, isses hier egal :stupid:

[Sir Rufo]

Zitat:

Zitat von Meflin

Zitat:

Zitat von thomas2009

Mit der Funktion geht auch aber Delphi macht dach von alleine

Max(3,11):=11;

Was soll da hießen "von alleine"? Das macht garnix von alleine. Max ist einfach nur eine Funktion, die mitgeliefert wird. Ob du die verwendest oder eine selbstgeschriebene ist Jacke wie Hose - beides ist nicht "von alleine".

doch ... strom kommt aus der steckdose und geld kommt vom konto ... dann ist ja alles klar ... :stupid: