您的位置：首页 > 编程语言

为论坛和Blog添加代码高亮显示的功能。

2007-10-24 09:14 936 查看

在cnblogs和许多其他论坛、Blog上都有插入程序代码高亮显示的功能。现参考cnblogs的为例，以discuz!NT 2.0 rc2为例，说明如何增加插入代码高亮功能。

cnblogs的代码高亮功能是通过一个共享软件实现的，可以到以下网址下载使用 http://www.actiprosoftware.com/Download/Freeware.aspx
此软件的Api很简单，就是一个Asp.net的控件。可以在网页上输出高亮显示的代码。但我们不想让高亮代码在网页上输出，而是插入到文章中。可以对discuz自带的Editor进行改造，以达到响应的功能。

首先将 ActiproSoftware.CodeHighlighter.Net20.dll、ActiproSoftware.Shared.Net20.dll、CodeHighlighterTest.dll Copy到discuz的bin目录。然后在discuz的页面文件价（aspx/1)下添加InsertCode.aspx文件，内容如下

<%@ Page Language="C#" %>

<%@ Import Namespace="ActiproSoftware.CodeHighlighter" %>

<%@ Import Namespace="System.Reflection" %>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

protected string ReturnCode;

protected override void OnLoad(EventArgs e)

...{

if (!IsPostBack)

...{

//从配置文件中获取支持的语言列表

CodeHighlighterConfiguration config = (CodeHighlighterConfiguration)ConfigurationManager.GetSection("codeHighlighter");

string[] keys = new string[config.LanguageConfigs.Keys.Count];

config.LanguageConfigs.Keys.CopyTo(keys, 0);

Array.Sort(keys);

foreach (string key in keys)

...{

LanguageDropDownList.Items.Add(key);

}

//将默认语言设置为C#

LanguageDropDownList.SelectedIndex = LanguageDropDownList.Items.IndexOf(LanguageDropDownList.Items.FindByText("C#"));

}

base.OnLoad(e);

}

protected void Insert_Click(object sender, EventArgs e)

...{

//初始化控件

ActiproSoftware.CodeHighlighter.CodeHighlighter ch = new ActiproSoftware.CodeHighlighter.CodeHighlighter();

ch.LanguageKey = LanguageDropDownList.SelectedValue;

ch.Text = Code.Text;

ch.Page = this;

Type t = ch.GetType();

//利用反射获取高亮显示的代码

MethodInfo method = t.GetMethod("a", BindingFlags.NonPublic | BindingFlags.Instance | BindingFlags.Public);

method.Invoke(ch, null);

FieldInfo field = t.GetField("i", BindingFlags.NonPublic | BindingFlags.Instance | BindingFlags.Public);

ReturnCode = (string)field.GetValue(ch);

//将代码放入 pre 标签中以保持格式，并输出到页面显示

ReturnCode = JStringEncode("<pre style='background-color:#eeeeee;font-size:13px;BORDER:1px solid #CCCCCC;PADDING-RIGHT: 5px;PADDING-BOTTOM: 4px;PADDING-left: 4px;PADDING-TOP: 4px;WIDTH: 98%;word-break:break-all'>" + ReturnCode + "</pre>");

ReturnPanel.Visible = true;

}

/**//// <summary>

/// 替换掉字符串中的特殊字符，如把 " 替换成 "

/// </summary>

/// <param name="str"></param>

/// <returns></returns>

public static string JStringEncode( string str )

