导航:
论坛 -> DELPHI技术
斑竹:liumazi,sephil
作者:
2020/11/20 11:32:27
标题:
10.4.1 导致TRegExpr异常?
浏览:1283
加入我的收藏
楼主:
regex := TRegExpr.Create; try regex.ModifierI := True;; data := 'aa vErsion 6 ABNDSFDS'; regex.Expression := 'version (6)'; if regex.Exec(data) then begin Result := Trim(regex.Match[1]); end; 代码在10.3写得好好的, 升级到10.4.1后, 不起作用. 大小写怎么忽略不了.. 测试代码如上..Result返回空.. 求指教哪错了.
----------------------------------------------
delphi界写python最强, python界写delphi最强. 写自己的代码, 让别人去运行.
作者:
2020/11/20 17:08:57
1楼:
TRegExpr
----------------------------------------------
delphi界写python最强, python界写delphi最强. 写自己的代码, 让别人去运行.
作者:
2020/11/20 20:52:57
2楼:
认真考虑一下正则的写法,正则的字符串写的有一点问题就会出现麻烦
----------------------------------------------
-
作者:
2020/11/21 7:55:00
3楼:
@blueflag vErsion 6 是可以匹配的, 换成 version 6 就不行了.. 调整ModifierI 也一样不行.
----------------------------------------------
delphi界写python最强, python界写delphi最强. 写自己的代码, 让别人去运行.
作者:
2020/11/23 9:45:35
4楼:
procedure TForm1.btn1Click(Sender: TObject); var regex :TRegExpr; begin mmo1.Lines.Clear; //默认是区分大小写的. 现在要调整成不区分大小写. regex := TRegExpr.Create; try regex.ModifierI := True; //大小写? regex.Expression := 'teststr'; if regex.Exec('Teststr') then begin mmo1.Lines.Add(Trim(regex.Match[0])); end; finally FreeAndNil(regex); end; regex := TRegExpr.Create; try regex.ModifierI :=False; //大小写? regex.Expression := 'teststr'; if regex.Exec('Teststr') then begin mmo1.Lines.Add(Trim(regex.Match[0])); end; finally FreeAndNil(regex); end; end; 求救啊, 完全不起作用... 怎么实现不区分大小写?
----------------------------------------------
delphi界写python最强, python界写delphi最强. 写自己的代码, 让别人去运行.
作者:
2020/11/25 11:11:25
5楼:
用自带不就好了? uses System.RegularExpressions; procedure TForm1.Button1Click(Sender: TObject); var LRegEx: TRegEx; LPatten: string; LString: string; begin mmo1.Lines.Clear; LPatten := 'teststr'; LString := 'Teststr'; LRegEx := TRegEx.Create(LPatten, [roIgnoreCase]); if LRegEx.Match(LString).Success then begin mmo1.Lines.Add(LRegEx.Match(LString).Value); end; end;
----------------------------------------------
delphi 是兴趣,和工作无关,即使它倒闭。又不靠它 delphi 吃饭,怕甚?
作者:
2020/11/25 14:24:23
6楼:
@sail2000 可是我项目已经集成了RegExpr, 难道要一个一个改成RegularExpressions??
----------------------------------------------
delphi界写python最强, python界写delphi最强. 写自己的代码, 让别人去运行.
作者:
2020/11/25 15:04:53
0楼:
那就看你的选择了,不是我能考虑的。
----------------------------------------------
delphi 是兴趣,和工作无关,即使它倒闭。又不靠它 delphi 吃饭,怕甚?
作者:
biznow (biznow)
★☆☆☆☆
-
盒子活跃会员
2020/11/25 16:09:56
7楼:
请升级当前版本为链接中的版本,我测试了10.4.1,是可以正常返回的 https://github.com/andgineer/TRegExpr
----------------------------------------------
-
作者:
2020/11/25 16:17:33
8楼:
@biznow
此帖子包含附件: 大小: 86.1K
----------------------------------------------
delphi界写python最强, python界写delphi最强. 写自己的代码, 让别人去运行.
作者:
2020/11/25 16:27:35
9楼:
无法测试.
----------------------------------------------
delphi界写python最强, python界写delphi最强. 写自己的代码, 让别人去运行.
作者:
biznow (biznow)
★☆☆☆☆
-
盒子活跃会员
2020/11/25 19:00:22
10楼:
注释掉~~
此帖子包含附件: 大小: 15.9K
----------------------------------------------
-
作者:
2020/11/26 8:31:48
11楼:
正则看得头晕,有时还不如自己写函数
----------------------------------------------
-
作者:
2020/11/26 9:08:36
12楼:
@biznow 谢谢, 成功了, 感谢.. regex.ModifierI 实测已经可用了.
----------------------------------------------
delphi界写python最强, python界写delphi最强. 写自己的代码, 让别人去运行.