Серый форум — AHK: Передать из текстового файла построчно текст в другую программу

Re: AHK: Передать из текстового файла построчно текст в другую программу

null@example.com (teadrinker) — Sun, 01 May 2011 21:49:50 +0000

1 — без разницы, если работают обе.
2 — новую тему.
3 — 2 скрипта нельзя, можно 2 подпрограммы.

Re: AHK: Передать из текстового файла построчно текст в другую программу

null@example.com (Malcev) — Sun, 01 May 2011 21:33:25 +0000

Всё понял!!!
Вы рказались совершенно правы.
Сам скрипт был сохранён как ANSI
А AHK был установлен Unicode.
Осталось 3 вопроса.
1) Какой вариант скритпа лучше использовать - последний или предпоследний
2) Есть ещё один вопрос по другому скрипту тоже по тексту, его лучше здесь озаглавить или создать новую тему.
3) Возможно ли в одном файле написать сразу 2 скрипта вызывающимся по хоткиям.
Огромное Вам спасибо! )

Re: AHK: Передать из текстового файла построчно текст в другую программу

null@example.com (teadrinker) — Sun, 01 May 2011 21:18:47 +0000

У меня AHK_La последняя, но тут не в версии дело. Не представляю, в чём может быть проблема. Попробуй нескомпилированный скрипт.

Re: AHK: Передать из текстового файла построчно текст в другую программу

null@example.com (Malcev) — Sun, 01 May 2011 21:13:36 +0000

Хммм, а у меня скомпилированный скрипт на 3ёх компах с разными операционками выдаёт китайский язык, неважно - вбиваешь или нет.
А какая у вас версия AHK?

Re: AHK: Передать из текстового файла построчно текст в другую программу

null@example.com (teadrinker) — Sun, 01 May 2011 21:06:27 +0000

У меня с любым текстом всё в порядке, думаю, какая-то проблема с исходным документом. Попробуй в качестве исходного документа взять какой-нибудь текст, который сам напечатаешь в Блокноте, что получится?

Re: AHK: Передать из текстового файла построчно текст в другую программу

null@example.com (Malcev) — Sun, 01 May 2011 21:00:58 +0000

Так с английским текстом тоже самое - непонятно откуда эти иероглифы берутся.
А вы не пробовали его прогнать?
繆- это на китайском "сообщество"

Re: AHK: Передать из текстового файла построчно текст в другую программу

null@example.com (teadrinker) — Sun, 01 May 2011 20:53:33 +0000

Думаю, нужно определить кодировку исходного документа.

Re: AHK: Передать из текстового файла построчно текст в другую программу

null@example.com (Malcev) — Sun, 01 May 2011 13:45:32 +0000

Тоже самое.
И в MsgBox, % Clipboard тоже показывает кракозябры.
А может можно расставить новые "`n" скриптом, а потом уже переносить построчно?

Re: AHK: Передать из текстового файла построчно текст в другую программу

null@example.com (teadrinker) — Sat, 30 Apr 2011 07:12:14 +0000

Можно ещё так попробовать:

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

В строке MsgBox, % Clipboard показывает нормально или тоже с кракозябрами?

Re: AHK: Передать из текстового файла построчно текст в другую программу

null@example.com (Malcev) — Fri, 29 Apr 2011 23:27:43 +0000

Да, извини, запускается отлично.
Только проблема, скрипт в третий документ выводит какие-то кракозябры.
Текст который он запостил во второй документ в Notepad

Диетологи рекомендуют утром, перед завтраком, выпить стакан натурального сока – это вызовет всплеск энергии, так необходимой для трудового дня. В 3-литровой упаковке – для всей семьи, Пуре Фоод производит полезные соки на любой вкус - сливОвый, томатный, яблочный.

А вот, что он запостил в третий (для чистоты эксперимента взял Open Office)

Диетологи рекомендуют утром, перед 瑲#завтраком, выпить стакан натурального сока – 繆ꯤ
ꯐ
это вызовет всплеск энергии, так необходимой 繆ꯤ
ꯐ
для трудового дня. В 3-литровой упаковке – для
ꯐ
всей семьи, Пуре Фоод производит полезные для
ꯐ
соки на любой вкус - сливОвый, томатный, е для
ꯐ
яблочный.юбой вкус - сливОвый, томатный, е для
ꯐ

