这里是新程序员。我主要使用Symitar PowerOn进行编程,但是最近在市场上发现了一种以标签格式组织Specfile的方法。我完成了所有编码,现在想在标签上添加我的信用社徽标。同时,也非常希望您能获得能在全球范围内展示的背景图片。不好意思,我很新。任何帮助/选择将不胜感激。
PROCEDURE SHOWUSERMAINMENU
HTMLVIEWOPEN
HTMLVIEWLINE("<!DOCTYPE HTML>")
HTMLVIEWLINE("<html>")
HTMLVIEWLINE("<head>")
HTMLVIEWLINE("<meta http-equiv="+Q+"X-UA-Compatible"+Q+" content="+Q+"IE=9"+Q+" />")
HTMLVIEWLINE("<title>Main Menu</title>")
HTMLVIEWLINE("<script type="+Q+"text/javascript"+Q+" src="+Q+"G:\All\symform\forms\Tab Layout\jquery.js"+Q+"></script>")
HTMLVIEWLINE("<script type="+Q+"text/javascript"+Q+" src="+Q+"G:\All\symform\forms\Tab Layout\jquery-ui.min.js"+Q+"></script>")
HTMLVIEWLINE("<link type="+Q+"text/css"+Q+" href="+Q+"G:\All\symform\forms\Tab Layout\jquery-ui.structure.min.css"+Q+" rel="+Q+"stylesheet"+Q+" />")
HTMLVIEWLINE("<link type="+Q+"text/css"+Q+" href="+Q+"G:\All\symform\forms\Tab Layout\jquery-ui.theme.min.css"+Q+" rel="+Q+"stylesheet"+Q+" />")
HTMLVIEWLINE("<script type='text/javascript'>")
HTMLVIEWLINE("function sbmtRgName(rgName){")
HTMLVIEWLINE(" var h = document.createElement('input');")
HTMLVIEWLINE(" h.type = 'hidden';")
HTMLVIEWLINE(" h.id = 'rgName';")
HTMLVIEWLINE(" h.name = 'rgName';")
HTMLVIEWLINE(" h.value = rgName;")
HTMLVIEWLINE(" document.form1.appendChild(h);")
HTMLVIEWLINE(" document.form1.submit();")
HTMLVIEWLINE("}")
HTMLVIEWLINE("$(document).ready(function(){")
HTMLVIEWLINE(" $('#tabs').tabs();")
HTMLVIEWLINE(" $('#autocomplete').autocomplete({ ")
HTMLVIEWLINE(" source: ")
HTMLVIEWLINE("[")
FOR X=1 TO CAT
DO
FOR Y=1 TO VALUE(RGNAMES(X, 0, 0))
DO
IF RGNAMES(X, Y, 1)<>"" THEN
DO
HTMLVIEWLINE("{"+Q+"value"+Q+":"+Q+RGNAMES(X, Y, 1)+Q+","+Q+"id"+Q+":"+Q+rgnames(X, Y, 0)+Q+"},")
END
END
END
HTMLVIEWLINE("]")
HTMLVIEWLINE("}); ")
HTMLVIEWLINE(" $('#autocomplete').autocomplete({")
HTMLVIEWLINE(" select: function(event, ui) {sbmtRgName(ui.item.id); }")
HTMLVIEWLINE("});")
HTMLVIEWLINE("});") [doc.ready]
HTMLVIEWLINE("</script>")
HTMLVIEWLINE("<style type='text/css'>")
HTMLVIEWLINE("body{")
HTMLVIEWLINE(" font: 10px "+Q+"Tahoma"+Q+", sans-serif;")
HTMLVIEWLINE(" margin: 5px;")
HTMLVIEWLINE("}")
HTMLVIEWLINE(".rgListClass{")
HTMLVIEWLINE(" list-style-type:none;")
HTMLVIEWLINE(" margin:0px;")
HTMLVIEWLINE(" padding:0px;")
HTMLVIEWLINE("}")
HTMLVIEWLINE(".rgListClass li a{")
HTMLVIEWLINE(" text-decoration:none;")
HTMLVIEWLINE(" font-weight:normal;")
HTMLVIEWLINE(" font-size:15px;")
HTMLVIEWLINE("}")
HTMLVIEWLINE(".rgListClass li{")
HTMLVIEWLINE(" padding-bottom:3px;")
HTMLVIEWLINE("}")
HTMLVIEWLINE(".searchClass{")
HTMLVIEWLINE(" z-index: 100;")
HTMLVIEWLINE(" position: absolute;")
HTMLVIEWLINE(" right:2px;")
HTMLVIEWLINE("}")
HTMLVIEWLINE(".menuClass{")
HTMLVIEWLINE(" position:relative;")
HTMLVIEWLINE(" width:100%;")
HTMLVIEWLINE("}")
HTMLVIEWLINE(".menuColumn{")
HTMLVIEWLINE(" float:left;")
HTMLVIEWLINE(" padding-left:5px;")
HTMLVIEWLINE("}")
HTMLVIEWLINE("</style>")
HTMLVIEWLINE("</head>")
HTMLVIEWLINE("<body onLoad="+Q+"javascript:document.getElementById('autocomplete').focus();"+Q+">")
HTMLVIEWLINE("<form name='form1' id='form1' method='post' action='symitar://HTMLView~Action=Post'>")
HTMLVIEWLINE("<div id='tabs'>")
HTMLVIEWLINE("<ul>")
FOR X=1 TO CAT
DO
HTMLVIEWLINE("<li style='font-weight:bold;'><a href='#cat-"+FORMAT("99", X)+"'>")
HTMLVIEWLINE(CATEGORY(X, 0))
HTMLVIEWLINE("</a></li>")
END
HTMLVIEWLINE("</ul>")
HTMLVIEWLINE("<div class='searchClass'>Search:")
HTMLVIEWLINE("<input id='autocomplete' title='Start typing a menu function' /> ")
HTMLVIEWLINE("</div>")
FOR X=1 TO CAT
DO
HTMLVIEWLINE("<div id='cat-"+FORMAT("99", X)+"' class='menuClass'>")
FOR Y=1 TO VALUE(RGNAMES(X, 0, 0))
DO
IF RGNAMES(X, Y, 1)="" THEN
DO
IF Y=1 THEN
HTMLVIEWLINE("<div class='menuColumn'>")
ELSE
DO
HTMLVIEWLINE("</ul>")
HTMLVIEWLINE("</div>")
HTMLVIEWLINE("<div class='menuColumn' style='margin-left:50px;'>")
END
HTMLVIEWLINE("<h2>"+RGNAMES(X, Y, 0)+"</h2>")
HTMLVIEWLINE("<ul class='rgListClass'>")
END
HTMLVIEWLINE("<li>")
IF RGNAMES(X, Y, 1)<>"" THEN
DO
HTMLVIEWLINE("<a href="+Q+"javascript:sbmtRgName('"+RGNAMES(X, Y, 0)+"');"+Q+">")
HTMLVIEWLINE(RGNAMES(X, Y, 1)+"</a>")
END
HTMLVIEWLINE("</li>")
END
HTMLVIEWLINE("</ul>")
HTMLVIEWLINE("</div>")
HTMLVIEWLINE("</div>")
END
HTMLVIEWLINE("<div style='clear:both;height:10px'></div>")
HTMLVIEWLINE("</div>")
HTMLVIEWLINE("</form>")
HTMLVIEWLINE("</body>")
HTMLVIEWLINE("</html>")
HTMLVIEWDISPLAY
SUBNAME=""
TMP=ENTERLINE(0)
WHILE TMP<>"EOD"
DO
IF SEGMENT(TMP, 1, 7)="rgName=" THEN
SUBNAME=SEGMENT(TMP, 8, LENGTH(TMP))
TMP=ENTERLINE(0)
END
IF SUBNAME<>"" THEN
DO
INITSUBROUTINE(SUBERR)
EXECUTE(SUBNAME, SUBERR)
END
END
最佳答案
我对Symitar PowerOn并不熟悉,但是要使您的徽标出现在标签上,如这张图片http://screencast.com/t/iAXFTnIBbA,徽标必须为16x16像素,*。ico格式,对于第二个问题,我对Symitar不够熟悉,知道该怎么做,但是使用谷歌搜索可能会有所帮助:)
资料来源:Favicon dimensions?