【Mark】SourceInsight 删除汉字时半个汉字 乱码问题 的补丁

转载 2015年11月18日 09:30:24


*===========================  SuperBackspace.em ============================
* SuperBackspace Version 0.1beta
*
* 代替SourceInsight原有的Backspace功能
* 增加了对双字节汉字的支持,在删除汉字的时候也能同时删除汉字的高字节而缓解半个汉字问题
* 能够对光标在汉字中间的情况进行自动修正
*
* 安装:
* ① 复制入SourceInsight安装目录;
* ② Project→Open Project,打开Base项目;
* ③ 将复制过去的SuperBackspace.em添加入Base项目;
* ④ 重启SourceInsight;
* ⑤ Options→Key Assignments,将Marco: SuperBackspace绑定到BackSpace键;
* ⑥ Enjoy!!

*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*/
macro SuperBackspace()
{
hwnd = GetCurrentWnd();
hbuf = GetCurrentBuf();

if (hbuf == 0)
stop; // empty buffer

// get current cursor postion
ipos = GetWndSelIchFirst(hwnd);

// get current line number
ln = GetBufLnCur(hbuf);

if ((GetBufSelText(hbuf) != "") || (GetWndSelLnFirst(hwnd) != GetWndSelLnLast(hwnd))) {
// sth. was selected, del selection
SetBufSelText(hbuf, " "); // stupid & buggy sourceinsight :(
// del the " "
SuperBackspace(1);
stop;
}

// copy current line
text = GetBufLine(hbuf, ln);

// get string length
len = strlen(text);

// if the cursor is at the start of line, combine with prev line
if (ipos == 0 || len == 0) {
if (ln <= 0)
stop; // top of file
ln = ln - 1; // do not use "ln--" for compatibility with older versions
prevline = GetBufLine(hbuf, ln);
prevlen = strlen(prevline);
// combine two lines
text = cat(prevline, text);
// del two lines
DelBufLine(hbuf, ln);
DelBufLine(hbuf, ln);
// insert the combined one
InsBufLine(hbuf, ln, text);
// set the cursor position
SetBufIns(hbuf, ln, prevlen);
stop;
}

num = 1; // del one char
if (ipos >= 1) {
// process Chinese character
i = ipos;
count = 0;
while (AsciiFromChar(text[i - 1]) >= 160) {
i = i - 1;
count = count + 1;
if (i == 0)
break;
}
if (count > 0) {
// I think it might be a two-byte character
num = 2;
// This idiot does not support mod and bitwise operators
if ((count / 2 * 2 != count) && (ipos < len))
ipos = ipos + 1; // adjust cursor position
}
}

// keeping safe
if (ipos - num < 0)
num = ipos;

// del char(s)
text = cat(strmid(text, 0, ipos - num), strmid(text, ipos, len));
DelBufLine(hbuf, ln);
InsBufLine(hbuf, ln, text);
SetBufIns(hbuf, ln, ipos - num);
stop;
}

*============================ SuperBackspace.em ============================ 



注意:按此方法配置sourceinsight成功后,会有三个小BUG(目前只发现这三个)

         1、Delete删除时,仍然是一次只能删除半个汉字,仍然会出现乱码;

         2、左右移动光标时,光标仍然会出现在汉字的中间;

         3、当输入法切换到输入汉字模式时,通过shift+符号键,输入符号时,乱码!

 


source insight的中文删除解决办法superbackspace

ource insight 3.50,英文版。相信一定有人用的相同的设置。 (1)设置字体大小;设置Tab为4个空格。 长时间看程序谁也受不了,所以设置大号字体是必须的。 在Option->Do...
  • woohello
  • woohello
  • 2012年02月23日 21:58
  • 9451

source insight如何删除没用的project

我正在中文路径下加载了一个工程,结果一点击打开,source insight程序就会出现错误提示,要求关闭。我想可能是不支持中文的吧,就想把这个Project删除了,结果删不了。后来,我就把sourc...
  • sinovoice
  • sinovoice
  • 2013年09月11日 17:08
  • 6165

source insight打开工程挂掉问题和彻底删除source insigh的解决办法

一、source insight打开工程挂掉问题一般是因为工程路径存在中文,把路径修改成没有中文就行了。 二、但是那些以前一打开就使source insigh挂掉的工程还是存在的, 1...
  • skylinethj
  • skylinethj
  • 2012年12月21日 10:49
  • 9004

搞定SourceInsight的半个汉字的问题

搞定SourceInsight的半个汉字的问题 “SourceInsight是一个面向项目开发的程序编辑器和代码浏览器,它拥有内置的对C/C++, C#和Java等程序的分析。SourceIns...
  • nyist327
  • nyist327
  • 2015年01月05日 10:59
  • 3281

解决SourceInsight的半个汉字的问题

通常安装完的SourceInsight一次只能删除半个汉字的问题 确实情况下,Source Insight删除汉字时是半个半个删除的,删除一半的汉字显示为乱码,在写注释时非常讨厌,最后在网上找到...
  • dearwind153
  • dearwind153
  • 2014年06月16日 17:10
  • 2068

source insight删除已加载的project工程项目报错的解决办法

source insight删除已加载的project工程项目报错解决办法
  • yixilee
  • yixilee
  • 2010年09月01日 15:04
  • 5191

source insight打开项目时报错

转自:http://zhidao.baidu.com/link?url=jq4jGcxaTVwxJVAx6cWlcPTg6esTFl_EPHX4OacvA0Njwba7yELpdLtTzFPdfRMK...
  • yapingmcu
  • yapingmcu
  • 2015年04月13日 19:57
  • 9084

解决Delphi截取字符串时遇到半个汉字

演示程序中主要是用了 IsDBCSLeadByte 这个 API 来判断某字节是否在双字节字符集(例如汉字)的前导字节集中(GB 2312-80 汉字编码中的第一个字节范围 0xA1-0xFe) pr...
  • shazhuyubaichi
  • shazhuyubaichi
  • 2010年08月10日 11:53
  • 3047

Delphi中如何准确截取汉字

    在Delphi中,用Length来取字符长度时,如果有汉字,那它会将汉字当成一个字符来计算,而Copy把汉字又当成两个来处理,关键的是Copy一个字符后,我如何知道是否取的是汉字呢?是否把一个...
  • belllab
  • belllab
  • 2007年04月06日 12:14
  • 1492

Source Insight 3.5 工程打不开(打开时报错)问题的解决。

这是第二次使用Source Insight3.5,之所以说是第二次,是因为之前有几天不愉快的使用经历——关闭后的项目打不开,每次都是报错后退出。以为是安装或版本的问题。为了阅读代码方便,隔了近两个月再...
  • mxslgyb
  • mxslgyb
  • 2010年11月10日 21:52
  • 7028
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:【Mark】SourceInsight 删除汉字时半个汉字 乱码问题 的补丁
举报原因:
原因补充:

(最多只允许输入30个字)