Daten aus Adressbuch übernehmen in 10.5

[Stefan Sicurella]

Hallo,

die unteren zeilen führen unter 10.5 zu einem Crash, sie sind aus dem  
Adressbuch-Beispiel von RS.
Kennt jemand zufällig einen Workaround für 10.5 um an diese daten  
heranzukommen?


    data = contact.addresses
    if data.count >0 then
      address=data.value(0)
      PhoneList.cell(PhoneList.lastIndex,4)=address.streetaddress
      PhoneList.cell(PhoneList.lastIndex,5)=address.Zip
      PhoneList.cell(PhoneList.lastIndex,6)=address.City
    end if



Gruß

Stefan