Bir Reminder.app listelerini Notes.app denetim listesine nasıl alabilirim?

Hatırlatıcı listemdeki hatırlatma listemi, Notes.app içindeki bir notun içindeki bir kontrol listesine dönüştürmek istiyorum. Listeyi, listedeki Hatırlatıcılar'dan Notlar'a sürüklemeye çalıştım ve bu işe yaramadı. Hatırlatıcılar listesinin içeriğini yeni bir Not notuna sürüklemeye çalıştım ve içeriği [ ]her bir öğeden önce içeri içeri aktardı. Tezleri Notes'un yerel denetim listesi öğelerine dönüştürmenin bir yolu var mı?

Aşağıdaki AppleScript komut dosyası seçilen alacak Hatırlatıcılar'ı içinde Hatırlatıcılar ve yeni bir hale Not içinde kontrol listesi formatında içinde Notes . Bu, Kod Düzenleyicide çalıştırılabilir veya bir AppleScript uygulaması olarak kaydedilebilir .

• Not: Bu gibi komut kullanır UI Scripting'i gelen çalıştırdığınızda, Senaryo Editör , bu eklenmelidir Sistem Tercihleri > Güvenlik & Gizlilik > Erişilebilirlik için çalışacak . Bir AppleScript uygulaması olarak , uygulamanın eklenmesi gerekir.

tell application "Reminders" to activate
delay 0.1
tell application "System Events" to keystroke "c" using {command down}
delay 0.1
set theNotesChecklist to ""
set theReminders to get the clipboard as string
repeat with thisParagraph in paragraphs of text of theReminders
    try
        set theNotesChecklist to theNotesChecklist & text 5 thru -1 of thisParagraph & return
        delay 0.1
    end try
end repeat
tell application "Notes" to activate
tell application "System Events"
    keystroke "n" using {command down}
    keystroke "l" using {shift down, command down}
    delay 0.5
    keystroke theNotesChecklist
    delay 0.1
    key code 51 -- # Delete - Deletes the last 'return' typed.
end tell

Yukarıdaki komut seçilen varsayar Hatırlatmalar içinde hatırlatmalar kendileriyle ilişkili bir bilgi yok. Başka bir deyişle, diğer özelliklerden başka hiçbir Name özellik ilişkilendirilmemiş . Diğer ise özellikleri ayarlanmış eklemek deyimi ile döngü gösterildiği gibi kod aşağıda:if repeat

repeat with thisParagraph in paragraphs of text of theReminders
    try
        if thisParagraph starts with "[ ]" then
            set theNotesChecklist to theNotesChecklist & text 5 thru -1 of thisParagraph & return
            delay 0.1
        end if
    end try
end repeat

Not: UI Komut Dosyası ile , delay komutların değerinin sisteminizde değiştirilmesi veya uygun şekilde ek delay komutlar verilmesi gerekebilir .