• اطلاعیه ها

    • H@mid.RS

      جذب نیرو   پنجشنبه, 10 فروردین 1396

      درود به دوستان عزیز به چند نفر مدیر برای بخش های php و گرافیک نیازمندیم درصورت تمایل درخواست خود را در پیام خصوصی بفرستید  
    • H@mid.RS

      تغییر نام کاربری   دوشنبه, 28 فروردین 1396

      درود دوستانی که نام کاربری انها با ایمل شان یکی بود تغییر کرد مثلا نام کاربری sss@tmail.com به sss تغییر کرد دوستانی که مشکل ورود دارند @ به بعد را پاک کنند
    • H@mid.RS

      کسب درآمد   پنجشنبه, 31 فروردین 1396

      دوستانی که میخواهند با انجمن خودشون همکاری کنند و از محیط انجمن درآمد کسب کنند به بنده پیام خصوصی بفرستند

3 ارسال در این موضوع قرار دارد

سلام


برای استفاده از انمیشن شما می تونید از سورس کد زیر استفاده کنید


برای مثال


در اجرای برنامه ادیت تکست به صورت انمیشن میاد وارد صفحه میشه و میتونید تایم اومدنش رو هم کنترل کنید و برای رفتنشم می تونید انمیشن تعریف کنید


با سورسی که پیوست کردم کار کنید خیلی هم راحته همه چیز میاد دستتون


لیست انمیشن ها :



Bounce
BounceIn
BounceInDown
BounceInLeft
BounceInUp
ZoomOutUp
ZoomOutRight
ZoomOutLeft
ZoomOut
ZoomOutDown
ZoomInUp
ZoomInRight
ZoomInLeft
ZoomInDown
ZoomIn
SlideOutLeft
SlideOutRight
SlideOutUp
SlideOutDown
SlideInLeft
SlideInRight
SlideInUp
SlideInDown
RotateOutUpRight
RotateOutUpLeft
RotateOutDownRight
RotateOutDownLeft
RotateOut
DropOut
Landing
TakingOff
Flash
Pulse
RubberBand
Shake
Swing
Wobble
StandUp
Wave
Hinge
RollIn
RollOut
FadeIn
FadeInUp
FadeInDown
FadeInLeft
FadeInRight
FadeOut
FadeOutDown
FadeOutLeft
FadeOutRight
FadeOutUp
FlipInX
FlipOutX
FlipInY
FlipOutY
RotateIn
RotateInDownLeft
RotateInDownRight
RotateInUpLeft
RotateInUpRight


در پناه حق


animator Www.Basic4X.IR.zip

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


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

لطفا کتابخانه رو هم پیوست کنید 

 

با سپاس

 

AnimationComposer

به لینک زیر برو و دانلود کن سید

http://basic4x.ir/topic/150-%DA%A9%D8%AA%D8%A7%D8%A8%D8%AE%D8%A7%D9%86%D9%87-viewanimator-%D8%A8%D8%B1%D8%A7%DB%8C-basic4android/

 کتابخانه ViewAnimator هست

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


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

به عنوان مثال به ی ادیت تکست میام انمیشن که دوست دارمو میدم :


اول از همه کتابخونه که بالا گذاشتمو تیک می زنیم


دوم: میایم یه انمیشن تعریف می کنیم



dim animET as AnimationComposer
    Private EditText1 As EditText

یه ادیت تکست هم داریم


حالا فراخوانی انمیشن مورد نظرمون با دستور زیر


مثلا اگه دوست داری موقع بالا اومن اکتویتی انمیشن اجرا بشه قسمت Activity_Create کد های که در زیر می ذارمو قرار بده یا هر جا دوست داشتی


مثلا برای قرار دادن ادیت تکس برای نام کاربری و پسورد که در صورت اشتباه تکان بخوره



ani1.Initialize("Anim","Shake")
ani1.delay(100).duration(500).playOn(EditText1)


مدت تکان شد 500 یعنی یک ثانیه و تکان دادن در عرض یک ثانیه شد 100


به همین راحتی


شات این هم میشه مث زیر :


anim.gif


من از این سه تا انمیشن استفاده کردم



Shake
Swing
Wobble
پسند شده توسط Sina

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


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

  • مطالب مشابه

    • توسط batman1
      سلام دوستان
      من دنبال راهی بودم تا بتونم باهاش کارت حافظه رو اسکن کنم،البته با نام دلخواه.یعنی اینکه بگم که اگر فلان نام رو پیدا کردی،بعد فایل هایی که پیداکردی رو لیست کن.
      به این سورس کد رسیدم.اما تقریبا چیزی ازش نفهمیدم.
      میشه یکی کمک کنه و توضیح بده:
      Sub SdCard(CurPath As String) Dim FileList, FolderList As List Dim F As String FileList.Initialize FolderList.Initialize If CurPath = "" Then CurPath = "/mnt/sdcard" End If If File.IsDirectory(CurPath,"") Then Try FileList = File.ListFiles(CurPath) If FileList.IsInitialized Then If FileList.Size > 0 Then F = CurPath Listview1.AddSingleLine(F) CodeModule.ViewList.Add(F) For i = 0 To FileList.Size - 1 F = FileList.Get(i) If File.IsDirectory(CurPath & "/" & F,"")Then FolderList.Add(CurPath & "/" & F) Else Listview1.AddSingleLine(CurPath & "/" & F) CodeModule.ViewList.Add(CurPath & "/" & F) Counter = Counter + 1 LabelCounter.Text = Counter End If DoEvents Next End If End If Catch Msgbox(LastException & " " & CurPath & " " & FileList.Size,"File") End Try 'Recursive Code Try If FolderList.IsInitialized Then If FolderList.Size > 0 Then For i = 0 To FolderList.Size - 1 F = FolderList.Get(i) SdCard(F) DoEvents Next End If End If Catch Msgbox(LastException & " " & FolderList.Size & " " & F,"Folder") End Try End If End Sub ممنون
    • توسط batman1
      سلام به تمامی دوستان.
      میخواستم ببینم میشه،مثلا وقتی برنامه من درحال اجرا هست،نرم افزار ایکس خود به خود بسته بشه یا اصلا اجرا نشه؟
      ممنون.
    • توسط batman1
      سلام به تمامی اساتید.
      میخوام دستوراتی رو بنویسم که چک کنه که اصلا گوشی دارای کارت حافطه هست یا نه.
      آیا سورس کد،یا کتابخونه ای در این رابطه وجود داره؟
      ممنون.