Серый форум — AHK: Дальнейшие действия с текстом в зависимости от количества строк

Re: AHK: Дальнейшие действия с текстом в зависимости от количества строк

null@example.com (teadrinker) — Mon, 09 May 2011 22:15:33 +0000

В другую программу нужно вставлять не буфер обмена, а переменные String1, String2... по очереди.

Re: AHK: Дальнейшие действия с текстом в зависимости от количества строк

null@example.com (Malcev) — Mon, 09 May 2011 22:10:34 +0000

Но в буфер обмена попадает

Мама мыла раму.
Маша ела кашу.

И соответственно в другую программу вставляется

Мама мыла раму.
Маша ела кашу.

Re: AHK: Дальнейшие действия с текстом в зависимости от количества строк

null@example.com (teadrinker) — Mon, 09 May 2011 21:50:39 +0000

; для демонстрации
Clipboard =
(
Мама мыла раму.
Маша ела кашу.
)

MaxSigns = 10  ; заменить на нужное
i := n := PrevEndPos := 1

StringReplace, Clipboard, Clipboard, `r,, 1
Length := StrLen(Clipboard)
Loop, parse, ClipBoard
{
   if (A_Index = Length)
      EndPos := A_Index + 1
   if (A_LoopField = " " || A_LoopField = "`n")
      EndPos := A_Index
   if (A_Index = Length || A_LoopField = "`n" || i = MaxSigns + 1)
   {
      String%n% := SubStr(ClipBoard, PrevEndPos, EndPos - PrevEndPos)
      PrevEndPos := EndPos + 1, i := A_Index - EndPos, n++
   }
   i++
}
; для демонстрации
While String%A_Index%
   MsgBox, % "String" A_Index " = |" String%A_Index% "|"

Re: AHK: Дальнейшие действия с текстом в зависимости от количества строк

null@example.com (Malcev) — Mon, 09 May 2011 20:53:11 +0000

Допустим, при таком тексте

Мама мыла раму.
Маша ела кашу.

Получим при максимуме в 10 знаках

Мама мыла
раму.
Маша ела
кашу.

Re: AHK: Дальнейшие действия с текстом в зависимости от количества строк

null@example.com (teadrinker) — Mon, 09 May 2011 20:40:29 +0000

А сам последний пробел или знак переноса строки включаем?

Re: AHK: Дальнейшие действия с текстом в зависимости от количества строк

null@example.com (Malcev) — Mon, 09 May 2011 17:44:10 +0000

Можно разбить текст в буфере обмена на составные части по принципу "если больше указанного количества знаков, берётся часть текста, включающая нужное количество знаков + текст до ближайшего пробела или знака переноса строки

Мне бы нужно было "если больше указанного количества знаков, берётся часть текста, включающая нужное количество знаков (минус) текст до ближайшего пробела или знака переноса строки.
То есть в каждой строке чтобы было не больше 20 знаков.
Если больше, то идём назад до пробела и переносим.

Re: AHK: Дальнейшие действия с текстом в зависимости от количества строк

null@example.com (teadrinker) — Mon, 09 May 2011 14:02:23 +0000

Да, но попозже.

Re: AHK: Дальнейшие действия с текстом в зависимости от количества строк

null@example.com (Malcev) — Mon, 09 May 2011 13:59:56 +0000

Да. вот это именно, то что надо.
Поможете?

Re: AHK: Дальнейшие действия с текстом в зависимости от количества строк

null@example.com (teadrinker) — Mon, 09 May 2011 13:56:02 +0000

Malcev пишет:

P.S. А реально ли сделать такое, чтобы текст разбивался на строчки автоматически, миную блокнот?
Например, если одной строке задать максимальное количество знаков, если знаков больше, то находим пробел и весь текст после пробела переносим на следующую строку.
То есть, я имею ввиду делать word-wrap в самом буфере

Можно разбить текст в буфере обмена на составные части по принципу "если больше указанного количества знаков, берётся часть текста, включающая нужное количество знаков + текст до ближайшего пробела или знака переноса строки, и всё это заносится в переменную, затем по тому же принципу следующий участок текста, и так далее до конца текста в буфере". Таким образом получаем массив переменных String1, String2... в каждой из которых часть текста.

