delphi - how to close ie8 tabs -

This code is not locking a tab in Internet Explorer 8. If I post the WM_close command to Wnd it closes Internet Explorer but I do not want to close the current tab completely 'ieframe'. FindWindowEX (Wnd, 0, 'Frame tab', zero) Is the frame called to handle? If yes, why is not the current tab being shut down in Internet Explorer?

  var Wnd, WndChild: hwnd; Start Wnd: = FindWindow ('IEFrame', zero); WndChild: = FindWindowEX (Wnd, 0, 'frame tab', zero); Postmessage (WNDBield, WM_Coll, 0, 0); End;  

You have lost 1 layer, tab itself, besides that, it was okay . .

  var Wnd, WndChild: Thandle; Start Wnd: = FindWindow ('IEFrame', zero); // Most IE If Wnd & gt; 0 Then start WndChild: = FindWindowEx (Wnd, 0, 'frame tab', zero); // Tab holder if WndChild & gt; 0 Then start WndChild: = FindWindowEX (WndChild, 0, 'TabWindowClass', zero); // Top priority tabs if WndChild & gt; 0 Then PostMessage (WndChild, WM_CLOSE, 0, 0) Then ShowMessage ('closed request succeeded ...') and ShowMessage ('Failed!'); No map, click on tab, IEEE if post message (WD, WMCAC, 0, 0) then showages ('Close request succeeded ...') and ShowMess ('failed!'); End Show Message ('No IE'); End;