Welchen Index hat der maximalwert in einem Array??

[falk]

Hallo,

vermutlich ist es ganz einfach, habe es dennoch nirgendwo gefunden.

Ich habe ein Array mit bspw. Größe 100

nun bestimme ich mit folgendem Befehl den Maximalwert: MaxValue(Array)
Das gibt mir zwar den Maximalwert, zusätzlich brauche ich aber auch noch den Index dieses Array-Teils.

Danke
Falk

[noch_ein_hannes]

Ich habe es jetzt nicht getestet, aber es könnte so klappen:

Delphi-Quellcode:

 index := System.Array.BinarySearch(Array, MaxValue(Array) );

[sECuRE]

Hi,

@noch_ein_hannes: geht doch um Win32?

@falk: length(array)-1, oder mal in der Hilfe nach "high" schauen

cu

[noch_ein_hannes]

@sECuRE: Sorry, das hatte ich übersehen :-(

[falk]

Zitat:

Zitat von sECuRE

Hi,

@falk: length(array)-1, oder mal in der Hilfe nach "high" schauen

cu

Schon mal Danke für eure Ideen, aber das zeigt mir doch nur den höchsten Indexwert. Ich möchte aber den Index vom größten Wert haben.

Also array [1..5]
Daten-Bsp: 12, 55, 98, 12, 23

Der maximalwert ist 98, Der IOndex ist 3 (und die drei würde ich gern mit einem Befehl ermitteln)

Falk

[Dax]

So könnte es gehen:

Delphi-Quellcode:

var Max, MaxI, i:Integer;

Max := Low(Integer);
MaxI := -1;

for i := 0 to High(Array) do
  if Array[i] > Max then
  begin
    Max := Array[i];
    MaxI := i;
  end;