Solved

TWebBrowser and IE9

Posted on 2011-03-23
5
736 Views
Last Modified: 2012-06-27
I've been using very simple code in my program to either show a lock or unlock graphic when a web page is loaded.

procedure Tform.WebBrowser1SetSecureLockIcon(ASender: TObject;
  SecureLockIcon: Integer);
begin
  if (securelockicon = secureLockIconUnsecure) then
      unlock.Visible:=true
     else
      lock.Visible:=true;
end;

Open in new window


Since upgrading to IE9 the component always returns secureLockIconUnsecure.  Is there a workaround for fix for this?
0
Comment
Question by:DSOM
  • 2
5 Comments
 
LVL 24

Expert Comment

by:jimyX
Comment Utility
In the IE there are some settings that you can change which will make the SecureLock disappear:
http://www.todayinwindows.com/2011/02/remove-those-only-secure-content-is-displayed-popups-in-internet-explorer/

Did you check the Security Settings whether you are disabling/enabling one or more of the options that do this?

In the IE it can be easily solved by reset the settings:
http://windows.microsoft.com/en-NZ/windows7/Change-Internet-Explorer-9-Security-settings
0
 

Author Comment

by:DSOM
Comment Utility
Unfortunately, these steps would need to be completed by hundreds of customers to be effective.  I was hoping there was a programmatic setting related to TWebBrowser.  For now I have simply removed the lock/unlock function.
0
 
LVL 24

Accepted Solution

by:
jimyX earned 500 total points
Comment Utility
You can set all those options by using the Windows Registry:
http://support.microsoft.com/kb/182569

I am using Windows XP (I am sure you are using Win 7, so the should be similar), so it is under:
HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\3

For example to change the value of "Display mixed content", set the DWORD Value "1609" as follows:
0 = Enabled
1 = Prompt
2 = NON-Selected
3 = Disable

So the idea is to set the registry by your application.
0
 
LVL 100

Expert Comment

by:mlmcc
Comment Utility
This question has been classified as abandoned and is closed as part of the Cleanup Program. See the recommendation for more details.
0

Featured Post

How to run any project with ease

Manage projects of all sizes how you want. Great for personal to-do lists, project milestones, team priorities and launch plans.
- Combine task lists, docs, spreadsheets, and chat in one
- View and edit from mobile/offline
- Cut down on emails

Join & Write a Comment

In this tutorial I will show you how to use the Windows Speech API in Delphi. I will only cover basic functions such as text to speech and controlling the speed of the speech. SAPI Installation First you need to install the SAPI type library, th…
Creating an auto free TStringList The TStringList is a basic and frequently used object in Delphi. On many occasions, you may want to create a temporary list, process some items in the list and be done with the list. In such cases, you have to…
Sending a Secure fax is easy with eFax Corporate (http://www.enterprise.efax.com). First, Just open a new email message.  In the To field, type your recipient's fax number @efaxsend.com. You can even send a secure international fax — just include t…
Access reports are powerful and flexible. Learn how to create a query and then a grouped report using the wizard. Modify the report design after the wizard is done to make it look better. There will be another video to explain how to put the final p…

772 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

12 Experts available now in Live!

Get 1:1 Help Now