如何使用applescript将桌面元素（图标，文件，文件夹）始终保存在同一位置

debugcn 发表于 Dev

迪克5

使用脚本，我们将创建另一个脚本，该脚本将存储桌面上所有元素的位置，所创建的脚本将被编译并可用于将所有先前受保护的元素放回原处。

/adesktopsave/deskico.txt这是将用于编译的临时文件。/adesktopsave/savedicoposition.scpt是保存的脚本，被编译为与applescrit一起使用

此处使用的所有名称仅用于示例。这些名称没有特定的属性。

仅需要计划使用此脚本之前创建一个文件夹。它是：/ adesktopsave

另外，“ try”之后的行尾（\ n）也“ end try”和＆“}”）

尊重是非常重要的，这样文本才可以使用。

    tell application "Finder" to set theList to {name, desktop position} of items of desktop 
try 
do shell script "rm -f /adesktopsave/deskico.txt"

do shell script "echo tell application " & quoted form of (quote & "Finder" & quote) & return & " >>/adesktopsave/deskico.txt" 

end try 

set n to (count (first item of theList))


repeat with i from 1 to n       

set inp to do shell script "echo " & quoted form of (item i of first item of theList)       

set xy to (item i of second item of theList)    

set AppleScript's text item delimiters to ","   

set xyz to do shell script "echo " & xy     
set wxyz to ("{" & xyz & "}
 ")         

set ligne to "try 
" & "set desktop position of item " & quoted form of (quote & inp & quote) & " of desktop to " & quoted form of (wxyz) & "end try 
"       
set ligne to do shell script "echo " & ligne & " >>/adesktopsave/deskico.txt"    

end repeat 

do shell script "echo " & "end tell" & return & " >>/adesktopsave/deskico.txt"

    display dialog "Do you want to save your icons in their current location?" buttons {"Cancel", "Save"} default button 2 with title "Save  the positions of icons"

    if (button returned of result) is "Cancel" then     
set n to do shell script "echo " & n 
else    
do shell script "osacompile -o " & "/adesktopsave/savedicoposition.scpt" & " /adesktopsave/deskico.txt" 
end if 

return n

迪克5

我们可以将脚本简化为最简单的表达方式。可能会有错误的风险。

set ligne to ""
do shell script "mkdir -p  /adesktopsave"
tell application "Finder" to set {names, positions} to {name, desktop position} of items of the desktop
set ligne to "tell application \"Finder\"
"
set n to (count names)
set AppleScript's text item delimiters to ","
repeat with i from 1 to n
set ligne to ligne & ("try
" & "set desktop position of item " & (quote & item i of names & quote) & "  to  {" & item i of positions & "}
end try
")
end repeat
set ligne to ligne & ("end tell" & return)
display dialog "Do you want to save your icons in their current location?" buttons {"Cancel", "Save"} default button 2 with title "Save the positions of icons"
  if (button returned of result) is "Cancel" then 
    set n to do shell script "echo " & n
else
  do shell script "osacompile -o " & "/adesktopsave/savedicoposition.scpt  -e  "  & quoted form of ligne
end if
set AppleScript's text item delimiters to ""
tell application "Finder" to open POSIX file "/adesktopsave/savedicoposition.scpt"
return n

本文收集自互联网，转载请注明来源。

如有侵权，请联系[email protected] 删除。