View Issue Details
ID | Project | Category | View Status | Date Submitted | Last Update |
---|---|---|---|---|---|
0009060 | MMW v4 | Framework: Scripts/Extensions | public | 2012-02-01 16:29 | 2012-02-02 09:30 |
Reporter | zvezdan | Assigned To | |||
Priority | high | Severity | minor | Reproducibility | always |
Status | assigned | Resolution | open | ||
Summary | 0009060: ActiveX Web Browser control disapears from the Option sheet | ||||
Description | This is another bug which I am experiencing since MM2. If I create the Option sheet with the Web Browser control, it would be displayed only the first time when that sheet is opened. After you switch to some another sheet and return back to the sheet with the Web control, it would be hidden. Here is the test code: Sub OnStartUp() Call SDB.UI.AddOptionSheet("Test sheet", _ Script.ScriptPath, "InitOptionSheet", "SaveOptionSheet", -1) End Sub Sub InitOptionSheet(oSheet) Dim wbtMasks, sWebTbl Set wbtMasks = SDB.UI.NewActiveX(oSheet, "Shell.Explorer") wbtMasks.Common.SetRect 10, 10, 460, 188 sWebTbl = "<html><head><style type='text/css'>body {margin: 2px} " & _ "table {font: 11px 'tahoma' 'sans-serif'}</style></head>" sWebTbl = sWebTbl & "<body><table cellspacing='2'><thead>" & _ "<tr bgcolor='Silver'><td width='4%'>" & _ "<input type='checkbox' name='chk0' " sWebTbl = sWebTbl & "/></td><td width='4%'>#</td><td>Masks from " sWebTbl = sWebTbl & "</td></tr></thead><tbody>" sWebTbl = sWebTbl & "</tbody></table></body></html>" wbtMasks.SetHTMLDocument sWebTbl End Sub Sub SaveOptionSheet(oSheet) End Sub | ||||
Tags | No tags attached. | ||||
Fixed in build | |||||