Khan Consultoria
asked on
Using goback and goforward for Internet Explorer created with CreateOleObject
Hello Guys,
I create this code:
I want to work with 2 bottons, one for goback and another to goforward.
But before using it, I need to check if my IE has changed and has a history page
How could I check my IE change?
I found the command but I don't know how to insert it into my code:
https://docs.microsoft.com/en-us/previous-versions/windows/internet-explorer/ie-developer/platform-apis/aa768361(v=vs.85)
something like in this example:
https://www.swissdelphicenter.ch/en/showcode.php?id=1158
Note: I can't use the TWebBrowse that comes with Delphi due to being out-of-date.
regards
I create this code:
ie := CreateOleObject('InternetExplorer.Application');
h := ie.hwnd;
ie.visible := false;
ie.fullscreen := false;
ie.TheaterMode := false;
ie.MenuBar := False;
ie.AddressBar := False;
ie.Resizable := true;
ie.StatusBar := False;
ie.ToolBar := 0;
ie.Width := Panel2.Width;
ie.Height := Panel2.Height+27;
ie.top := -27;
ie.left := 0;
sleep(3000);
windows.setparent(ie.hwnd, panel2.handle);
ie.visible := true;
if _htmlDireta<>'' then
ie.Navigate(_htmlDireta)
else
ie.Navigate('about:blank');
I want to work with 2 bottons, one for goback and another to goforward.
But before using it, I need to check if my IE has changed and has a history page
How could I check my IE change?
I found the command but I don't know how to insert it into my code:
https://docs.microsoft.com/en-us/previous-versions/windows/internet-explorer/ie-developer/platform-apis/aa768361(v=vs.85)
something like in this example:
https://www.swissdelphicenter.ch/en/showcode.php?id=1158
Note: I can't use the TWebBrowse that comes with Delphi due to being out-of-date.
regards
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
ASKER