Thema: Delphi if ... then vereinfachen

Einzelnen Beitrag anzeigen

Benutzerbild von dizzy
dizzy

Registriert seit: 26. Nov 2003
Ort: Lünen
1.932 Beiträge
 
Delphi 7 Enterprise
 
#7

Re: if ... then vereinfachen

  Alt 21. Apr 2004, 01:10
Die Unit "Math" einbinden, und dein Array muss ein Array[a..b] of double sein. Dann geht:
if gewicht[1] >= MaxValue(gewicht) then ... Wenn also gewicht[1] der größte Wert im Array ist (und auch wenn weitere Werte =gewicht[1], aber auch die größten sind), so wird der Ausdruck true.

Für Integer-Arrays hab ich sowas nicht gefunden, aber man kann sich ja relativ leicht ein "MaxValue" für beliebige Typen selber schnell schreiben. Ist nen 3-4-Zeiler.

gruss,
dizzy
Fabian K.
INSERT INTO HandVonFreundin SELECT * FROM Himmel
  Mit Zitat antworten Zitat