新代码, 通过空格分割要高亮的内容, 你把你图片里的顿号改成空格就行了

骑猪看日落 2024-01-21 07:41 79阅读 0赞

procedure TForm1.Button1Click(Sender: TObject);
    
      procedure _HighLightText(AStr: string);
      var
        nPos, nStrLength, nAllLength: Integer;
      begin
        nPos := 0;
        nAllLength := RichEdit2.GetTextLen;
        nStrLength := Length(AStr);
        nPos := RichEdit2.FindText(AStr, nPos, nAllLength, [stMatchCase]); //如果大小写不敏感就用[]
        while nPos > -1 do //如果只想高亮第一个就不用循环
        begin
          RichEdit2.SelStart := nPos;
          RichEdit2.SelLength := nStrLength;
          RichEdit2.SelAttributes.Color := clRed;
          nPos := nPos + nStrLength;
          nPos := RichEdit2.FindText(AStr, nPos, nAllLength, [stMatchCase]);
        end;
      end;
    
    var
      nStr: string;
      i: Integer;
    begin
      RichEdit2.SelectAll;
      RichEdit2.SelAttributes := RichEdit2.DefAttributes;
    
      with TStringList.Create do
      try
        StrictDelimiter := True;
        Delimiter := ' '; //这里规定要高亮的内容用空格分隔
        DelimitedText := RichEdit1.Text;
        for i := 0 to Count - 1 do
        begin
          nStr := Strings[i].Trim;
          if nStr <> '' then
            _HighLightText(nStr);
        end;
      finally
        Free;
      end;
    end;

发表评论取消回复

表情：

评论列表（有 0 条评论，79人围观）

还没有评论，来说两句吧...

相关阅读

相关新代码, 通过空格分割要高亮的内容, 你把你图片里的顿号改成空格就行了

procedure TForm1.Button1Click(Sender: TObject); procedure _HighLightText(

骑猪看日落/ 2024年01月21日 07:41/ 0 赞/ 80 阅读

相关 php怎样把textarea里面的空格和换行的转换成数组

通过一个正则表达式分隔字符串: $arr=preg\_split('/\\s+/', $\_POST\['textarea '\]); (备注:$\_POST\['te

淡淡的烟草味﹌/ 2023年06月15日 11:11/ 0 赞/ 133 阅读

相关如果你的 HTML 里全是 div，那就要小心了

做前端开发的同学都知道，一个网页的基本组成部分是 HTML，JavaScript 和 CSS。开发人员通常更关注 JavaScript 和 CSS ，实践着各种语言规范和设计模

墨蓝/ 2023年01月04日 10:28/ 0 赞/ 182 阅读

相关你不知道的 VSCode 代码高亮原理

> 全文5000字，解读 vscode 背后的代码高亮实现原理，欢迎点赞关注转发。 > Vscode 的代码高亮、代码补齐、错误诊断、跳转定义等语言功能由两种扩展方案协

雨点打透心脏的1/2处/ 2022年10月05日 07:54/ 0 赞/ 319 阅读

相关 java之String根据空格分割内容的正确做法

例如这样的字符串 "我是一个好人啊" 代码 String s3 = "我是一个好人啊";

心已赠人/ 2022年04月12日 09:42/ 0 赞/ 393 阅读

相关【blog】使用highlight.js高亮你的代码

> 我的代码  <link rel="stylesheet" type="text/css" href="/web/lib/high

梦里梦外;/ 2021年09月30日 11:38/ 0 赞/ 387 阅读

相关如何分割“以空格分割的字符串中间还有空格”的数据结构

如何分割“以空格分割的字符串中间还有空格”的数据结构，话不多说，直接上代码。 / 5 1 "zhang san feng" 0.000 "hello w

╰+哭是因爲堅強的太久メ/ 2021年09月08日 23:54/ 0 赞/ 295 阅读

相关代码之间为什么要加空格？

> 据我观察，大多数人写代码喜欢在符号两侧加空格，而且还会嘲讽不加空格的人。这些支持者认为，加空格可以让代码美观，增强代码的可读性。但是我不喜欢加空格，因为这么写对代码含义没有

朴灿烈づ我的快乐病毒、/ 2021年08月10日 17:17/ 0 赞/ 399 阅读

相关代码之间为什么要加空格？

> 据我观察，大多数人写代码喜欢在符号两侧加空格，而且还会嘲讽不加空格的人。这些支持者认为，加空格可以让代码美观，增强代码的可读性。但是我不喜欢加空格，因为这么写对代码含义没有

谁借莪１个温暖的怀抱￠/ 2021年06月22日 15:38/ 0 赞/ 459 阅读

相关 shell 把空格换成回车

linux中直接执行命令输出是带有换行的，但是通过echo输出后换行就消失了，如下： ![Center][] ![Center 1][] 现在需要把空格转换成换行

柔情只为你懂/ 2021年05月12日 11:51/ 0 赞/ 775 阅读