...{

if( str == null )

...{

return string.Empty;

}

//替换反斜杠

str = str.Replace( @"", @"/" );

//替换回车

str = str.Replace( " ", @" " );

//替换 " 号

str = str.Replace( """, "/"" );

return str;

}

</script>

<title>插入源代码</title>

</head>

<body>

<div>

<tr>

编程语言:</th>

<td>

<asp:DropDownList ID="LanguageDropDownList" runat="server" Width="100px">

</asp:DropDownList></td>

</tr>

<tr>

代码:</th>

<td>

<asp:TextBox ID="Code" runat="server" Height="200px" TextMode="MultiLine" Width="500px"></asp:TextBox></td>

</tr>

<tr>

<td>

</td>

<td>

<asp:Button ID="Insert" runat="server" OnClick="Insert_Click" Text="确定" /> <input

onclick="return window.close()" type="button" value="关闭"></td>

</tr>

</table>

</div>

<asp:Panel ID="ReturnPanel" runat="server" Visible="false">

window.opener.insertText("<% = ReturnCode %>");

window.close();

</script>

</asp:Panel>

</form>

</body>

</html>

然后修改discuz的webconfig，如下所示

1

<?xml version="1.0" encoding="utf-8" ?>
2

<configuration>
3

<configSections>
4

<section name="codeHighlighter" requirePermission="false" type="ActiproSoftware.CodeHighlighter.CodeHighlighterConfigurationSectionHandler, ActiproSoftware.CodeHighlighter.Net20"/>
5

</configSections>
6

<system.web>
8

<compilation
10

defaultLanguage="c#"
11

debug="false"
12

/>
13

<authorization>
15

<allow users="*" /> 
16

</authorization>
17

<trace
19

enabled="false"
20

requestLimit="10"
21

pageOutput="false"
22

traceMode="SortByTime"
23

localOnly="true"
24

/>
25

<!-- 以下为Discuz!NT相关的一些系统设置, 如果有疑问, 请访问 http://nt.discuz.net/config 获得更详细的说明
27

-->
28

<!-- 注意：此节设置错误信息的显示
32

"On" 始终显示自定义(友好的)信息。
34

"Off" 始终显示详细的 ASP.NET 错误信息。
35

"RemoteOnly" 只对不在本地 Web 服务器上运行的
36

-->
37

<customErrors
38

mode="RemoteOnly"
39

/>
40

<!-- 注意：此节设置全球化，Discuz!NT由此支持多语言。
42

-->
43

<globalization
44

requestEncoding="utf-8"
45

responseEncoding="utf-8"
46

fileEncoding="utf-8"
47

/>
48

<!-- 注意：此节设置是否使用ASP.net表单安全验证，Discuz!NT使用自己的验证。
50

-->
51

<pages
52

validateRequest="false"
53

enableEventValidation="false"
54

enableViewStateMac="false"
55

viewStateEncryptionMode ="Never"
56

/>
57

<!-- 注意：此节设置由Discuz!NT接管http请求。不会干涉对非Discuz!NT论坛路径下的请求。
59

-->
60

<httpModules>
61

<add type="Discuz.Forum.HttpModule, Discuz.Forum" name="HttpModule" />
62

</httpModules>
63

<xhtmlConformance mode="Legacy"/>
65

<httpRuntime maxRequestLength="2097151" executionTimeout="3600"/>
67

<webServices>
69

<protocols>
70

<add name="HttpGet" />
71

<add name="HttpPost"/>
72

</protocols>
73

</webServices>
74

</system.web>
77

<codeHighlighter>
79

<cache languageTimeout="3"/>
80

<keywordLinking enabled="true" target="_blank" defaultKeywordCollectionKey="ActiproKeywords">
81

<keywordCollection key="ActiproKeywords">
82

<explicitKeyword tokenKey="IdentifierToken" patternValue="Actipro" url="http://www.actiprosoftware.com" caseSensitive="false"/>
83

<explicitKeyword tokenKey="IdentifierToken" patternValue="CodeHighlighter" url="http://www.codehighlighter.com" caseSensitive="false"/>
84

</keywordCollection>
85

</keywordLinking>
86

<languages>
87

<language key="Assembly" definitionPath="~/Languages/Lexers/ActiproSoftware.Assembly.xml"/>
88

<language key="BatchFile" definitionPath="~/Languages/Lexers/ActiproSoftware.BatchFile.xml"/>
89

<language key="C#" definitionPath="~/Languages/Lexers/ActiproSoftware.CSharp.xml"/>
90

<language key="CSS" definitionPath="~/Languages/Lexers/ActiproSoftware.CSS.xml"/>
91

<language key="HTML" definitionPath="~/Languages/Lexers/ActiproSoftware.HTML.xml"/>
92

<language key="INIFile" definitionPath="~/Languages/Lexers/ActiproSoftware.INIFile.xml"/>
93

<language key="Java" definitionPath="~/Languages/Lexers/ActiproSoftware.Java.xml"/>
94

<language key="JScript" definitionPath="~/Languages/Lexers/ActiproSoftware.JScript.xml"/>
95

<language key="Lua" definitionPath="~/Languages/Lexers/ActiproSoftware.Lua.xml"/>
96

<language key="MSIL" definitionPath="~/Languages/Lexers/ActiproSoftware.MSIL.xml"/>
97

<language key="Pascal" definitionPath="~/Languages/Lexers/ActiproSoftware.Pascal.xml"/>
98

<language key="Perl" definitionPath="~/Languages/Lexers/ActiproSoftware.Perl.xml"/>
99

<language key="PHP" definitionPath="~/Languages/Lexers/ActiproSoftware.PHP.xml"/>
100

<language key="PowerShell" definitionPath="~/Languages/Lexers/ActiproSoftware.PowerShell.xml"/>
101

<language key="Python" definitionPath="~/Languages/Lexers/ActiproSoftware.Python.xml"/>
102

<language key="SQL" definitionPath="~/Languages/Lexers/ActiproSoftware.SQL.xml"/>
103

<language key="VB.NET" definitionPath="~/Languages/Lexers/ActiproSoftware.VBDotNet.xml"/>
104

<language key="VBScript" definitionPath="~/Languages/Lexers/ActiproSoftware.VBScript.xml"/>
105

<language key="XAML" definitionPath="~/Languages/Lexers/ActiproSoftware.XAML.xml"/>
106

<language key="XML" definitionPath="~/Languages/Lexers/ActiproSoftware.XML.xml"/>
107

</languages>
108

<lineNumberMargin foreColor="Teal" paddingCharacter=" " visible="true"/>
109

<outlining enabled="true" imagesPath="~/Images/OutliningIndicators/"/>
110

<spacesInTabs count="4"/>
111

</codeHighlighter>
112

113

</configuration>

Copy高亮组件的 Languages/Lexers、Images/OutliningIndicators 目录到discuz的指定目录

在discuz的编辑器文件 editor/editor.js，在function discuzcode(cmd, arg)函数中if else组里添加处理insertcode的代码

if (cmd == "insertcode")
{
window.open('../InsertCode.aspx', null, 'height=500, width=600, toolbar=no, menubar=no, scrollbars=no, resizable=no,location=no, status=no');
}

修改discuz编辑器文件 editor/cp_editor.htm 在插入图片后变添加插入代码的命令

现在，discuz的blog里就有插入高亮代码的功能了。

内容来自用户分享和网络整理，不保证内容的准确性，如有侵权内容，可联系管理员处理

标签：

相关文章推荐

新的分享

章节导航