Why do i can't close IE WINDOW and explorer window

i use this function to close:
SendMessage(GetForegroundWindow, WM_CLOSE, 0, 0);
i can close any window of any program but i can't close INTERNET EXPLORER WINDOW and EXPLORER WINDOW
 when i use
SendMessage(GetForegroundWindow, WM_SYSCOMMAND, SC_MINIMIZE, 0);
i can minimize   INTERNET EXPLORER WINDOW and EXPLORER WINDOW
but i can't close them when use SendMessage(GetForegroundWindow, WM_CLOSE, 0, 0);
please help me
petervnAsked:
Who is Participating?

[Product update] Infrastructure Analysis Tool is now available with Business Accounts.Learn More

x
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

fanarCommented:
Try this
procedure TForm1.Button1Click(Sender: TObject);
var
ProID: Dword;
hprocess: Dword;
begin

GetWindowThreadProcessId(GetForegroundWindow(),@ProID);
hprocess:=OpenProcess(PROCESS_TERMINATE,TRUE,ProID);
TerminateProcess(hprocess,1);
end;

REgards, Anar
fanarCommented:
You can also use DestroyWindow(HWND) i thnk
delphizedCommented:
with terminateprocess you loose a lot of resource and memory and all the dependant modules.
If you look with winsight you can view that the windows you're closing isn't the iexplorer itself. You could try with a findwindow and then again with the close.
HTML5 and CSS3 Fundamentals

Build a website from the ground up by first learning the fundamentals of HTML5 and CSS3, the two popular programming languages used to present content online. HTML deals with fonts, colors, graphics, and hyperlinks, while CSS describes how HTML elements are to be displayed.

petervnAuthor Commented:
delphized
 can you tell me more details,
how to close the current window of internet explorer and explorer and other application)?
delphizedCommented:
well, I tried for you.
the first part were not difficult, I spyed with winsight and thi works well:

var
  HWND:THandle;
begin
  //close internet explorer
  HWND:=FindWindow('IEFrame',nil);
  if HWND>0 then
  begin
    //this calls wm_destroy and wm_ncdestroy
    SendMessage(HWND,WM_DESTROY,0,0);
    SendMessage(HWND,WM_NCDESTROY,0,0);
  end
  else
  begin
    showmessage('no internet explorer to close');
  end;

for the second it is a bit frustrating, but I'll arrive to it in a day or two (I haven't so much time). I hope you can wait...
bye

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
petervnAuthor Commented:
hey man
but i need to close the window of any current application.
it's mean that,if it is the window of Internet explorer or explorer window or any current  application,i can close it
delphizedCommented:
yes, follow your method (wm_close) for normal windows and my method for iexplorer
fidel83Commented:

procedure killGoogle;
var ie: thandle;
PID : Cardinal;
PH  : Cardinal;
begin
      ie:=findWindow('IEFrame', 'Google - Microsoft Internet Explorer');
      if ie=0 then exit;

      GetWindowThreadProcessId(ie, @PID);
      PH := OpenProcess(PROCESS_TERMINATE, False, PID);
      TerminateProcess(PH, 0);
      closeHandle(PH);
end;
mgazzaCommented:
why cant you just send a mesage to the system menu Wm_sysclose i think i havnt got my compiler right now :P
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
Delphi

From novice to tech pro — start learning today.