Как мне исправить мой AppleScript, чтобы удалять выбранные треки в iTunes?
-
12-09-2019 - |
Вопрос
Я создал следующий AppleScript для удаления всех выбранных треков:
property okflag : false
-- check if iTunes is running
tell application "Finder"
if (get name of every process) contains "iTunes" then set okflag to true
end tell
if okflag then
tell application "iTunes"
if selection is not {} then
repeat with this_track in selection
try
try
set cla to class of this_track
set floc to (get location of this_track)
delete this_track
on error error_message number error_number
display alert error_message message ("Error number: ") & error_number & "."
end try
if cla is file track then
my delete_the_file(floc)
end if
end try
end repeat
end if
end tell
end if
to delete_the_file(floc)
try
-- tell application "Finder" to delete floc
do shell script "mv " & quoted form of POSIX path of (floc as string) & " " & quoted form of POSIX path of (path to trash as string)
on error
display dialog "Track deleted, but could not be moved to trash" buttons {"Hmm"} default button 1 with icon 1
end try
end delete_the_file
Это работает нормально, когда я выбираю один элемент, но когда я выбираю более одного, я получаю:"Не удается получить местоположение элемента 2 выбора" (номер ошибки -1728).Я полагаю, это связано с тем, что при удалении трека индекс скрипта в выделении повреждается.
Я подумал, что сначала попробую составить свой собственный список треков, которые нужно удалить:
tell application "iTunes"
if selection is not {} then
set to_delete to {}
repeat with this_track in selection
try
set cla to class of this_track
set floc to (get location of this_track)
if cla is file track then
set pair to {this_track, floc}
set to_delete to to_delete & pair
end if
end try
end repeat
repeat with pair in to_delete
set the_track to item 1 of pair
set floc to item 2 of pair
delete the_track
my delete_the_file(floc)
end repeat
end if
end tell
Но затем я получаю "Не удается получить пункт 1 пункта 1 выбора приложения "iTunes"". Я думаю, проблема в том, что "this_track" - это не объект класса Track, а элемент выбора.Как мне получить фактический объект отслеживания из элемента выбора?
Если вы не видите решения, я буду рад советам по отладке или любым другим предложениям.
Решение
Переменная this_track
является ссылкой на спецификатор объекта.Вы должны использовать contents
свойство для получения вложенного спецификатора объекта.То же самое верно и для доступа к переменной pair
во втором цикле.Смотрите раздел "Справочник по классу", посвященный этому классу reference
в Руководство по языку AppleScript.
Другая проблема существует в том, как список to_delete
строится.Заявление set to_delete to to_delete & pair
будет создан не список пар, а плоский список.Смотрите раздел "Справочник по классу", посвященный этому классу list
в Руководство по языку AppleScript.
Вот версия вашего второго скрипта, где эти ошибки были удалены:
tell application "iTunes"
if selection is not {} then
set to_delete to {}
repeat with this_track in selection
try
set cla to class of this_track
set floc to (get location of this_track)
if cla is file track then
set pair to {contents of this_track, floc}
copy pair to end of to_delete
end if
end try
end repeat
repeat with pair in to_delete
set the_track to item 1 of contents of pair
set floc to item 2 of contents of pair
delete the_track
my delete_the_file(floc)
end repeat
end if
end tell