Серый форум — AHK: For_loop_Gui

Re: AHK: For_loop_Gui

null@example.com (teadrinker) — Sun, 16 Jan 2022 11:17:23 +0000

Теоретически, называть ключи именами папок неправильно. У вас там при переборе применяется рекурсия в подпапки, так что ничего не мешает названиям папок повторяться.

Re: AHK: For_loop_Gui

null@example.com (inseption86) — Sun, 16 Jan 2022 10:14:38 +0000

teadrinker
Да, спасибо!!


Person_Array := {}
for index, element in Array_folder 
{
    file_name := RegExReplace(element, ".+\\(.+)\.*.{0}", "$1")
    Person_Array[File_name] := element 

    Gui, Add, Button, gGetName x+100 y10, % file_name
}
Gui, Show, , ***
return  
       
GetName:
GuiControlGet, var,, % A_GuiControl
gui,destroy

msgbox, % Person_Array[var] "_" var

Re: AHK: For_loop_Gui

null@example.com (teadrinker) — Sun, 16 Jan 2022 09:48:49 +0000

Наверно, это имели в виду:

Folder := A_Desktop "\Test\" TimeString 

Array_folder := [] 
Loop, Files, % Folder "\*", D
{
   if A_LoopFileAttrib not contains H
      Array_folder.Push(A_LoopFileFullPath)
}

Gui, +ToolWindow  +AlwaysOnTop 
Gui, Font, s15 italic

arr := []
for index, element in Array_folder {
   Gui, Add, Button, gGetName hwndhButton%A_Index%, % RegExReplace(element, ".+\\(.+)\.*.{0}", "$1")
   arr[hButton%A_Index%] := element
}

Gui, Show, , ***
return  
    
GetName(hwnd) {
   global arr
   Gui, %A_Gui%:+OwnDialogs
   MsgBox, % arr[hwnd]
}

Re: AHK: For_loop_Gui

null@example.com (teadrinker) — Sat, 15 Jan 2022 20:40:29 +0000

Я не соображу, какого именно поведения вы хотите добиться.

Re: AHK: For_loop_Gui

null@example.com (inseption86) — Sat, 15 Jan 2022 19:55:21 +0000

teadrinker
Никак не соображу, как получить A_LoopFileFullPath нажатой кнопки.

Re: AHK: For_loop_Gui

null@example.com (teadrinker) — Sat, 15 Jan 2022 15:02:43 +0000

Так из массива и узнайте.

Re: AHK: For_loop_Gui

null@example.com (inseption86) — Sat, 15 Jan 2022 14:57:58 +0000

teadrinker
На данный момкент в скрипте - как слева на скрине, но так как первоначальная папка содержит подкаталоги и все эти папки отображаются в гуи, то хотел бы узнать их полный путь для дальнейших условий.

Re: AHK: For_loop_Gui

null@example.com (teadrinker) — Sat, 15 Jan 2022 14:54:33 +0000

А как вы хотели?

Re: AHK: For_loop_Gui

null@example.com (inseption86) — Sat, 15 Jan 2022 14:50:42 +0000

teadrinker
Полный путь в Gui - некрасиво)

Re: AHK: For_loop_Gui

null@example.com (teadrinker) — Sat, 15 Jan 2022 14:41:42 +0000

В смысле, получилось?

Re: AHK: For_loop_Gui

null@example.com (inseption86) — Sat, 15 Jan 2022 14:31:15 +0000

teadrinker

Re: AHK: For_loop_Gui

null@example.com (teadrinker) — Sat, 15 Jan 2022 14:28:38 +0000

Убрать RegEx?

Re: AHK: For_loop_Gui

null@example.com (inseption86) — Sat, 15 Jan 2022 13:27:04 +0000

teadrinker
Да, в массиве, а в Гуи - название конечной папки. Как получить полный путь, помимо нажатой кнопки (имя конечной папки)

Re: AHK: For_loop_Gui

null@example.com (teadrinker) — Sat, 15 Jan 2022 13:13:40 +0000

Непонятно, в чём сложность. Они же у вас в массиве, или я не понял вопроса?

AHK: For_loop_Gui

null@example.com (inseption86) — Sat, 15 Jan 2022 11:07:07 +0000

Добрый день! Подскажите, пож-та, как получить изначальный путь (A_LoopFileFullPath)


Folder := % A_Desktop "\Test\" TimeString 

Array_folder := [] 
Loop, Files, % Folder "\*", DR
{
   if A_LoopFileAttrib not contains H
           Array_folder.Push(A_LoopFileFullPath)
}

Gui, +ToolWindow  +AlwaysOnTop 
Gui, Font, s15 italic

for index, element in Array_folder 
  Gui, Add, Button, gGetName, % RegExReplace(element, ".+\\(.+)\.*.{0}", "$1")

Gui, Show, , ***
return  
    
GetName:
GuiControlGet, var,, % A_GuiControl
Gui,destroy
MsgBox % var 
return