رتبه موضوع:
  • 6 رای - 3.17 میانگین
  • 1
  • 2
  • 3
  • 4
  • 5
فهمیدن قطع شدن مکالمه
#1
با درود
با چه دستوری و چگونه میتوان فهمید مکالمه قطع شده است
لطفا با کد نویسی توضیح دهید
با سپاس
پاسخ
#2
من با دستور زیر میفهمم که گوشی زنگ خورده ولی نمیدانم چطور بفهمم مکالمه قطع شده و پایان یافته

کد:
Sub Process_Globals
    Dim TimerService As Timer
   Dim PE As PhoneEvents
    Dim AC As AnswerCall
    Dim PhoneId As PhoneId
    
     Dim Counter As Int
     Counter = 0    

    Dim Check1 ,Makan As Int
End Sub
Sub Service_Create
     TimerService.Initialize("TimerService",1000)
    
   PE.InitializeWithPhoneState("PE",PhoneId)
    AC.Initialize("AnswerCall")
End Sub

Sub Service_Start (StartingIntent As Intent)
    Check1 = File.ReadString(File.DirInternal, "chek1.txt")
    Makan = File.ReadString(File.DirInternal, "makan.txt")
    
    Counter = Counter + 1
    If Counter = Makan Then
        Counter = 0
        If Check1 = 1 Then
            TimerService.Enabled = False
            
        End If    
    End If
End Sub

Sub Service_Destroy

End Sub

Sub TimerService_Tick
     StartServiceAt("", DateTime.Now, True)
End Sub

Sub PE_PhoneStateChanged (State As String, IncomingNumber As String, Intent As Intent)
    If AC.isRinging = True Then
        TimerService.Enabled = True
    End If
    
    
End Sub
پاسخ
#3
درود
والا خودم تست نکردم اما باید با phone eventsبشه
PhoneEvents allows you to handle all kinds of system events.
کل رویداد ها با این چک میشه
Sub PE_PhoneStateChanged (State As String, IncomingNumber As String, Intent1 As Intent)
Dim P As Phone
If State = "RINGING" Then
P.SetRingerMode(P.RINGER_SILENT)
End If
End Sub
 

یه دونه msgbox (state) بزن ببین وقتی تلو قطع میکنی چه رویدادی میده
رو همون رویداد شرطتو بزار
در صورتی که سوال دارید و سوالتون مختصر هست با شماره 09120642214 میتونید تماس بگیرید.
کسانی که دوست دارن در کانال فروشگاه ما و یا کانال انجمن عضو بشن یک پیامک در تلگرام برای من بفرستید که عضوشون میکنم.

ادرس فروشگاه :

http://www.amshop.ir



ای ام شاپ را در اینستگرام دنبال کنید

ای ام شاپ رو در کانال تلگرام دنبال کنید



This forum uses Lukasz Tkacz MyBB addons.
پاسخ
#4
با سپاس
بدست آوردم
جواب IDLE
پاسخ


پرش به انجمن:


کاربران در حال بازدید این موضوع: 1 مهمان
<------> <____> <<<<----------------->>>> <<<<--->>>>>
This forum uses Lukasz Tkacz MyBB addons.