WaitForMultipleObjects und offene Arrays

[elliott]

Hallo!
Ich habe folgendes Problem:
Wenn ich WaitForMultipleObjects mit einem offenen Array fütter, dann endet das immer mit einem Fehler.
Weiss jemand zufällig ob man dort nur normale Arrays benutzen kann?

[Basilikum]

zeig mal dein jetztiger Aufruf (Code)... ich habe einen Verdacht, wäre aber ohne weitere Informationen ein Raten...
grundsätzlich kann man beide Array-Arten für WaitForMultipleObjects verwenden (mit dem richtigen Aufruf)...

[elliott]

zum Beispiel so:

Delphi-Quellcode:

var
  ThreadHandleListe: array of tHandle;
  WaitErgebnis: cardinal;
...
  WaitErgebnis:= WaitForMultipleObjects( length(ThreadHandleListe), @ThreadHandleListe, true, 0 );

Das WaitErgebnis ist irgendwie immer $FFFFFFFF, ob die Threads nun noch laufen oder nicht.

[Die Muhkuh]

Hi,

bin mir nicht ganz sicher, aber versuche mal High statt Length.

[elliott]

Hier ein komplettes Beispiel.
Je nachdem ob mit einem offenen oder normalen Array probiert werden soll muss man nur die Klammern vor dem Beispiel setzen...

Delphi-Quellcode:

procedure testWFMO;
var
{  ThreadHandleListe: array of tHandle; {Beispiel 1}
  ThreadHandleListe: array[0..4] of tHandle; {Beispiel 2}
  WaitErgebnis: cardinal;
  cZaehler: cardinal;
begin
{  SetLength( ThreadHandleListe, 5 ); {Beispiel 1}
  for cZaehler:= 1 to length(ThreadHandleListe) do
    ThreadHandleListe[cZaehler -1]:= CreateEvent( nil,true, true, nil );
  WaitErgebnis:= WaitForMultipleObjects( length(ThreadHandleListe), @ThreadHandleListe, true, 0 );
writeln( WaitErgebnis );
  for cZaehler:= 1 to length(ThreadHandleListe) do
    CloseHandle( ThreadHandleListe[cZaehler -1] );
{  SetLength( ThreadHandleListe, 0 ); {Beispiel 1}
end;

So läuft {Beispiel 2} und das Ergebnis ergibt 0.
Wenn man vor {Beispiel 2} vorn noch eine Klmmer setzt und die anderen vorn entfernt, hat men {Beispiel 1}, welches $FFFFFFFF ergibt...

Dabei ist es nicht relevant ob man high oder length benutzt...

[Basilikum]

bei dynamischen Arrays braucht es noch das [0], ansonsten übergibtst du der API einen Pointer auf einen Pointer auf die Handles (einmal Pointer zuviel).... (Verdacht bestätigt )

Code:

WaitErgebnis:= WaitForMultipleObjects( length(ThreadHandleListe),@ThreadHandleListe[color=#ff003f][0][/color],true,0);

[elliott]

Danke!
Jetzt funktioniert es!

[Luckie]

Und es sollte length()-1 heißen. Das Eloement length() gibt es nämlich nicht, da dynamische Array null-basierend sind.

[Basilikum]

Zitat von Luckie:

Und es sollte length()-1 heißen. Das Eloement length() gibt es nämlich nicht, da dynamische Array null-basierend sind.

nein, das ist absolut korrekt so !
das API erwartet die ANZAHL der Handles, nicht den höchsten Index....

[Luckie]

Ups. Mein Fehler.