AkelPad

Posted: **Sat Jan 09, 2016 5:05 am**

VladSh wrote:YuS
TextReplace не подходит - надо работать с программно полученным текстом.

Да, кстати, почему не подходит? В чем там принципиальное отличие текста?

Posted: **Sat Jan 09, 2016 9:51 am**

yozhic, YuS
Спасибо за помощь и пояснения! Теперь понятно

YuS wrote:Да, кстати, почему не подходит? В чем там принципиальное отличие текста?

В TextReplace отсутствует параметр чтобы передать текст. Т.е. этот метод сам получает данные из окна редактирования AkelPad. Регулярки хороши тем, что они работают с произвольным текстом, который может быть предварительно программно обработан.

Posted: **Fri Jan 22, 2016 11:13 pm**

Подскажите, пожалуйста, как можно в строке "^\t++<" заменить табуляцию на точно такое же количество пробелов?
Предполагается использовать AkelPad.TextReplace().

Posted: **Sat Jan 23, 2016 5:46 am**

Skif_off wrote:как можно в строке "^\t++<" заменить табуляцию на точно такое же количество пробелов?
Предполагается использовать AkelPad.TextReplace().

Требуется замена зависящая от настроек "Параметры-Редактор 1->Размер табуляции" или именно "один-к-одному"? Если второе, то можно заменить так:

Code: Select all

AkelPad.TextReplace(0, "\\t", " ", 0x00280001, true);

правда, начало строки не учитывается и замена будет производиться везде. Если требуется таки учитывать начало строки, то придется вводить функцию подсчета символов...

Posted: **Sat Jan 23, 2016 8:51 am**

YuS
Один символ табуляции на один символ пробела, только в начале строки. Считать - не вариант: строк может быть слишком много.

Если AkelPad.TextFind() и AkelPad.TextReplace
() работают как через GUI, нужно будет попробовать

А в тексте для поиска и замены слэши точно нужно удваивать? У меня так получается какая-то ерунда.

Posted: **Sat Jan 23, 2016 9:12 am**

Skif_off wrote:YuS
Один символ табуляции на один символ пробела, только в начале строки. Считать - не вариант: строк может быть слишком много.

Если AkelPad.TextFind() и AkelPad.TextReplace
() работают как через GUI, нужно будет попробовать

Code: Select all
iFind = AkelPad.TextFind(hWndEdit, "^\t++<", 0x00280001 /*FRF_DOWN|FRF_BEGINNING|FRF_REGEXP*/); if (iFind > 0) AkelPad.TextReplace(hWndEdit, "\t", " ", 0x00480001 /*FRF_DOWN|FRF_SELECTION|FRF_REGEXP*/, true);

В таком варианте придется скрипт запускать на каждое следующее совпадение... я там добавил hint, может такой вариант подойдёт...

Skif_off wrote: А в тексте для поиска и замены слэши точно нужно удваивать? У меня так получается какая-то ерунда.

Хмм, сложно сказать, я у более опытных товарищей подсмотрел, что слеши удвоенные используются, но у меня и так работает, и эдак... т.е. подсказать как должно быть правильно, увы не могу.

Posted: **Sat Jan 23, 2016 11:22 am**

YuS
Про hint не понял и да, неправ: долго и неудобно. Количество символов табуляции не бесконечное и не припомню, чтобы встречалось больше десятка - сделаю стопку правил или лучше в цикле, штук 15 итераций будет с запасом.

YuS wrote:
Skif_off wrote: А в тексте для поиска и замены слэши точно нужно удваивать? У меня так получается какая-то ерунда.
Хмм, сложно сказать, я у более опытных товарищей подсмотрел, что слеши удвоенные используются, но у меня и так работает, и эдак... т.е. подсказать как должно быть правильно, увы не могу.

По идее надо удваивать, но у меня тогда не работает (вставляет, например, "\n" вместо переноса.

Posted: **Sat Jan 23, 2016 11:55 am**

Skif_off wrote:YuS
Про hint не понял

hint здесь

Skif_off wrote: По идее надо удваивать, но у меня тогда не работает (вставляет, например, "\n" вместо переноса.

А у меня всё одинаково работает, в обоих случаях.

Posted: **Sat Jan 23, 2016 1:47 pm**

YuS
С телефона заходил, не понял, что это был тег more

Решил сделать

YuS wrote:А у меня всё одинаково работает, в обоих случаях.

Нашёл, где проблема:
вот так работает как надо

Code: Select all

AkelPad.TextReplace(hWndEdit, "></FictionBook>", ">\n</FictionBook>", 0x01000001 /*FRF_DOWN|FRF_BEGINNING|FRF_ESCAPESEQ*/, true);

а так

Code: Select all

AkelPad.TextReplace(hWndEdit, "></FictionBook>", ">\\n</FictionBook>", 0x01000001 /*FRF_DOWN|FRF_BEGINNING|FRF_ESCAPESEQ*/, true);

вставляет "\n" вместо переноса строки.

Добавлено:
Блин, сейчас перепроверил - с "\\n" отрабатывает нормально, как и положено. Подождём, всё равно повторяю валидацию после запуска.

Добавлено:
Похоже, проблема с флагами, неправильно сложил.

Posted: **Sat Jan 23, 2016 5:10 pm**

Skif_off wrote:YuS
...Решил сделать

Может быть, просто и дубово, но зато быстро и надежно, а это главное. Скорость работы такого варианта должна быть значительно выше, чем цикла.

Posted: **Wed Jan 27, 2016 10:08 pm**

Подскажите, как в строке замены в скрипте с использованием AkelPad.TextReplace отделить обратную ссылку (\\1) от цифр последующего текста (в приведенном примере - 777)? Просто так не работает.

Code: Select all

AkelPad.TextReplace(0, "(some)(text)", "\\1777", 0x280001 /*FRF_DOWN|FRF_BEGINNING|FRF_REGEXP*/, true)

Posted: **Wed Jan 27, 2016 10:19 pm**

Stranger
С этим лучше в тему плага, наверное. Не пробовали "$1"?

Posted: **Wed Jan 27, 2016 10:25 pm**

Skif_off
Попробовал, такие ссылки в принципе не работают, по-моему.

Posted: **Wed Jan 27, 2016 11:08 pm**

Stranger
Прошу прощения, возможности проверить не было (с телефона), вспомнил про группы в JScript.

Posted: **Wed Jan 27, 2016 11:46 pm**

Stranger
Можно побороть, если вместо самих цифр подставлять их коды (они от тридцати начинаются). Т.е. \x37 - это "7".

Code: Select all

AkelPad.TextReplace(hWndEdit, "(some)(text)", "\\1\\x37\\x37\\x37", 0x00280001, true);

или даже еще короче (только первая "семерка" идет кодом, а остальные две в привычном виде)

Code: Select all

AkelPad.TextReplace(hWndEdit, "(some)(text)", "\\1\\x3777", 0x00280001, true);

AkelPad

Регулярные выражения