Серый форум — AHK: GuiControl и обнуление предыдущих переменных

Re: AHK: GuiControl и обнуление предыдущих переменных

null@example.com (BlackCat) — Wed, 20 Oct 2021 17:57:52 +0000

__Михаил__ именно об этом я и подумал ...
AHK почти как Perl - многое может!

Re: AHK: GuiControl и обнуление предыдущих переменных

null@example.com (__Михаил__) — Wed, 20 Oct 2021 17:56:41 +0000

Тогда думаю АХК в этом поможет как раз.

Re: AHK: GuiControl и обнуление предыдущих переменных

null@example.com (BlackCat) — Wed, 20 Oct 2021 17:43:42 +0000

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

Re: AHK: GuiControl и обнуление предыдущих переменных

null@example.com (BlackCat) — Wed, 20 Oct 2021 17:35:25 +0000

__Михаил__ иногда мне нужно быстро конвертировать данные реестра из hex и обратно.
Это для модернизации образа WinPE нужно, где используются *.reg файлы.
Долго объяснять, а этого я не умею делать ...
Теперь буду доделывать этот код для обратной конвертации - из текста в hex для реестра.

Re: AHK: GuiControl и обнуление предыдущих переменных

null@example.com (__Михаил__) — Wed, 20 Oct 2021 17:15:54 +0000

Только вот какой смысл хранить в реестре в хексе? Можно и в виде строк хранить.

Re: AHK: GuiControl и обнуление предыдущих переменных

null@example.com (BlackCat) — Wed, 20 Oct 2021 17:01:42 +0000

teadrinker ну я же писал, что не умею объяснять. Как собака - все понимаю, но сказать не могу!
БОЛЬШУЩЕЕ БЛАГОДАРЮ за помощь!
Теперь все хорошо работает.

Re: AHK: GuiControl и обнуление предыдущих переменных

null@example.com (teadrinker) — Wed, 20 Oct 2021 16:55:32 +0000

Ну вот вам и нужно было объяснить, что при вставке hex-кода в верхнее поле должен появляться декодированный текст в нижнем. Если так, то можно было проще:

RegHex =
(
  54,00,65,00,73,00,74,00,3a,00,20,00,22,00,45,00,6e,00,67,00,6c,00,69,\
  00,73,00,68,00,20,00,61,00,6e,00,79,00,20,00,74,00,65,00,78,00,74,00,22,00,\
  20,00,2b,00,20,00,20,04,43,04,41,04,41,04,3a,04,38,04,39,04,20,00,42,04,35,\
  04,3a,04,41,04,42,04,3a,00,20,00,22,00,11,04,43,04,31,04,3b,04,4c,04,20,00,\
  13,04,43,04,3c,04,22,00,00,00,00,00
)

Gui Add, Edit, vSrcHex gGetTxt w600 h200, % RegHex ; Вставить hex из *reg файла
Gui Add, Edit, vOutTxt  w600 h200
Gui Add, Button, gReset, Очистить все
Gui Show,, % ProgName
Return

Reset:
 GuiControl,, SrcHex
 GuiControl,, OutTxt
Return

GuiClose:
ExitApp

GetTxt(){
 GuiControlGet, SrcHex
 SrcHex := RegExReplace(SrcHex, "[^a-f\d]")
 Loop % StrLen(SrcHex) /2 {
  Txt .= Chr("0x" SubStr(SrcHex, A_index *4 -1, 2) SubStr(SrcHex, A_index *4 -3, 2))
  }
 GuiControl,, OutTxt, % Txt
}

Re: AHK: GuiControl и обнуление предыдущих переменных

null@example.com (BlackCat) — Wed, 20 Oct 2021 16:48:18 +0000

teadrinker ... блин!!! Перепутал ... [Ctrl + V] конечно же!!!!
Просто перепутал, когда писал.
Я не думаю, когда нажимаю клавиши и все само-собой происходит.

Re: AHK: GuiControl и обнуление предыдущих переменных

null@example.com (teadrinker) — Wed, 20 Oct 2021 16:47:16 +0000

Странно, обычно по умолчанию в Windows по Ctrl + C осуществляется копирование, а вставка по Ctrl + V.

Re: AHK: GuiControl и обнуление предыдущих переменных

null@example.com (BlackCat) — Wed, 20 Oct 2021 16:45:55 +0000

teadrinker ага ... у меня так работает.
А разве иначе???

Re: AHK: GuiControl и обнуление предыдущих переменных

null@example.com (teadrinker) — Wed, 20 Oct 2021 16:41:48 +0000

А, я понял, вы думаете, что вставка текста осуществляется по Ctrl + C.

Re: AHK: GuiControl и обнуление предыдущих переменных

null@example.com (BlackCat) — Wed, 20 Oct 2021 16:39:49 +0000

teadrinker благодарю за помощь!
Уже решили вопрос, спасибо огромное!

Re: AHK: GuiControl и обнуление предыдущих переменных

null@example.com (teadrinker) — Wed, 20 Oct 2021 16:38:14 +0000

BlackCat пишет:

перед вставкой [Ctrl + C] нужно ткнуть мышой в верхний Edit, чтобы он активировался

Так он и был изначально активным.

Re: AHK: GuiControl и обнуление предыдущих переменных

null@example.com (BlackCat) — Wed, 20 Oct 2021 16:38:02 +0000

__Михаил__ ну да, функцию не довел до ума, а копал не в том месте! ... Совсем тормознул!
Большущее спасибо!

Re: AHK: GuiControl и обнуление предыдущих переменных

null@example.com (__Михаил__) — Wed, 20 Oct 2021 16:35:07 +0000

Всё настолько просто, что даже смешно:

RegHex =
(
  54,00,65,00,73,00,74,00,3a,00,20,00,22,00,45,00,6e,00,67,00,6c,00,69,\
  00,73,00,68,00,20,00,61,00,6e,00,79,00,20,00,74,00,65,00,78,00,74,00,22,00,\
  20,00,2b,00,20,00,20,04,43,04,41,04,41,04,3a,04,38,04,39,04,20,00,42,04,35,\
  04,3a,04,41,04,42,04,3a,00,20,00,22,00,11,04,43,04,31,04,3b,04,4c,04,20,00,\
  13,04,43,04,3c,04,22,00,00,00,00,00
)

Gui Add, Edit, vSrcHex gGetTxt w600 h200, % RegHex ; Вставить hex из *reg файла
Gui Add, Edit, vOutTxt  w600 h200
Gui Add, Button, gReset, Очистить все
Gui Show,, % ProgName
Return

GetTxt:
 Gui Submit, NoHide
 GuiControl,, OutTxt, % GetTxt(SrcHex)
Return

Reset:
 Gui Submit, NoHide
 GuiControl,, SrcHex
 GuiControl,, OutTxt
Return

GuiClose:
ExitApp

GetTxt(SrcHex){
 global
 Txt=
 SrcHex := RegExReplace(SrcHex, "m),|\s|\\\n", "")
 Loop % StrLen(SrcHex) /2 {
  Txt .= Chr("0x" SubStr(SrcHex, A_index *4 -1, 2) SubStr(SrcHex, A_index *4 -3, 2))
  }
Return Txt
}