من طبق آموزش اول کد ها رو. به این شکل نوشتم و کتابخونه هم ورژن 6 رو تو لایبرری وارد کردم اما وقتی رو دکمه میزنم هیچ اتفاقی نمیوفته
Sub Globals
Private Button1 As Button
Dim aa As AriaAsyncTask
End Sub
Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("main")
Button1.Text = "start"
aa.Initialize("aa")
End Sub
Sub aa_OnPreExecute
ToastMessageShow("start",False)
End Sub
Sub aa_DoInBackground(Params() As Object) As Object
Dim ii As Int = Params(0)
For i = 0 To 49999
ii = i +1
File.WriteString(File.DirInternal,"a.txt",ii)
aa.PublishProgress(ii)
Next
Return ii
End Sub
Sub aa_OnPostExecute(Result As Object)
ToastMessageShow("Done:"&Result,False)
End Sub
Sub aa_OnProgressUpdate(Progress As Int)
Activity.Title = Progress &"/50000"
End Sub
Sub Button1_Click
Dim ii As Int = 0
aa.Run(Array(ii))
End Sub
اینم خطاها هاش پس از اجرا
AriaAsynkTask Error : wrong number of arguments; expected 4, got 0
AriaAsynkTask Error : wrong number of arguments; expected 4, got 1
AriaAsynkTask Error : wrong number of arguments; expected 4, got 1