Серый форум — AHK: Send до знака

Re: AHK: Send до знака

2014-01-31T20:00:32Z

Согласен.

Re: AHK: Send до знака

2014-01-31T19:58:42Z

Да, так и есть. И даже если нужно последнее предложение, разница на глаз небудет заметна:

 
Loop 100000
   BigText .= "Серый форум.Разработка скриптов"
MsgBox Текст готов.
RegExMatch(BigText, ".*\.(.*)", Result)
MsgBox % Result1
MsgBox % SubStr(BigText, InStr(BigText, ".",,0)+1)

Но думаю что пригодится это учитывать в программах с большими циклами.

Re: AHK: Send до знака

2014-01-31T19:39:16Z

В реальной ситуации точка будет недалеко от начала текста, и разница не станет принципиальной.

Text = Серый форум Разработка скриптов.
Loop 100000
   BigText .= "Серый форум Разработка скриптов."
MsgBox Текст готов.
RegExMatch(BigText, "(.*?)\.", Result)
MsgBox % Result1
MsgBox % RegExReplace(BigText, "s)(.*?)\..*", "$1")

Re: AHK: Send до знака

2014-01-31T19:21:33Z

И в 3 раза быстрее RegExMatch:


Text = Серый форум.Разработка скриптов.
Start := A_TickCount
Loop 1000000
    RegExMatch(Text, "(.*?)\.", Result)
MsgBox % A_TickCount - Start

Re: AHK: Send до знака

2014-01-31T19:19:38Z

У меня получилось в 6 раз быстрее:

Text = Серый форум.Разработка скриптов.
Start := A_TickCount
Loop 1000000
    SubStr(Text, 1, InStr(Text, ".")-1) 
MsgBox % A_TickCount - Start

Text = Серый форум.Разработка скриптов.
Start := A_TickCount
Loop 1000000
    RegExReplace(Text, "s)(.*?)\..*", "$1")
MsgBox % A_TickCount - Start

Re: AHK: Send до знака

2014-01-31T19:13:11Z

Насчёт скорости — тут экспериментировать нужно, что будет быстрее. Для начинающих, конечно, проще твой вариант, для меня без разницы.

Re: AHK: Send до знака

2014-01-31T19:07:59Z

Справка пишет:

To search for a simple substring inside a larger string, use InStr() because it is faster than RegExMatch().

Ну так эти функции намного проще, в сравнении с RegEx.?

Re: AHK: Send до знака

2014-01-31T18:58:11Z

Не знаю, в твоём варианте используются 2 функции вместо одной.

Re: AHK: Send до знака

2014-01-31T18:37:26Z

Для такого случая мучать RegEx избыточно, только если в целях ознакомления на простой задаче.


Text = Серый форум.Разработка скриптов.
MsgBox % SubStr(Text, 1, InStr(Text, ".")-1)

Re: AHK: Send до знака

2014-01-31T18:21:12Z

Действительно, значок "?" знает свое дело .

Re: AHK: Send до знака

2014-01-31T18:11:12Z

Так тоже не сработает, если

Text = Серый форум.Разработка скриптов.

Re: AHK: Send до знака

2014-01-31T18:07:03Z

Почитав, немного "укоротил" код:

1::
Text = Серый форум.Разработка скриптов
RegExMatch(Text, "(.*)\.", Result)
SendInput, % Result1

Re: AHK: Send до знака

2014-01-31T18:06:41Z

Смотрите, ваш вариант не работает:

Text = Серый форум.Разработка скриптов.
RegExMatch(Text, "(.*[.])", Result)
StringTrimRight, Result1, Result1, 1
MsgBox, % Result1

Правильно:

Text = Серый форум.Разработка скриптов.
RegExMatch(Text, "(.*?)\.", Result)
MsgBox, % Result1
; или
MsgBox, % RegExReplace(Text, "s)(.*?)\..*", "$1")

Re: AHK: Send до знака

2014-01-31T17:45:29Z

Раскусили вы меня, я читал но много не понял.

Re: AHK: Send до знака

2014-01-31T17:42:39Z

sergeiplugatyr пишет:

Читал

Не верю. Например, зачем там квадратные скобки? Они обычно используются для объединения списка символов, когда может использоваться любой из них. А тут в них всего один. Понятно, что схватили первое, что под руку попалось.