Force another application SendToBack

Question

I need my form in front of an application. However, the common methods do not work.

Methods already tried

//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);

Application in question

Comments

The application in question only works in full screen mode.

I do not want complete code, only a way forward.

Excuse me for my bad English and thanks for your time.

Do you have FormStyle = fsStayOnTop? – Tomáš Kratochvíla Jul 09 '16 at 16:55 — Tomáš Kratochvíla, Jul 09 '16 at 16:55
Yes and don`t work just with this app – 3V3LYN Jul 09 '16 at 17:03 — 3V3LYN, Jul 09 '16 at 17:03
Do you get a good handle in HD?? – GolezTrol Jul 09 '16 at 18:13 — GolezTrol, Jul 09 '16 at 18:13
Yes Work Fine with others apps all methods – 3V3LYN Jul 09 '16 at 18:42 — 3V3LYN, Jul 09 '16 at 18:42

Tomáš Kratochvíla · Answer 1 · 2016-07-09T18:15:25.933

0

You are setting your form to the bottom. To make it topmost:

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

Another approach, if you really want to force external application to the background you need to get its handle. For example, if such application is named calc:

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);

edited Jul 09 '16 at 18:15

answered Jul 09 '16 at 17:04

Tomáš Kratochvíla

723
4
19

Thanks for try help but does not work. the application is in front of all up to open the task manager he can not stay in focus always is back. – 3V3LYN Jul 09 '16 at 17:18
So you have an application that stay on top even when Task Manager is moved to the same position? – Tomáš Kratochvíla Jul 09 '16 at 17:20
Do you have your application in VMWare Player and expect it to be on top of some other application that is not in the same virtual environment? Maybe complete screenshot might explain the situation. – Tomáš Kratochvíla Jul 09 '16 at 17:23
but the application was developed in order to not leave other applications in front of him. and the image is complete my application this back this full screen – 3V3LYN Jul 09 '16 at 17:36
This can be guaranteed on Windows XP but not on newer versions. – Tomáš Kratochvíla Jul 09 '16 at 17:37
this running on Windows 7 64-bit – 3V3LYN Jul 09 '16 at 17:41

score 0 · Answer 2 · edited May 23 '17 at 10:29

0

You can try this:

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

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

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

edited May 23 '17 at 10:29

Community

1
1

answered Jul 09 '16 at 17:19

ChrisB

2,497
2
24
43

Thank you think it will help me a lot – 3V3LYN Jul 10 '16 at 14:34
This should not be an answer but a comment referring to Sertac's answer, so -1 – whosrdaddy Jul 11 '16 at 08:42
@SertacAkyuz Sorry i didn't find the original thread. Credits added. – ChrisB Jul 21 '16 at 16:21
@Chris - Thanks. Anyway I doubt 3v3lyn has a user32 window at all, but perhaps a dx surface or such. Probably none of the recommendations on this page will help.. – Sertac Akyuz Jul 21 '16 at 17:07

Force another application SendToBack

2 Answers2