Link to home
Start Free TrialLog in
Avatar of SHAHEEN_AKHTAR
SHAHEEN_AKHTARFlag for India

asked on

Turn on/off IE Popup blocker

Hello all,
I want to enable/disable IE's built-in popup blocker through my delphi program and get the count of blocked items. Please provide me some way out. Thanks a lot.
ASKER CERTIFIED SOLUTION
Avatar of Eddie Shipman
Eddie Shipman
Flag of United States of America image
Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
Avatar of SHAHEEN_AKHTAR
SHAHEEN_AKHTAR
Flag of India image

ASKER

Thanks Eddie for your Tip. The following is the delphi code to execute this:
procedure TBandForm.BlockPop(const YesNo : boolean);
const
  PPBlk =
    'Software\Microsoft\Internet Explorer\New Windows\';
  SubKey = 'Explorer\';
  YesNo10 : array[False .. True] of Word = (0, 1);
var mylist : TStrings;
begin
  with TRegistry.Create do
  try
    RootKey:=HKEY_CURRENT_USER;
    if OpenKey(PPBlk, True) then
    begin
      //GetValueNames(myList);
      WriteInteger('PopupMgr',YesNo10[YesNo]);
    end;
    CloseKey;
  finally
    Free;
  end;
end;

Thanks a lot once again