For comparison, IE on the left and a Shell.Explorer control on the right:
- IE_vs_shell.explorer.png (22.26 KiB) Viewed 2580 times
Shell.Explorer theme?
Shell.Explorer theme?
Does anyone know if there is a way to have the Shell.Explorer control use the same theme for its native controls (specifically buttons) as those used in a normal IE instance?
For comparison, IE on the left and a Shell.Explorer control on the right:
For comparison, IE on the left and a Shell.Explorer control on the right:
Re: Shell.Explorer theme?
You could try getting the window/control styles for each and comparing:
Code: Select all
q::
WinGet, vWinStyle, Style, A
WinGet, vWinExStyle, ExStyle, A
vCtlClassNN := "Internet Explorer_Server1"
ControlGet, vCtlStyle, Style,, % vCtlClassNN, A
ControlGet, vCtlExStyle, ExStyle,, % vCtlClassNN, A
MsgBox, % Format("0x{:08X} 0x{:08X}", vWinStyle, vWinExStyle)
MsgBox, % Format("0x{:08X} 0x{:08X}", vCtlStyle, vCtlExStyle)
return
homepage | tutorials | wish list | fun threads | donate
WARNING: copy your posts/messages before hitting Submit as you may lose them due to CAPTCHA
WARNING: copy your posts/messages before hitting Submit as you may lose them due to CAPTCHA
Re: Shell.Explorer theme?
This question came up again. I did find the following article on the MSDN Forum that mentions using a meta tag to apply the theme to the control. I tried that but it didn't appear to do anything. The next method would be to implement IDocHostUIHandler and return DOCHOSTUIFLAG_THEME when GetHostInfo is called. I do not have the know-how to do this. Then it looks at the registry. The post does state that the meta tag is the last resort.
Hoping someone may have other thoughts. Thanks!
EDIT: I did try setting the registry key with no success. I did not restart after setting it though.
Hoping someone may have other thoughts. Thanks!
EDIT: I did try setting the registry key with no success. I did not restart after setting it though.
Re: Shell.Explorer theme?
You could at least try SetWindowTheme.
Code: Select all
q:: ;control set theme
ToolTip, abc`r`ndef`r`nghi
WinGet, hTT, ID, ahk_class tooltips_class32
Sleep, 2000
DllCall("uxtheme\SetWindowTheme", Ptr,hTT, Ptr,0, Str,"")
return
homepage | tutorials | wish list | fun threads | donate
WARNING: copy your posts/messages before hitting Submit as you may lose them due to CAPTCHA
WARNING: copy your posts/messages before hitting Submit as you may lose them due to CAPTCHA
Re: Shell.Explorer theme?
you probably need to set the User-Agent
Re: Shell.Explorer theme?
This was what I was trying:
jeeswg: I did try that (and your sample code has the parameters in the wrong order)
Code: Select all
Gui, Add, ActiveX, w400 h500 vwb hwndhwb, about:<!DOCTYPE html><meta http-equiv='MSThemeCompatible' content='yes'><meta http-equiv='X-UA-Compatible' content='IE=edge'>
wb.document.write("<div style='border: 2px solid blue; border-radius: 5px;'>DIV</div><button>test1</button><button>test2</button>")
Gui, Show
GuiClose() {
ExitApp
}
Re: Shell.Explorer theme?
- Are you saying that the SetWindowTheme DllCall arguments are the wrong way round in my example? The script did work.
- You could try 'IE=9' instead of 'IE=edge'.
- What theme names have you tried?
- You could try 'IE=9' instead of 'IE=edge'.
- What theme names have you tried?
homepage | tutorials | wish list | fun threads | donate
WARNING: copy your posts/messages before hitting Submit as you may lose them due to CAPTCHA
WARNING: copy your posts/messages before hitting Submit as you may lose them due to CAPTCHA
-
PlangavanCartier
Re: Shell.Explorer theme?
Code: Select all
Gui, Add, ActiveX, w400 h500 vwb hwndhwb, about:<!DOCTYPE html>
wb.document.write("<meta http-equiv='MSThemeCompatible' content='yes'><meta http-equiv='X-UA-Compatible' content='IE=edge'><div style='border: 2px solid blue; border-radius: 5px;'>DIV</div><button>test1</button><button>test2</button>")
Gui, Show
GuiClose() {
ExitApp
}Re: Shell.Explorer theme?
I am. The last two parameters are opposite of Just Me's SetExplorerTheme function in addition to how it is defined on MSDN
Using IE=9 also does not work, though I can't imagine why anyone would ever want to revert to using IE9...
Lastly, the only theme name I know of that does anything is "Explorer", and passing that does not work either.
Code: Select all
SetExplorerTheme(HCTL) { ; HCTL : handle of a ListView or TreeView control
If (DllCall("GetVersion", "UChar") > 5) {
VarSetCapacity(ClassName, 1024, 0)
If DllCall("GetClassName", "Ptr", HCTL, "Str", ClassName, "Int", 512, "Int") {
If (ClassName = "SysListView32") || (ClassName = "SysTreeView32") {
if(!DllCall("UxTheme.dll\SetWindowTheme", "Ptr", HCTL, "WStr", "Explorer", "Ptr", 0)) {
if(!(LV_EX_GetExtendedStyle(HCTL) & 0x10000))
LV_EX_SetExtendedStyle(HCTL, 0x00010000, 0x00010000) ; LVS_EX_DOUBLEBUFFER = 0x00010000
return True
}
}
}
}
Return False
}
Lastly, the only theme name I know of that does anything is "Explorer", and passing that does not work either.
Re: Shell.Explorer theme?
PlangavanCartier: It makes no sense to me, but that actually works. I moved the X-UA-Compatible tag to the end of the first line as I know that has to be present when the control is created.
Would be interesting to know why it works when writing to the page. Strange. But THANK YOU!
Would be interesting to know why it works when writing to the page. Strange. But THANK YOU!
Re: Shell.Explorer theme?
To keep this thread updated, I am unable to get PlangavanCartier's solution to work if I included a <link> tag to pull in some CSS styles.
-
PlangavanCartier
Re: Shell.Explorer theme?
Not a web dev (which is why I can't answer the why, sorry), but after seeing your screenshot I tried your T-T-T implementation from https://autohotkey.com/boards/viewtopic.php?f=6&t=38296 and, as far as I can tell, that loads a CSS file through the link tag.
Just doing this is enough to have normal IE-styled buttons here
Just doing this is enough to have normal IE-styled buttons here
Code: Select all
diff -Naurp AHK-ReactJS.orig/index.css AHK-ReactJS/index.css
--- AHK-ReactJS.orig/index.css 2017-10-13 13:20:10 +0100
+++ AHK-ReactJS/index.css 2018-03-16 21:32:48 +0000
@@ -32,17 +32,6 @@ body {
width: 34px;
}
-button:not(.square) {
- background-color: #FFF;
- box-shadow: none;
- border-radius: 5px;
- border: 1px solid gray;
-}
-
-button:not(.square):hover {
- background-color: cyan;
-}
-
.square:focus {
outline: none;
}
diff -Naurp AHK-ReactJS.orig/index.html AHK-ReactJS/index.html
--- AHK-ReactJS.orig/index.html 2017-10-13 13:20:56 +0100
+++ AHK-ReactJS/index.html 2018-03-16 21:34:28 +0000
@@ -2,6 +2,7 @@
<html>
<head>
<meta charset="UTF-8" />
+ <meta http-equiv='MSThemeCompatible' content='yes'>
<meta http-equiv="X-UA-Compatible" content="ie=edge">
<title>Hello World</title>
<script src="https://unpkg.com/react@16/umd/react.development.js"></script>
Re: Shell.Explorer theme?
Seems as if you've helped to uncover more errors in my code. I had my <head> tags misaligned so the meta tags weren't properly being applied. Thanks!
Who is online
Users browsing this forum: No registered users and 242 guests