من میخوام یک صفحه تایمر بوجود بیارم یعنی یه تایمی چند تصویر نمایش داده بشه و بعد یک اکتیویتی شروع بشه با کد طیر خواستم چنین کاری بکنم اما تنها وقتی یک تصویر نمایش داده میشه اکتیویتی بعدی شروع میشه ممنون میشم راهنمایی کنید.
Sub Process_Globals
Dim Timer1 As Timer
End Sub
Sub Globals
Dim cunt As Int
Private ImageView2 As ImageView
End Sub
Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("s1")
Timer1.Initialize("Timer1",10)
Timer1.Enabled = True
End Sub
Sub Timer1_Tick
If cunt <= 7 Then
ImageView2.Bitmap = LoadBitmap(File.DirAssets,"st" & cunt & ".png")
cunt = cunt + 1
Else
cunt = 0
StartActivity("r")
End If
End Sub
سوال
milad19 113
باسلام
من میخوام یک صفحه تایمر بوجود بیارم یعنی یه تایمی چند تصویر نمایش داده بشه و بعد یک اکتیویتی شروع بشه با کد طیر خواستم چنین کاری بکنم اما تنها وقتی یک تصویر نمایش داده میشه اکتیویتی بعدی شروع میشه ممنون میشم راهنمایی کنید.
Sub Process_Globals Dim Timer1 As Timer End Sub Sub Globals Dim cunt As Int Private ImageView2 As ImageView End Sub Sub Activity_Create(FirstTime As Boolean) Activity.LoadLayout("s1") Timer1.Initialize("Timer1",10) Timer1.Enabled = True End Sub Sub Timer1_Tick If cunt <= 7 Then ImageView2.Bitmap = LoadBitmap(File.DirAssets,"st" & cunt & ".png") cunt = cunt + 1 Else cunt = 0 StartActivity("r") End If End Subلینک ارسال
به اشتراک گذاری در سایت های دیگر
7 پاسخ به این سوال تاکنون داده شده است
ارسالهای توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.