Jump to content

IE embedded border-radius not complying


Recommended Posts

I have IE 10 installed, so I assume the embedded is using the same.

If I make a test html doc that has a DIV with inline style of "border-radius:8px 8px 8px 8px;" this radius works if I browse the file with normal IE 10 --- but if I am embedding IE in a form and using _IEPropertySet($oIE, 'innerhtml', $html) with the exact same html that is in the file, the border-radius does not work.

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <IE.au3>

_IEErrorHandlerRegister()
Local $oIE = _IECreateEmbedded()

Global $thisfile="C:\batch\borg\TestCreeper.au3"
Global $logg="C:\$data\logs\TestCreeper-log.txt";
Global $timestamp=@YEAR&"."&@MON&"."&@MDAY&"."&@HOUR&"."&@MIN&"."&@SEC&"."&@MSEC


Global $f_w=800
Global $f_h=400

Global $hgui=GUICreate("Embedded Web control Test", $f_w, $f_h, _
        (@DesktopWidth - $f_w) / 2, (@DesktopHeight - $f_h) / 2, _
        $WS_POPUP)
GUICtrlCreateObj($oIE, -2, -2, $f_w+30, $f_h+8)

GUISetState() ;Show GUI

_IENavigate($oIE, "about:blank")
Global $st='body {  background-color:black;margin: 0; padding: 0; } '

Global $tx='Mary had a little lamb, little lamb, little lamb, little lamb, whose fleece was white as snow'


;THIS DOESNT WORK, SPECIFYING EACH INDIVIDUALLY
Global $br=BorderRadiusTxt(8)
;MsgBox(0,$thisfile,$br)

;NONE OF THE FOLLOWING WORK
$br='border-radius:8px;'
$br='-ms-border-radius:8px;'
$br='-webkit-border-radius:8px;'
$br='-moz-border-radius:8px;'

$br='border-radius:8px 8px 8px 8px;'
$br='-ms-border-radius:8px 8px 8px 8px;'
$br='-webkit-border-radius:8px 8px 8px 8px;'
$br='-moz-border-radius:8px 8px 8px 8px;'

;WORKS IN IE, BUT NOT IN EMBEDDED     <<<<<=== HERE
$br='border-radius:8px 8px 8px 8px;'

Global $t='';
$t&='<div style="position:absolute;'&$br&'border:1px solid green;background-color:black;padding:12px;color:#ccc;font-family:Tahoma;height:10px;top:10px;left:10px;">'

$t&=$tx
$t&='</div>'

Global $body_tags='border="0" marginheight="0" topmargin="0" vspace="0" marginwidth="0" leftmargin="0" hspace="0" '

Global $html='<HTML><HEAD><STYLE type="text/css">'&$st&'</STYLE></HEAD><BODY '&$body_tags&'>'&$t&'</BODY></HTML>'
;MsgBox(0,$thisfile,$html)
;ClipPut($html)

Global $r=_IEPropertySet($oIE,'innerhtml',$html)

; Waiting for user to close the window
While 1
    Local $msg = GUIGetMsg()
    Select
        Case $msg = $GUI_EVENT_CLOSE
            ExitLoop
    EndSelect
WEnd

GUIDelete()









Func BorderRadiusTxt($i)
  Return 'border-top-left-radius:'&$i&'px;' & _
  'border-top-right-radius:'&$i&'px;' & _
  'border-bottom-left-radius:'&$i&'px;' & _
  'border-bottom-right-radius:'&$i&'px'
EndFunc

;;;;;;functions
Func ts()
  Return @YEAR&"."&@MON&"."&@MDAY&"."&@HOUR&"."&@MIN&"."&@SEC&"."&@MSEC
EndFunc
Func logline($line)
  Local $fh1=FileOpen($logg,1);
  If $fh1<>-1 Then
    FileWriteLine($fh1,$line)
    FileClose($fh1)
  EndIf
EndFunc
Link to comment
Share on other sites

  • 2 years later...

