<div>
Hello<br />
change ur code to use &nbsp;GetForegroundWindow API<br />
<br />
&nbsp; var<br />
&nbsp; h:hwnd;<br />
begin<br />
&nbsp; &nbsp; h:=GetForegroundWindow;<br />
&nbsp; &nbsp; PostMessage(h,WM_CLOSE,0,0<wbr />);<br />
end;<br />
<br />
Mohammed
</div>


Hello
change ur code to use  GetForegroundWindow API

  var
  h:hwnd;
begin
    h:=GetForegroundWindow;
    PostMessage(h,WM_CLOSE,0,0);
end;

Mohammed

<div>
Ohh<br />
&nbsp; meikl you are faster :)<br />
<br />

</div>


<div>
why doesn't EE allow two people to share the points...
</div>


why doesn't EE allow two people to share the points...

<div>
nyt,<br />
<br />
&nbsp; Meikl gave you the first correct answer, and he's deserve the points<br />
<br />

</div>


nyt,

  Meikl gave you the first correct answer, and he's deserve the points



<div>
<div class="content wysiwyg-content">
Hi,<br />
I tried to use GetActiveWindow to get the handle of the active window, but failed. &nbsp;Can anyone tell me what's wrong with my code?<br />
<br />
var<br />
&nbsp; &nbsp;h:hwnd;<br />
begin<br />
&nbsp; &nbsp; &nbsp;h:=GetActiveWindow;<br />
&nbsp; &nbsp; &nbsp;PostMessage(h,WM_CLOSE,0,0<wbr />);<br />
end;<br />
<br />
The above code can only close the program itself, but if the active window is, say, Notepad, it failed to do what I want.<br />
<br />
Can anyone help me?<br />
Thanks in advance.
</div>
</div>


Hi,
I tried to use GetActiveWindow to get the handle of the active window, but failed.  Can anyone tell me what's wrong with my code?

var
   h:hwnd;
begin
     h:=GetActiveWindow;
     PostMessage(h,WM_CLOSE,0,0);
end;

The above code can only close the program itself, but if the active window is, say, Notepad, it failed to do what I want.

Can anyone help me?
Thanks in advance.

GetActiveWindow

Delphi is the most powerful Object Pascal IDE and component library for cross-platform Native App Development with flexible Cloud services and broad IoT connectivity. It provides powerful VCL controls for Windows 10 and enables FMX development for Windows, Mac and Mobile. Delphi is your choice for ultrafast Enterprise Strong Development™. Look for increased memory for large projects, extended multi-monitor support, improved Object Inspector and much more. Delphi is 5x faster for development and deployment across multiple desktop, mobile, cloud and database platforms including 32-bit and 64-bit Windows 10.