Programm starten und warten bis es geladen ist

[Christian Seehase]

Moin Helmi,

such' hier doch mal nach WaitForInputIdle

[Helmi]

hallo

danke für den Tip

leider weiss ich nicht wie ich das anwenden soll/kann

ich benutze ja folgende function:

Code:

procedure OpenFile(FileName: string);
var
  c: array[0..800] of Char;

begin
  StrPCopy(c, FileName);
  ShellExecute(Application.Handle, 'open', c, nil, nil, SW_NORMAL);
end;

wie muss ich das WAITFORINPUTIDLE dort einbauen?

sorry aber das noch zu hoch für mich

mfg
Helmi

[Jens Schumann]

Hallo,
das mit WaitForInputIdle habe ich auch noch nicht gewußt. Coole Funktion. Damit sind alle
meine bislang gemachten Aussagen hinfällig. Denn WaitForInputIdle macht genau das, was hier gefordert ist. Siehe dort WaitForInputIdle

Ich habe ein Beispiel dafür in die Anlage gepackt.
Das Formular hat einen Button (über den notepad.exe gestartet wird) und eine CheckBox.
Ist die CheckBox markiert, wird mit WaitForInputIdle solange gewartet, bis notepad Botschaften empfangen kann. Zum Beweis wird versucht eine WM_SETTEXT Botschaft an notepad zu senden. Damit wird die Caption auf "Hallo Welt" (was sonst) gesetzt. Wenn die CheckBox nicht markiert ist, wird sofort nach dem CreateProcess zurückgekehrt ist versucht die Botschaft zu versenden. Das klappt bei mir aber nicht.