Автор Тема: [Данные, строки] Поиск в буфере обмена ключей  (Прочитано 860 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн mr.Gbabak [?]

  • Новичок
  • *
  • Сообщений: 202
  • Репутация: 18
  • Пол: Мужской
    • Награды
т.е. у вас в буфере будет содержаться только ключ и ничего больше?!

Русское сообщество AutoIt

Re: [Данные, строки] Поиск в буфере обмена ключей
« Ответ #15 Отправлен: Июнь 07, 2018, 21:36:27 »

Оффлайн qwertypower [?]

  • Новичок
  • *
  • Сообщений: 12

  • Автор темы
  • Репутация: 0
  • Пол: Мужской
    • Награды
  • Версия AutoIt: 3.3.14.0
т.е. у вас в буфере будет содержаться только ключ и ничего больше?!

Да, будет только ключ

Оффлайн mr.Gbabak [?]

  • Новичок
  • *
  • Сообщений: 202
  • Репутация: 18
  • Пол: Мужской
    • Награды
qwertypower  [?]
Цитировать
Да, будет только ключ
Может так будет проще?
Код: AutoIt [Выделить]
Local $key[3] = ['++1++', '==2==', '--3--']
$sOldClip = ClipGet()
Switch StringLeft($sOldClip, 1)
    Case 'K'
        $sOldClip = $key[0]

    Case 'S'
        $sOldClip = $key[1]
       
    Case 'R'
        $sOldClip = $key[2]
EndSwitch
ClipPut($sOldClip)
 


Оффлайн qwertypower [?]

  • Новичок
  • *
  • Сообщений: 12

  • Автор темы
  • Репутация: 0
  • Пол: Мужской
    • Награды
  • Версия AutoIt: 3.3.14.0
qwertypower  [?]
Может так будет проще?

При запуске скрипт заканчивает работу, можно его поставить в цикл? Мне нужно, что бы он в цикле был и мониторил.
И немного не пойму в коде, это я так понимаю первая буква "S" и количество букв?
Код: AutoIt [Выделить]
    Case 'S'
        $sOldClip = $key[4]


И это идет то, что будет идти в замену?
Код: AutoIt [Выделить]
Local $key[3] = ['++1++', '==2==', '--3--']


Русское сообщество AutoIt

Re: [Данные, строки] Поиск в буфере обмена ключей
« Ответ #18 Отправлен: Июнь 08, 2018, 16:11:12 »

Оффлайн mr.Gbabak [?]

  • Новичок
  • *
  • Сообщений: 202
  • Репутация: 18
  • Пол: Мужской
    • Награды
Код: AutoIt [Выделить]
Local $key[3] = ['++1++', '==2==', '--3--']; тут $key [3] объявление массива, а ['++1++', '==2==', '--3--'] список ключей для замены
;можно было бы оспользовать $key1 = '++1++', $key2='==2==', $key3= --3--
;посмотрите в справке оператор DIM
    While 1
$sOldClip = ClipGet() ;возвращаем буфер обмена
Switch StringLeft($sOldClip, 1) ;возвращает из стрики буфера обмена, первый знак слева StringLeft
    Case 'K' ; если первый знак "K"
        $sOldClip = $key[0] ; то переменной $sOldClip присвоется значение  $key[0], ну или $key1 = '++1++'
        ClipPut($sOldClip) ; переменная $sOldClip запишется в буфер обмена
    Case 'S'
        $sOldClip = $key[1]
        ClipPut($sOldClip)
    Case 'R'
        $sOldClip = $key[2]
        ClipPut($sOldClip)
EndSwitch

sleep (100) ;пауза
 Wend
 


Оффлайн qwertypower [?]

  • Новичок
  • *
  • Сообщений: 12

  • Автор темы
  • Репутация: 0
  • Пол: Мужской
    • Награды
  • Версия AutoIt: 3.3.14.0
Так устраивает, спасибо. Только я хотел бы, что бы все таки можно было ставить по количеству букв на каждую, как тогда. Например буква "К" из 15 символов, "S" из 25 букв, "R" из 7 букв. А так такой код в самый раз.
« Последнее редактирование: Июнь 08, 2018, 22:12:17 от qwertypower »

Помечен как лучший ответ пользователем qwertypower Отправлен Июнь 08, 2018, 22:45:55

Оффлайн Tempo [?]

  • Продвинутый
  • ***
  • Сообщений: 404
  • Репутация: 93
  • Пол: Мужской
    • Награды
  • Версия AutoIt: 3.3.14.0
Код: AutoIt [Выделить]
Global $aClip[] = ["", "key1", "key2", "key3"], $i = 0, $sCurClip

While 1
    $aClip[0] = ClipGet()
    If $aClip[0] <> $sCurClip Then
        Select
            Case StringRegExp($aClip[0], "^K.{15}$")
                $i = 1
            Case StringRegExp($aClip[0], "^B.{12}$")
                $i = 2
            Case StringRegExp($aClip[0], "^R.{11}$")
                $i = 3
        EndSelect
        If $i Then ClipPut($aClip[$i])
        $sCurClip = $aClip[$i]
        $i = 0
    EndIf
    Sleep(100)
WEnd

;K123456123456123
;B123456123456
;R12345612345
 

« Последнее редактирование: Июнь 08, 2018, 22:35:10 от Tempo »

Оффлайн qwertypower [?]

  • Новичок
  • *
  • Сообщений: 12

  • Автор темы
  • Репутация: 0
  • Пол: Мужской
    • Награды
  • Версия AutoIt: 3.3.14.0
Большое вам спасибо) Буду учить Autoit.

Русское сообщество AutoIt

Re: [Данные, строки] Поиск в буфере обмена ключей
« Ответ #22 Отправлен: Июнь 08, 2018, 22:46:28 »

 

Похожие темы

  Тема / Автор Ответов Последний ответ
1 Ответов
2269 Просмотров
Последний ответ Февраль 16, 2011, 17:01:21
от Suppir
2 Ответов
2059 Просмотров
Последний ответ Апрель 29, 2011, 13:02:59
от zlo-kazan
3 Ответов
5142 Просмотров
Последний ответ Январь 30, 2012, 23:48:19
от nu3dell
1 Ответов
1674 Просмотров
Последний ответ Июнь 15, 2013, 11:59:02
от sngr
2 Ответов
1097 Просмотров
Последний ответ Март 13, 2015, 20:04:09
от noob
2 Ответов
1863 Просмотров
Последний ответ Сентябрь 23, 2015, 07:59:45
от madmasles
1 Ответов
785 Просмотров
Последний ответ Сентябрь 22, 2015, 20:59:42
от edyapd
2 Ответов
348 Просмотров
Последний ответ Январь 25, 2018, 16:14:38
от yl3d
5 Ответов
522 Просмотров
Последний ответ Июнь 11, 2018, 14:49:07
от perven1
4 Ответов
100 Просмотров
Последний ответ Октябрь 18, 2018, 11:54:42
от Mashulechka