I have IE 10 installed, so I assume the embedded is using the same.

If I make a test html doc that has a DIV with inline style of "border-radius:8px 8px 8px 8px;" this radius works if I browse the file with normal IE 10 --- but if I am embedding IE in a form and using _IEPropertySet($oIE, 'innerhtml', $html) with the exact same html that is in the file, the border-radius does not work.

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <IE.au3>

_IEErrorHandlerRegister()
Local $oIE = _IECreateEmbedded()

Global $thisfile="C:\batch\borg\TestCreeper.au3"
Global $logg="C:\$data\logs\TestCreeper-log.txt";
Global $timestamp=@YEAR&"."&@MON&"."&@MDAY&"."&@HOUR&"."&@MIN&"."&@SEC&"."&@MSEC


Global $f_w=800
Global $f_h=400

Global $hgui=GUICreate("Embedded Web control Test", $f_w, $f_h, _
        (@DesktopWidth - $f_w) / 2, (@DesktopHeight - $f_h) / 2, _
        $WS_POPUP)
GUICtrlCreateObj($oIE, -2, -2, $f_w+30, $f_h+8)

GUISetState() ;Show GUI

_IENavigate($oIE, "about:blank")
Global $st='body {  background-color:black;margin: 0; padding: 0; } '

Global $tx='Mary had a little lamb, little lamb, little lamb, little lamb, whose fleece was white as snow'


;THIS DOESNT WORK, SPECIFYING EACH INDIVIDUALLY
Global $br=BorderRadiusTxt(8)
;MsgBox(0,$thisfile,$br)

;NONE OF THE FOLLOWING WORK
$br='border-radius:8px;'
$br='-ms-border-radius:8px;'
$br='-webkit-border-radius:8px;'
$br='-moz-border-radius:8px;'

$br='border-radius:8px 8px 8px 8px;'
$br='-ms-border-radius:8px 8px 8px 8px;'
$br='-webkit-border-radius:8px 8px 8px 8px;'
$br='-moz-border-radius:8px 8px 8px 8px;'

;WORKS IN IE, BUT NOT IN EMBEDDED     <<<<<=== HERE
$br='border-radius:8px 8px 8px 8px;'

Global $t='';
$t&='<div style="position:absolute;'&$br&'border:1px solid green;background-color:black;padding:12px;color:#ccc;font-family:Tahoma;height:10px;top:10px;left:10px;">'

$t&=$tx
$t&='</div>'

Global $body_tags='border="0" marginheight="0" topmargin="0" vspace="0" marginwidth="0" leftmargin="0" hspace="0" '

Global $html='<HTML><HEAD><STYLE type="text/css">'&$st&'</STYLE></HEAD><BODY '&$body_tags&'>'&$t&'</BODY></HTML>'
;MsgBox(0,$thisfile,$html)
;ClipPut($html)

Global $r=_IEPropertySet($oIE,'innerhtml',$html)

; Waiting for user to close the window
While 1
    Local $msg = GUIGetMsg()
    Select
        Case $msg = $GUI_EVENT_CLOSE
            ExitLoop
    EndSelect
WEnd

GUIDelete()









Func BorderRadiusTxt($i)
  Return 'border-top-left-radius:'&$i&'px;' & _
  'border-top-right-radius:'&$i&'px;' & _
  'border-bottom-left-radius:'&$i&'px;' & _
  'border-bottom-right-radius:'&$i&'px'
EndFunc

;;;;;;functions
Func ts()
  Return @YEAR&"."&@MON&"."&@MDAY&"."&@HOUR&"."&@MIN&"."&@SEC&"."&@MSEC
EndFunc
Func logline($line)
  Local $fh1=FileOpen($logg,1);
  If $fh1<>-1 Then
    FileWriteLine($fh1,$line)
    FileClose($fh1)
  EndIf
EndFunc

Did u solve the problem? I'm facing the same issue...

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

×
×
  • Create New...