ارمین رمضانی دلیجانی 381 ارسال شده در 8 شهریور، ۱۳۹۳ اشتراک گذاری ارسال شده در 8 شهریور، ۱۳۹۳ به نام خدا با این آموزش متن تیتل رو رنگی کنید! 1: دو تا تایمر تعریف میکنیم Sub Process_Globals Dim timer1 As Timer Dim timer2 As Timer End Sub 2: و بعد تو قسمت Sub Activity_Create(FirstTime As Boolean) Activity.LoadLayout("Layout1") ' Add Kardane Ye range be delkha Activity.TitleColor = Colors.Black ' timer1.Initialize("timer1","200")'inam ke malome timer2.Initialize("timer2","2000")' // timer1.Enabled = True 'starte timer 1 End Sub 3: در قسمت Sub timer1_tick Activity.TitleColor = Colors.White' range sefid ro entekhab mikonim timer2.Enabled = True ' timer 2 ro vasl mikonim timer1.Enabled = False' timer 1 ro ghat mikonim End Sub 4: و در نحایت Sub timer2_tick Activity.TitleColor = Colors.Black' range meshki ro entekhab mikonim timer1.Enabled = True' timer 1 vasl she timer2.Enabled = False' timer 2 ghat she End Sub باتشکر لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
ارسالهای توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.