Re: AHK: Передать из текстового файла построчно текст в другую программу

null@example.com (teadrinker) — Fri, 29 Apr 2011 22:36:14 +0000

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

Re: AHK: Передать из текстового файла построчно текст в другую программу

null@example.com (Malcev) — Fri, 29 Apr 2011 22:24:49 +0000

Что-то я тут наверное наколбасил
И всё-равно ему не нравится что нету скобки, хотя я скопировал один-в-один

   SetTitleMatchMode, 2
   TargetWindov = Adobe Premiere Pro  ; указать целевое окно
   StringMaxLength = 200   ; указать максимальный размер копируемой строки в символах (можно больше)
 
   EM_GETLINECOUNT := 0xBA, EM_GETLINE := 0xC4
 
   VarSetCapacity(String, StringMaxLength)
   Return
 
F11::
   SendInput, ^{vk43}   ; Ctrl + C
   WinActivate, Notepad  ; активируем окно Notepad
   SendInput, ^{vk56}   ; Ctrl + V
   ControlGet, hEdit, hwnd,, Edit1, A
   SendMessage, EM_GETLINECOUNT,,,, ahk_id %hEdit%
   Loop % ErrorLevel  ; количество строк в Edit-контроле блокнота
   {
      NumPut(StringMaxLength, String)
      SendMessage, EM_GETLINE, A_Index - 1, &String,, ahk_id %hEdit%  ; копируем строку в переменную String
      Clipboard = %String%   ; помещаем строку в буфер обмена
 
      MsgBox, % Clipboard  ; только для демонстрации, эту строку можно удалить
 
      WinActivate, %TargetWindov%
      SendInput, t
      Sleep, 400
      WinActivate, %TargetWindov%
      SendInput, ^{vk56}   ; посылаем целевому окну Ctrl + V, вставляя текст из буфера обмена
      Sleep, 400
   }
   Return
   WinActivate, Notepad   ; активируем окно Notepad
   SendInput, {CTRLDOWN}a{CTRLUP}   ; выделяем всё
   SendInput, {DELETE}   ; стираем

Re: AHK: Передать из текстового файла построчно текст в другую программу

null@example.com (teadrinker) — Fri, 29 Apr 2011 22:08:22 +0000

Malcev пишет:

При запуске скрипта выдаёт ошибку

Значит, скобку "}"пропустил при копировании. В том варианте было не познаково, а построчно, тебе ведь нужно, чтобы строка заканчивалась, как в окне Блокнота? В буфере обмена текст делится на реальные строки, а не на видимые.

Malcev пишет:

Я извиняюсь уже за наглость, а нельзя сделать так чтобы я выделил текст в первом документе, нажал на f11,

Я думаю, это ты уже вполне можешь сделать сам. Чтобы поместить выделенный текст в буфер обмена, нужно послать активному окну Ctrl + C:

SendInput, ^{vk43}   ; Ctrl + C

Далее активировать нужное окно и послать Ctrl + V (уже было).

Re: AHK: Передать из текстового файла построчно текст в другую программу

null@example.com (Malcev) — Fri, 29 Apr 2011 21:55:12 +0000

При запуске скрипта выдаёт ошибку

Я извиняюсь уже за наглость, а нельзя сделать так чтобы я выделил текст в первом документе, нажал на f11,
а скрипт уже скопировал бы его во второй документ, а из второго уже построчно в мою программу и по окончании работы стёр всё из второго документа.
И непонятно почему нельзя вставлять из буфера памяти познаково, как вы сделали во втором варианте скрипта?

StringMaxLength = 200 ; указать максимальный размер копируемой строки в символах (можно больше)

Re: AHK: Передать из текстового файла построчно текст в другую программу

null@example.com (teadrinker) — Fri, 29 Apr 2011 21:29:04 +0000

Ой, ошибочка маленькая, отредактировал!