Eine andere Anwendung erzwingen SendToBack

Question

Ich brauche mein Formular vor einer Anwendung. Die üblichen Methoden funktionieren jedoch nicht.

Methoden bereits versucht

//method #1 

PostMessage(HD, WM_USER, 0, 0); 
SetWindowPos(HD, HWND_BOTTOM, 0, 0, 0, 0, SWP_NOMOVE or SWP_NOSIZE); 


//method #2 
dwThreadID := GetWindowThreadProcessId(HD, nil); 
dwCurrentThreadID := GetCurrentThreadId; 
AttachThreadInput(dwCurrentThreadID, dwThreadID, true); 
BringWindowToTop(Aff.handle); 
ShowWindow(Aff.handle, SW_SHOW); 

Anwendung in Frage

Kommentare

Die betreffende Anwendung funktioniert nur im Vollbildmodus.

Ich möchte nicht vollständigen Code, nur einen Weg nach vorn.

Entschuldigung für mein schlechtes Englisch und danke für Ihre Zeit.

Answer 1

Sie setzen Ihr Formular nach unten. Um es oberste:

SetWindowPos(handle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOACTIVATE or SWP_NOMOVE or SWP_NOSIZE); 

Ein weiterer Ansatz, wenn Sie wirklich zwingen wollen Sie externe Anwendung auf den Hintergrund müssen den Griff zu bekommen. Zum Beispiel, wenn eine solche Anwendung wird calc genannt:

hCalc := FindWindow('calc', nil); 
SendMessage(hCalc , WM_SYSCOMMAND, SC_MINIMIZE, 0); // you can also minimize the application 
SetWindowPos(hCalc , HWND_BOTTOM, 0, 0, 0, 0, SWP_NOACTIVATE or SWP_NOMOVE or SWP_NOSIZE); 

Answer 2

Sie können dies versuchen:

function ForceForegroundWindow(AHandle: THandle): Boolean; 
var 
    Input: TInput; 
begin 
    Result := True; 

    ZeroMemory(@Input, SizeOf(Input)); 
    SendInput(1, Input, SizeOf(Input)); 
    SetForegroundWindow(AHandle); 
end; 

Credits Sertac Akyuz aus (How to bring my application to the front?)