Orion9

|
Posted: Tue Dec 24, 2024 12:48 Post subject: |
|
|
yahuu wrote: | В настоящее время я реализую это следующим образом. Или есть лучший способ? |
Можно использовать объект List, как уже написали выше. Сейчас, наверное, это самый простой и лучший способ, особенное если использовать его свойство Text:
Code: | SetHotkeyAction /K:A /H:F1 SelectedList
Func SelectedList()
Local aSel = List()
Local sPath = RequestCopyDataInfo("SP"), j, k = 0
aSel.Text = GetSelectedItems(3, 0)
OutputDebugString("Autorun: Selected=" & aSel.Count)
For j = 0 To aSel.Count - 1
OutputDebugString("Autorun: Item[" & j & "]=" & sPath & aSel[j])
If FileExist(sPath & aSel[j]) Then k += 1
Next
ShowHint("Selected: " & aSel.Count & auCRLF & "Processed: " & k)
Free(aSel)
EndFunc |
|
|