[免费开源]cs端集成【语法高亮框】ICSharpCode.TextEditor(虽然它自称代码编辑器)，支持编辑，支持VB、SQL、JSON、XML等17种代码高亮，可自定义语法颜色和护眼绿背景色 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

(快速浏览杰哥分享过的所有经验汇总，点击跳转）

1简介

1.1功能说明

ICSharpCode.TextEditor原生是个代码编辑器，但是非常雏形，还需要做大量的xml编写工作。那我就没改动了，只是集成进来做代码高亮，代替之前Highlight.js只能高亮不能编辑的缺陷。

与狐表最新版编辑器对比，不支持代码折叠、代码重排、自动语法提示、自动列名提示等等。没错，就是狐表最好用的功能，它都没有！（但是如果你有能力，你可以在Github里下载源码进行强力的二次开发，把那些功能自己编码实现，这个工具提供好底层框架），那它有啥用？

还是有点用的，它能集成进狐表窗体，能编译发布后使用，能高亮查看与编辑vb、sql、json、xml、Html、Js、Css等，当做是个轻量级的代码编辑框。因为有的人，sql和json配置文件都是编译发布后，外置在Txt或者内置TextBox里修改（尤其是折腾视图的用户），看黑白不是很爽，想优化下的。

主要功能如下：

1. 代码高亮

2. 代码高亮规则自定义

3. 默认支持17种 ASP/XHTML、BAT、Boo、Coco、CSS、C++.NET、C#、HTML、Java、JavaScript、JSON、Lua、Patch、PHP、SQL、TeX、VBNET、XML语法规则

4. 代码编辑器背景色可以自定义

5. 可以嵌入狐表窗体里使用

6. 支持常见的快速复制整行、缩进整行、换行缩进、括号高亮（这点就比TextBox强多啦，编辑器怎么没一些快捷键呢？）

7. 字体设置

8. 自动双击选中词语

此主题相关图片如下：1.png

此主题相关图片如下：12.png

此主题相关图片如下：2.png

此主题相关图片如下：3.png

1.2Github地址

github地址：https://github.com/netsparker/ICSharpCode.TextEditor ，这个人在原生基础上，修复了滚动条不隐藏的问题。

2安装

2.1 狐表添加外部引用

dll下载地址（在文章结尾有）

此主题相关图片如下：2.png

2.1 放好自定义亮语法文件

刚才的压缩包解压后，还有一个文件夹，按照这样路径存放

此主题相关图片如下：5.png

2.2添加全局代码

此主题相关图片如下：6.png

Public Sub IC_TextChanged(ByVal sender As ICSharpCode.TextEditor.TextEditorControl, ByVal e As System.EventArgs)

'把对象传递到自定义内部函数维护，这样改功能，就不需要重启项目

Functions.Execute("Handle_IC_TextChanged", sender)

End Sub

2.3添加自定义内部函数

函数名：Handle_IC_TextChanged

'当代码编辑器TextChanged后触发，可以通过Name来判断是哪个代码编辑器的事件

Dim e As ICSharpCode.TextEditor.TextEditorControl = Args(0)

'MessageBox.Show(e.Name & "监听到变化：" & e.Text )

3使用说明

3.1窗口初始化

添加一个Panel面板，待会我们用它做容器，把代码编辑器填充进去

此主题相关图片如下：7.png

窗口的AfterLoad事件：

Dim ct As New ICSharpCode.TextEditor.TextEditorControl

ct.Dock = System.Windows.Forms.DockStyle.Fill '填充整个Panel

ct.Name = "TextEditor" '控件名称

ct.Font = New Font("宋体", 10) '字体设置

ct.Encoding = System.Text.Encoding.Default '使用系统默认编码方式

AddHandler ct.TextChanged , AddressOf IC_TextChanged '添加TextChanged变化的事件监听

ct.ShowEOLMarkers = False '显示换行光标,推荐false

ct.ShowHRuler = True '显示上标尺,推荐true

ct.ShowInvalidLines = False '显示无用空行的标志,推荐false

ct.ShowMatchingBracket = True '显示匹配括号

ct.ShowSpaces = False '显示空格符

ct.ShowTabs = True '显示缩进符

ct.ShowVRuler = False '显示垂直虚拟尺子

ct.ShowHRuler = False '显示水平虚拟尺子

ct.AllowCaretBeyondEOL = False '是否允许直接在空白处开始编辑

ct.ConvertTabsToSpaces = True '用空格符替换tab效果

ct.SetHighlighting("VBNET") '设置当前高亮语法规则

'有这些规则：ASP/XHTML,BAT,Boo,Coco,CSS,C++.NET,C#,HTML,Java,JavaScript,JSON,Patch,PHP,SQL,TeX,VBNET,XML

Dim pan As WinForm.Panel = e.Form.Controls("Panel1")

pan.BaseControl.Controls.Add(ct)

窗口BeforeClose事件：

Dim ct As ICSharpCode.TextEditor.TextEditorControl = e.Form.Controls("Panel1").BaseControl.controls("TextEditor")

ct.Dispose '释放内存

3.2写入代码

Dim ct As ICSharpCode.TextEditor.TextEditorControl = e.Form.Controls("Panel1").BaseControl.controls("TextEditor")

Dim Code As String

Code = "Dim Val1 As Integer = 1" & vbcrlf

Code = Code & "Dim Val2 As Integer = 2" & vbcrlf

Code = Code & "Dim Sum As Integer = Val1 + Val2" & vbcrlf

Code = Code & "Return Sum"

ct.Text = Code

ct.Refresh '刷新一下,有时候会渲染延迟

此主题相关图片如下：8.png

3.3读取代码

Dim ct As ICSharpCode.TextEditor.TextEditorControl = e.Form.Controls("Panel1").BaseControl.controls("TextEditor")

MessageBox.Show(ct.Text)

此主题相关图片如下：9.png

3.4应用自定义高亮语法

高亮语法文件（用VBNET做案例）：程序根目录\Attachments\Syntax\VBNET-Mode.xshd

此主题相关图片如下：10.png

此主题相关图片如下：11.png

在窗口放个combobox

此主题相关图片如下：12.png

应用语法的按钮代码：

Dim synDir As String = ProjectPath & "Attachments\Syntax"

Dim ct As ICSharpCode.TextEditor.TextEditorControl = e.Form.Controls("Panel1").BaseControl.controls("TextEditor")

Dim cb1 As WinForm.ComboBox = e.Form.Controls("ComboBox_语法颜色")

If cb1.Text <> "" Then

If FileSys.DirectoryExists(synDir) Then

Dim fsmProvider = New ICSharpCode.TextEditor.Document.FileSyntaxModeProvider(synDir)

ICSharpCode.TextEditor.Document.HighlightingManager.Manager.AddSyntaxModeFileProvider(fsmProvider)

ct.SetHighlighting(cb1.Text)

Else

MessageBox.Show(synDir & "不存在")

End If

Else

MessageBox.Show("请先选择语法")

End If

这样你每次改了语法文件，直接点这个应用按钮，就立刻生效了

3.5通过Leave获取代码结果

由于我们嵌入在Panel面板，所以可以监听Leave事件，当鼠标点击其他地方后，就立刻获取内容

此主题相关图片如下：13.png

Leave事件：

Dim ct As ICSharpCode.TextEditor.TextEditorControl = e.Form.Controls("Panel1").BaseControl.controls("TextEditor")

MessageBox.Show(ct.Text)

3.6通过TextChanged监听代码变化

在安装代码里，已经把Textchanged事件绑定到全局事件IC_TextChanged里，并且把变化对象也传递到内部函数Handle_IC_TextChanged，所以我们只需要在内部函数维护触发的事情即可。

如果有多个代码编辑器，可以设置不同的Name，然后在内部函数里判断，再做相应处理

此主题相关图片如下：14.png

此主题相关图片如下：15.png

4其他常见的代码高亮效果

4.1 SQL高亮

此主题相关图片如下：16.png

4.2 Json高亮

此主题相关图片如下：17.png

4.3 XML高亮

此主题相关图片如下：18.png

4.4 Html高亮

此主题相关图片如下：19.png

4.5 JavaScript高亮

此主题相关图片如下：20.png

4.6 Css高亮

此主题相关图片如下：21.png

4.7 Bat高亮

此主题相关图片如下：22.png

5完整案例下载

需要Foxtable≥20210529版本

以下内容只有回复后才可以浏览

=====================================================================

杰哥免费分享的web系统

[杰哥的免费分享]A1迷你库存管理系统，网页版的纯库存管理，实现简单的多人协助出入库，库存统计，权限管理

[杰哥的免费分享]A2迷你产品报价系统，网页版的带图Excel报价单快速生成工具，外贸企业特别常用

[杰哥的免费分享]OA行政管理系统，网页版的OA审批工作流，开放式流程，包含固定资产管理、文具申领库存、报销申请、用印盖章申请、请假申请等常见行政模块

[杰哥的免费分享]造价项目资料和提成管理系统，应用于造价行业，把过程资料归档，设置每个项目的成员提成，一键统计绩效

[杰哥的免费分享]迷你知识库系统，KindEditor富文本框的实战效果，绿色免安装、免管理员权限、免http服务、多人协同编辑，特别适合【网络管理严格的政府国企】

===============================================================

顺便总结以前分享过的帖子，方便大家学习

【迈宝伦工作室】承接各种中小企业或个人的Foxtable项目，单机版exe3000元以下，多人版exe3000元起，web多人版10000元起步

联系QQ：2385350359

经验分享：

[免费开源]cs端集成代码高亮框ICSharpCode.TextEditor(虽然它自称代码编辑器)，支持编辑，支持VB、SQL、JSON、XML等18种语法高亮，可自定义语法颜色和护眼绿背景色

[免费分享]给狐表的递归教程加上死循环判断，防止死递归导致内存溢出，软件退出。建议官方整合到帮助文档里，类似于增强版例子

[服务器安全汇总] 杰哥在云服务器8年的狐表实战的网络安全经验总结。让你看看遭遇比特币勒索的血泪教训。没有信息安全，再强大的功能都是白搭！

[免费开源]狐表集成Redis教程，三行代码搞定！使用CsRedis高分Git库，redis官方推荐的第三方库，简单易用！顺便分享Redis服务器安装和科普【缓存穿透、缓存击穿、缓存雪崩】

[免费开源]教你用狐表做爬虫获取网页元素。狐表HttpClient+第三方xPath分析工具HtmlAgilityPack。用主流的思路爬取网页，获取表格数据，配合狐表的定时器，快速多掌握一门工作业务技术

[分享]狐表帮助文档中【正确】的中英文颜色对照表。官方文档不够准确，导致调样式经常有色差

[总结分享]异步里里DataTable能用Find和不能用SqlFind，1小心被坑，2不要滥用异步！并附上实战项目里，BS前后端分离下的接口请求平均耗时统计

[免费分享]正则表达式的使用，含匹配验证、提取过滤，常见正则表达式，复制即可用。过滤中文、大小写英文、数字、标点符号、换行符...

[免费开源]狐表cs集成代码高亮Highlight.js，代码着色，毫秒级响应。你还在用黑白的文本框阅读后端web代码吗？来试试这个

[免费开源]狐表集成MQTT解决方案，MQTT是目前大热物联网领域最广泛使用的软硬件通讯协议。如果连MQTT都没听过，别说自己是做物联网项目的，会被人笑的....

[免费开源]狐表bs集成websocket方法，dll来源于github 3.5k高分数的C# Websocket库稳定性和兼容性非常好。相当于web bs领域的OpenQQ功能

[找图标的进来看一眼,包你开眼界！]一个国外黑马级别的图标网站，精美程度真秒杀国内那些fontawesome，关键是支持搜索！找图标的真正痛点：只能用肉眼遍历，上万个图，老子看到何年鸟月啊！

[免费分享]把组合统计结果的fxDataSource转json输出给前端，解决BS开发模式下此强大的多表联查工具只能用在C/S领域table组件的局限性

[免费开源]狐表代码精灵管理器,自己改造狐表的官方代码编辑器，增加提示，自定义事件、方法、对象，非常简单，只需要2步！不用依赖任何第三方工具，永久跟着官方升级

免费开源的wangEditor富文本框解决方案,粘贴自动上传图片（截图上传神器啊！）,可嵌入视频，vue和jquery的BS框架都能用，不能用在cs哦！

[免费分享]sqlBulkCopy批量插入大量数据总结分享（批量导入、快速导入）

[免费分享]从周老师的书里挖个Json部分的总结分享给大家。狐表官方没有细说这一块，在前后端分离开发亟需扎实json利用

[免费开源]基于vue框架，用d2admin+elementui做的PC前端FoxWeb，uniapp做移动端，狐表做后端漂亮美观狐表变美终极方案前后端分离(20201114追加贸易订单管理案例体验)

[免费分享]简单无脑3步实现！狐表做服务器端，开机自动启动的解决方案。解决云服务器重启后不会自动启动狐表的问题[亲测可用]

[免费分享]狐表结合阿里云Oss对象存储案例小结，引用官方SDK dll，亲测能用

[免费分享]狐表CS端集成Echarts总结，亲测能用（顺便基础扫盲）

[此贴子已经被作者于2024/6/5 18:04:48编辑过]

主题：[免费开源]cs端集成【语法高亮框】ICSharpCode.TextEditor(虽然它自称代码编辑器)，支持编辑，支持VB、SQL、JSON、XML等17种代码高亮，可自定义语法颜色和护眼绿背景色

(快速浏览杰哥分享过的所有经验汇总，点击跳转）