Re: AHK: Дальнейшие действия с текстом в зависимости от количества строк

null@example.com (Malcev) — Mon, 09 May 2011 13:40:15 +0000

Мне нужно, чтобы мною выделенный текст переносился в блокнот.
В блокноте у меня заранее окошко нужного мне размера.
Соответственно вставленный текст разбивается с новым word-wrap.
И уже из блокнота в зависимости от количества строк с текстом делаются последующие действия.
Изменённый мной ваш скрипт, почему-то не работает, хотя по моей логике в нём написано всё верно.

P.S. А реально ли сделать такое, чтобы текст разбивался на строчки автоматически, миную блокнот?
Например, если одной строке задать максимальное количество знаков, если знаков больше, то находим пробел и весь текст после пробела переносим на следующую строку.
То есть, я имею ввиду делать word-wrap в самом буфере

Re: AHK: Дальнейшие действия с текстом в зависимости от количества строк

null@example.com (teadrinker) — Mon, 09 May 2011 13:29:49 +0000

Так тебе нужно, чтобы скрипт переносил текст именно из блокнота, или непосредственно из буфера обмена?

Re: AHK: Дальнейшие действия с текстом в зависимости от количества строк

null@example.com (Malcev) — Mon, 09 May 2011 09:00:18 +0000

Вот всё, что удалось "родить"
Teadrinker, нужна ваша помощь

Код (AutoHotKey):

   SetTitleMatchMode, 2
   TargetWindov =   ; указать целевое окно
   StringMaxLength = 200   ; указать максимальный размер копируемой строки в символах (можно больше)
   String = "" ; обьявляем пустую строку
   MyLineCounter = 0 ; кол-во строк
 
   EM_GETLINECOUNT := 0xBA, EM_GETLINE := 0xC4
   Return
 
F11::
   ControlGet, hEdit, hwnd,, Edit1, A
   SendMessage, EM_GETLINECOUNT,,,, ahk_id %hEdit%
   Loop % ErrorLevel  ; количество строк в Edit-контроле блокнота
   {
   MyLineCounter = MyLineCounter + 1
      String = String +
      VarSetCapacity(String, StringMaxLength)
      NumPut(StringMaxLength, String)
      SendMessage, EM_GETLINE, A_Index - 1, &String,, ahk_id %hEdit%  ; прибавляем строку в переменную String 
   
   }
 
 if MyLineCounter = 3  ; если 3 строчки то ...
 {
    Clipboard = %String%   ; помещаем строки в буфер обмена
    WinActivate, %TargetWindov%
    SendInput, ^{vk56}   ; посылаем целевому окну Ctrl + V, вставляя текст из буфера обмена
    Sleep, 400
 
 } else if MyLineCounter = 4    ; если 4 строчки то ...
 {
    Clipboard = %String%   ; помещаем строки в буфер обмена
    WinActivate, %TargetWindov%
    SendInput, ^{vk56}   ; посылаем целевому окну Ctrl + V, вставляя текст из буфера обмена
    Sleep, 400
 }
  
Return

Re: AHK: Дальнейшие действия с текстом в зависимости от количества строк

null@example.com (teadrinker) — Mon, 02 May 2011 12:38:10 +0000

Мыслишь в правильном направлении, но для начала неплохо бы почитать справку по командам AHK, в частности ознакомиться с синтаксисом команды if и SendMessage. Чтобы получить текст из контрола, существует команда ControlGetText.

Re: AHK: Дальнейшие действия с текстом в зависимости от количества строк

null@example.com (Malcev) — Mon, 02 May 2011 11:59:08 +0000

Честно, понял не всё.
Я пытался эти выражения гуглить, но всё равно тёмный лес.
Слижком сложное программирование.
Как я понимаю в переменную String нужно скопировать вместо EM_GETLINE, просто весь текст, убрать цикл и создать выражение if then

Re: AHK: Дальнейшие действия с текстом в зависимости от количества строк

null@example.com (teadrinker) — Mon, 02 May 2011 11:20:05 +0000

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