文本数组正则问题[已解决]

23070205 · 发表于 2010-8-18 19:46:06

本帖最后由 23070205 于 2010-8-18 20:55 编辑

想做个显示器分辨率的软件
得到了一组分辨率数字到文本了，怎么用正则表达式

640 400 8 70
640 400 16 70
640 400 32 70
640 480 4 frequency set in hardware
640 480 8 60
640 480 8 70
640 480 8 72
640 480 8 75
640 480 16 60
640 480 16 70
640 480 16 72
640 480 16 75
640 480 32 60
640 480 32 70
640 480 32 72
640 480 32 75
720 480 8 60
720 480 16 60
720 480 32 60
720 576 8 60
720 576 16 60
720 576 32 60
800 600 4 frequency set in hardware
800 600 8 56
800 600 8 60
800 600 8 70
800 600 8 72
800 600 8 75
800 600 16 56
800 600 16 60
800 600 16 70
800 600 16 72
800 600 16 75
800 600 32 56
800 600 32 60
800 600 32 70
800 600 32 72
800 600 32 75
1024 768 8 60
1024 768 8 70
1024 768 8 72
1024 768 8 75
1024 768 16 60
1024 768 16 70
1024 768 16 72
1024 768 16 75
1024 768 32 60
1024 768 32 60
1024 768 32 70
1024 768 32 70
1024 768 32 72
1024 768 32 72
1024 768 32 75
1024 768 32 75
1280 720 8 60
1280 720 16 60
1280 720 32 60
1280 768 8 60
1280 768 8 70
1280 768 8 72
1280 768 8 75
1280 768 16 60
1280 768 16 70
1280 768 16 72
1280 768 16 75
1280 768 32 60
1280 768 32 70
1280 768 32 72
1280 768 32 75
1360 768 8 60
1360 768 16 60
1360 768 32 60
1366 768 8 59
1366 768 8 60
1366 768 16 59
1366 768 16 60
1366 768 32 59
1366 768 32 60

我想到的正则是
\d{3,4}\h+\d{3,4}\h+\d{1,2}\h+\d\d
就是还是不行，指教
列出来的这个正则要用到combo中

23070205 · 发表于 2010-8-18 19:59:24

以下为测试用的gui

#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 325, 92, -1,-1)
$Combo1 = GUICtrlCreateCombo("Combo1", 16, 32, 177, 25)
$Button1 = GUICtrlCreateButton("Button1", 224, 24, 65, 41)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
                Case $Button1
                        file()
        EndSwitch
WEnd

Func file()
        Local $Result
        $Text = FileRead(@DesktopDir & '\1.txt') ;将需要匹配的字符串保存在脚本同目录下 Text.txt 文件里
        MsgBox(0, '原字符串', $Text)

        $Reg = StringRegExpReplace($Text, '\d{3,4}\h+\d{3,4}\h+\d{1,2}\h+\d\d', 3)

        For $i = 0 To UBound($Reg) - 1
                $Result &= $Reg[$i] & @CRLF
        Next

        MsgBox(0, '匹配结果', $Result)
        FileWrite(@DesktopDir & '\匹配结果.txt', $Result) ;匹配结果将会存放在脚本同目录下 匹配结果.txt 文件里
EndFunc   ;==>file

afan · 发表于 2010-8-18 20:03:41

想得到什么都不知道…

23070205 · 发表于 2010-8-18 20:05:17

想提取这些数组到combo中

afan · 发表于 2010-8-18 20:12:06

容易理解点的
'(\d+)\h+(\d+)\h+(\d+)\h+([^\r\n]+)'

3mile · 发表于 2010-8-18 20:13:23

是这个意思？

#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 325, 92, -1,-1)
$Combo1 = GUICtrlCreateCombo("", 16, 32, 177, 25)
$Button1 = GUICtrlCreateButton("Button1", 224, 24, 65, 41)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
                Case $Button1
                        file()
        EndSwitch
WEnd

Func file()
        Local $Result
        $Text = FileRead(@DesktopDir & '\1.txt') ;将需要匹配的字符串保存在脚本同目录下 Text.txt 文件里
        MsgBox(0, '原字符串', $Text)

        $Reg = StringRegExp($Text, '\d{3,4}\h+\d{3,4}\h+\d{1,2}\h+\d\d', 3)

        For $i = 0 To UBound($Reg) - 1
                        $r=StringRegExpReplace($Reg[$i],'\h+',' ')                                
            $Result &= $r & '|'
        Next

        MsgBox(0, '匹配结果', $Result)
                GUICtrlSetData($Combo1,$Result)
        ;FileWrite(@DesktopDir & '\匹配结果.txt', $Result) ;匹配结果将会存放在脚本同目录下 匹配结果.txt 文件里
EndFunc   ;==>file

23070205 · 发表于 2010-8-18 20:18:27

找到一个，udf中的，好像也可以用

_FileReadToArray
--------------------------------------------------------------------------------

读取一个指定文件到一个数组.

#Include <File.au3>
_FileReadToArray($sFilePath, ByRef $aArray)

23070205 · 发表于 2010-8-18 20:20:48

6楼老兄谢谢了，就是这个意思，高手

		自动登录	找回密码
密码			加入

[AU3基础] 文本数组正则问题[已解决]

相关帖子

评分

[AU3基础] 文本 数组 正则问题[已解决]

相关帖子

评分

[AU3基础] 文本数组正则问题[已解决]