رفتن به مطلب
  • 0

گرفتن لیست مخاطبین


mehrabmmp

سوال

سلام و درود دوستان

 

 

چجوری می تونم لیست مخاطبین کاربر همراه با شماره هاشون بگیرم و تویه یه لیست وییوی دو خطی نشون بدم جوری که خط اول اسم مخاطب باشه خط دوم شمارش

لینک ارسال
به اشتراک گذاری در سایت های دیگر

2 پاسخ به این سوال تاکنون داده شده است

ارسال های توصیه شده


Dim map1 As Map

    map1.Initialize

    Dim list1 As List

    list1.Initialize

    For i = 0 To listOfContacts.Size - 1

        myContact = listOfContacts.Get(i)

        list1.Add(myContact.DisplayName)

        map1.Put(myContact.DisplayName, myContact,mycontact.EMAIL_HOME)

    Next

    list1.Sort(True)

    For i = 0 To list1.Size - 1

        myContact = map1.Get(list1.Get(i))

        lvcontacts.AddSingleLine(myContact.DisplayName)

    Next

لینک ارسال
به اشتراک گذاری در سایت های دیگر

درود

به این صورت هم میتونید :

Sub Globals
	Dim cu As ContactsUtils
	Private ListView2 As ListView
End Sub
Sub Activity_Create(FirstTime As Boolean)
	Activity.LoadLayout("Layout1")
	
	cu.Initialize
	For Each c As cuContact In cu.FindContactsByPhone("", False, False)
        For Each Phone As cuPhone In cu.GetPhones(c.Id)
            ListView1.AddSingleLine(c.DisplayName)
			ListView2.AddSingleLine(Phone.Number)
        Next
    Next	
End Sub

یک خطی هست و هر کدوم رو توی یک لیست ویو خاص نشون میده . شما میتونید یکیش کنید + دو خطی !

لینک ارسال
به اشتراک گذاری در سایت های دیگر

بایگانی شده

این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.

مهمان
این موضوع برای عدم ارسال قفل گردیده است.
  • کاربران آنلاین در این صفحه   0 کاربر

    • هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.
×
×
  • اضافه کردن...