MessageQueue nie leer? - WaitForInputIdle Problem

[Meta777]

@Christian:
Hatte erst mit INFINITE gewartet aber da kamm es nie zurück (obwohl es gestartet und bereit war).
Um das Problem zu "umgehen" hab ich im .FormCreate ein TOpenDialog erzeugt welcher sich selbst wieder schließt - Das ist allerdings seeehr unelegant...

Zitat von negaH:

WAIT_TIMEOUT das bedeutet deine Funktion kehrt nicht zurück weil keine Messages im Queue liegen.

Das heißt also WaitForInputIdle() wartet solange bis ein Nachricht in der Queue ist? Ich dachte das ist genau anderstrum?

Zitat von negaH:

Die sich ergebenden Fragen sind nun:

- WaitForInputIdle() welche Parameter hast du benutzt ?

WaitForInputIdle(SEInfo.hProcess, 5000);

Zitat von negaH:

- ist deine Anwendung eine Consolen Anwendung ?

Nein

Zitat von negaH:

- wird deine Anwendung mit Application.Run gestartet ?

begin
Application.Initialize;
Application.CreateForm(TfrmMain, frmMain);
Application.Run;
end.

Zitat von negaH:

- hast du einen Quelltext der das Problem demonstriert ?

Momentan grad nicht. Da ich noch nicht weiß welche Kompo/welche Source das Problem verursacht.

Zitat von negaH:

Du möchtest den Messagequeue leeren ? Warum benutzt du nicht folgendes ?

Delphi-Quellcode:

procedure ClearMessageQueue;
var
  Msg: TMsg;
begin
  while PeekMessage(0, 0, $FFFF, Msg, pm_Remove) do
  begin
    TranslateMessage(Msg);
    DispatchMessage(Msg);
  end;
end;

Gruß hagen

Danke leider sind die Parameter der PeekMessage nicht kompatible mit der Windows.PeekeMessage?!?

Delphi-Quellcode:

function PeekMessage(var lpMsg: TMsg; hWnd: HWND;
  wMsgFilterMin, wMsgFilterMax, wRemoveMsg: UINT): BOOL; stdcall;

Gottes Segen