UBB添加删除线 For pjblog3
作者:情留メ蚊子 日期:2008-08-01
将
放入皮肤的目录下UBB/Icons下命名为deleteline.gif
演示:
引用内容
打开common/UBBCode_Gecko.js在最下面插入:
打开commonUBBCode_IE.js在最下面插入:
打开common/UBBCode_help.js找到:
在换行插入
打开common/UBBconfig.asp找到:
在后面插入
打开common/ubbcode.asp找到:
换行插入:
放入皮肤的目录下UBB/Icons下命名为deleteline.gif演示:
引用内容[d]演示删除线 演示删除线[/d]
打开common/UBBCode_Gecko.js在最下面插入:
复制内容到剪贴板
程序代码
程序代码//删除线
function UBB_deleteline()
{
if (EditMethod=="normal")
{
var PopText
if (PopText=window.prompt(deleteline_normal,""))
{
AddText("[d]"+PopText+"[/d]")
}
}
if (EditMethod=="expert")
{
AddText("[d][/d]")
}
}
function UBB_deleteline()
{
if (EditMethod=="normal")
{
var PopText
if (PopText=window.prompt(deleteline_normal,""))
{
AddText("[d]"+PopText+"[/d]")
}
}
if (EditMethod=="expert")
{
AddText("[d][/d]")
}
}
打开commonUBBCode_IE.js在最下面插入:
复制内容到剪贴板
程序代码
程序代码//删除线
function UBB_deleteline()
{
var UBBSelectrange=document.selection.createRange()
if (SelectAllow && UBBSelectrange.text!="")
{
UBBSelectrange.text="[d]"+UBBSelectrange.text+"[/d]"
return
}
if (EditMethod=="normal")
{
var PopText
if (PopText=window.prompt(deleteline_normal,""))
{
AddText("[d]"+PopText+"[/d]")
}
}
if (EditMethod=="expert")
{
AddText("[d][/d]")
}
}
function UBB_deleteline()
{
var UBBSelectrange=document.selection.createRange()
if (SelectAllow && UBBSelectrange.text!="")
{
UBBSelectrange.text="[d]"+UBBSelectrange.text+"[/d]"
return
}
if (EditMethod=="normal")
{
var PopText
if (PopText=window.prompt(deleteline_normal,""))
{
AddText("[d]"+PopText+"[/d]")
}
}
if (EditMethod=="expert")
{
AddText("[d][/d]")
}
}
打开common/UBBCode_help.js找到:
复制内容到剪贴板
程序代码
程序代码var underline_normal = "请输入要加下划线的文字。\n使用标签:";
在换行插入
复制内容到剪贴板
程序代码
程序代码var deleteline_normal = "请输入要设置成有删除线的文字。\n使用标标:[d][/d]";
打开common/UBBconfig.asp找到:
复制内容到剪贴板
程序代码
程序代码underline
复制内容到剪贴板
程序代码
程序代码,deleteline
打开common/ubbcode.asp找到:
复制内容到剪贴板
程序代码
程序代码 re.Pattern = "\[u\]([^\r]*?)\[\/u\]"
strContent = re.Replace(strContent, "<u>$1</u>")
strContent = re.Replace(strContent, "<u>$1</u>")
换行插入:
复制内容到剪贴板
程序代码
程序代码 re.Pattern = "\[d\]([^\r]*?)\[\/d\]"
strContent = re.Replace(strContent, "<span style=""text-decoration: line-through;"">$1</span>")
strContent = re.Replace(strContent, "<span style=""text-decoration: line-through;"">$1</span>")
评论: 0 | 引用: 0 | 查看次数: 1430
发表评论
上一篇
下一篇

文章来自:
Tags:
相关日志: