Серый форум — AHK: Обрамление выделенного текста тегами

Re: AHK: Обрамление выделенного текста тегами

null@example.com (ked2802) — Mon, 28 Jul 2014 11:40:50 +0000

Огромное спасибо! У меня после этого все заработало.

Utf8ToAnsi(Utf8String, CodePage = 1251)
{
If (NumGet(Utf8String) & 0xFFFFFF) = 0xBFBBEF
BOM = 3
Else
BOM = 0

UniSize := DllCall("MultiByteToWideChar", "UInt", 65001, "UInt", 0
, "UInt", &Utf8String + BOM, "Int", -1
, "Int", 0, "Int", 0)
VarSetCapacity(UniBuf, UniSize * 2)
DllCall("MultiByteToWideChar", "UInt", 65001, "UInt", 0
, "UInt", &Utf8String + BOM, "Int", -1
, "UInt", &UniBuf, "Int", UniSize)

AnsiSize := DllCall("WideCharToMultiByte", "UInt", CodePage, "UInt", 0
, "UInt", &UniBuf, "Int", -1
, "Int", 0, "Int", 0
, "Int", 0, "Int", 0)
VarSetCapacity(AnsiString, AnsiSize)
DllCall("WideCharToMultiByte", "UInt", CodePage, "UInt", 0
, "UInt", &UniBuf, "Int", -1
, "Str", AnsiString, "Int", AnsiSize
, "Int", 0, "Int", 0)
Return AnsiString
}
^p::
Send ^{vk43}
clipboard = Текст1 `r`nТекст 2. `r`nТекст3 `r`Текст 4
Send ^{vk56}
Return

^b::
Send ^{vk43}
clipboard = Текст `n
Send ^{vk56}
Return

Re: AHK: Обрамление выделенного текста тегами

null@example.com (Selja8) — Mon, 28 Jul 2014 09:57:43 +0000

serzh82saratov пишет:

Магия?!

Да, как то так.

Re: AHK: Обрамление выделенного текста тегами

null@example.com (serzh82saratov) — Mon, 28 Jul 2014 09:51:38 +0000

Selja8 пишет:

HideArr := Object()

Магия?!

Re: AHK: Обрамление выделенного текста тегами

null@example.com (ypppu) — Mon, 28 Jul 2014 09:41:28 +0000

ked2802, оформите код правильно!

Re: AHK: Обрамление выделенного текста тегами

null@example.com (Selja8) — Mon, 28 Jul 2014 09:27:26 +0000

HideArr := Object()
text .= "Вечером `r`n Было утро."
;Можно и по словам отдельно разбить.
text1 .= "Вечером"
text2 .= "Было утро"
Textsort .= "555"
Sort, Textsort
Textsort := "Отсортированый текст" ":`r`n" Text1 ",`r`n" Text2 ".`r`n" Textsort
msgbox %text% `n %textsort%

Как-то так.

Re: AHK: Обрамление выделенного текста тегами

null@example.com (Selja8) — Mon, 28 Jul 2014 09:17:05 +0000

Msgbox Текст `r`n текст с новой строки.

`t (табуляция), `n (перевод строки) и `r (возврат каретки).

Re: AHK: Обрамление выделенного текста тегами

null@example.com (ked2802) — Mon, 28 Jul 2014 08:47:04 +0000

еще раз извиняюсь, помогите чайнику!
как вставить пробел и тексты с новой строки

^[::
Send ^{vk43}
clipboard = вечером
Было утро.
Оптовая цена 9000 руб.
Более 10 000 аксессуаров!
Send ^{vk56}
Return

^]::
Send ^{vk43}
clipboard = вечером (пробел)
Send ^{vk56}
Return

Re: AHK: Обрамление выделенного текста тегами

null@example.com (ked2802) — Mon, 28 Jul 2014 07:12:08 +0000

Selja8 пишет:

http://forum.script-coding.com/viewtopic.php?id=5251

Огромное человеческое Спасибо. Заработало!

Re: AHK: Обрамление выделенного текста тегами

null@example.com (serzh82saratov) — Mon, 28 Jul 2014 05:32:26 +0000

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

Re: AHK: Обрамление выделенного текста тегами

null@example.com (Selja8) — Mon, 28 Jul 2014 04:29:16 +0000

http://forum.script-coding.com/viewtopic.php?id=5251

Re: AHK: Обрамление выделенного текста тегами

null@example.com (ked2802) — Sun, 27 Jul 2014 20:54:58 +0000

Еще один маленькая загвоздка.
Как вставить текст кирилицей?

^b::
Send ^{vk43}
clipboard = вечер
Send ^{vk56}
Return

получается - РІРµС‡РµСЂ

Re: AHK: Обрамление выделенного текста тегами

null@example.com (ked2802) — Fri, 16 Nov 2012 14:56:19 +0000

да, в русской раскладке не работало, сейчас все отлично.
Спасибо!

Re: AHK: Обрамление выделенного текста тегами

null@example.com (teadrinker) — Fri, 16 Nov 2012 11:24:57 +0000

Только вместо

Send ^c
Send ^v

лучше

Send ^{vk43}
Send ^{vk56}

иначе может не работать при русской раскладке клавиатуры.

Re: AHK: Обрамление выделенного текста тегами

null@example.com (ked2802) — Fri, 16 Nov 2012 09:53:00 +0000

все работает. Огромное спасибо!

Re: AHK: Обрамление выделенного текста тегами

null@example.com (ypppu) — Fri, 16 Nov 2012 06:00:14 +0000

Как-нибудь так.

^p::
Send ^c
clipboard = %clipboard%
Send ^v
Return

^b::
Send ^c
clipboard = %clipboard%
Send ^v
Return