Mysteriöser Stack-Overflow

[Chris1986]

Hallo,
ich habe in meinem Programm Forms, die aus einem Array geladen und angezeigt werden.
Der Type des Arrays:

Delphi-Quellcode:

  TAuswertungsfenster = Array[1..255] of record //max 255 Fenster können geöffnet werden
                                           aktiv                    : boolean; 
                                           Fenster                  : TForm;
                                           Personendaten            : TTestperson;
                                           pnPersonendaten, Optionen: TPanel;
                                           Name, Geburtstag, Bestzeit,
                                           DschnittZeit             : TLabel;
                                           maennlich, weiblich      : TRadiobutton;
                                           Tabelle                  : TStringgrid;
                                           Diagramm                 : TImage;
                                           gbGrafik,
                                           gbTabelle                : TGroupBox;
                                        end;

Wird ein Fenster erstellt, wird aktiv auf true gesetzt. Versuche ich jetzt mit folgender Funktion ein Fenster im Array zu finden, das gerade angezeigt (Fenster.showing) wird, stürzt das Programm mit einem Stack-Overflow Fehler ab.

Delphi-Quellcode:

function TReaktionstest.aktives_Fenster (Formfeld: TAuswertungsfenster; Anzahl_Fenster: byte): byte;
var lauf: byte;
begin
  Result := 0;
  for lauf := 1 to Anzahl_Fenster do
  begin
    if Formfeld[lauf].aktiv //Hier stürzt das Programm ab
      then begin
             if Formfeld[lauf].Fenster.showing
               then Result := lauf;
           end;
  end;
end;

Weiß jemand warum?

MfG
Christian

[nailor]

kann es sein, dass dein " Anzahl_Fenster: byte" das du übergibts größer ist, als die Anzahl an erstellten Auswertungsfenstern, oder dass die erstellten Auswertungsfenster nicht der Reihe nach in das Array kommen, sondern dass da Lücken drin sind?

[Chris1986]

Nein, das kann nicht sein.
Wenn man das Fenster nicht mit der Fkt sucht, sondern direkt anspricht, dann gehts.

[Chris1986]

Fehler gefunden.
Es lag am Übergabeparameter. Mit einem Verweisparameter gehts :? So ein dummer Fehler :x