Forum Laboratorium BSI Bekasi
Selamat Datang pengunjung...

Jika anda sudah terdaftar dalam forum ini silahkan login, namun jika tidak harap mendaftar dahulu untuk melihat forum-forum yang dikunci...

Forum ini adalah forum yang didirikan oleh Asisten BSI untuk berbagi pengetahuan tentang apa saja....

Semoga forum ini bermanfaat....


Forum Komunitas Lab BSI Bekasi yang ditujukan untuk sharing ilmu pengetahuan tentang apa saja dan juga sebagai tempat nongkrong kaum intelektual
 
HomeFAQSearchRegisterLog in

Share | 
 

 Form Animasi Tirai

View previous topic View next topic Go down 
AuthorMessage
R4n994
Forum Founder
Forum Founder


Jumlah posting : 87
Poin : 2147483647
Reputasi : 8
Join date : 2011-05-07
Age : 26
Lokasi : Bekasi

PostSubject: Form Animasi Tirai   Thu May 12, 2011 1:12 am

Assalamu'alaikum.....

mau berbagi sedikit nih.....

Ini konsep nya ane ambil dari VB jadi sebenarnya penerapannya sama kayak di VB n listingnya pun Hampir sama...

jadi insya allah kalian bisa dengan sendirinya karena ini trik yang sangat mudah

pertama siapkan 1 buah form dengan 2 buah timer dan 1 buah command button...

lalu pada form di propertisnya nilai width kita ganti dengan (misalnya : 100) dan height (misalnya : 100)

lalu masukkan kode berikut ini
Code:

Timer1

if thisform.form1.width < 500  and thisform.form1.height < 500
    thisform.form1.width = thisform.form1.width + 10
    thisform.form1.height = thisform.form1.height +10
      if thisform.form1.width = 500 and thisform.form1.height = 500
                      thisform.timer1.enabled=.f.
      endif
endif


Timer2

if thisform.form2.width >= 500  and thisform.form1.height >= 500
    thisform.form1.width = thisform.form1.width - 10
    thisform.form1.height = thisform.form1.height -10
      if thisform.form1.width = 500 and thisform.form1.height = 10
                      thisform.timer2.enabled=.f.
                      thisform.release
      endif
endif


form1              activate

thisform.timer1.enabled=.t.


commandbutton1          click

thisform.timer2.enabled=.t.



Penjelasan sedikit nih gan.....

untuk timer 1 itu fungsinya untuk membuka form menjadi membesar dan terus membesar sampai dimana kondisi tertentu yang dapat memberhentikan proses pembesaran form

sebagai contoh pada saat aktif formnya maka karena sebelumnya kita sudah mengeset width maupun height formnya menjadi 100 maka kondisi dimana timer 1 akan diaktifkan itu bernilai true dan menjalankan pelebaran form

begitu juga sebaliknya untuk menutup formnya....... jadi agan pasti bisa menerjemahkannya sendiri


semoga bermanfaat ya gan

**************************************************************

=============================================================
Berikanlah setitik ilmu kamu kepada yang lain
Walaupun setitik tetapi manfaatnya lebih dari apapun
Jangan pelit dengan Ilmu karena semakin kita membagikannya maka semakin luaslah ilmu kita
Back to top Go down
http://id-id.facebook.com/rangga.afriansyah
 
Form Animasi Tirai
View previous topic View next topic Back to top 
Page 1 of 1
 Similar topics
-
» how to select an option from select box of a form
» Tutorial for how to use storeEval command to get property of an element.
» Security Alert with yes, no, view certificate button
» selecting dropdown list using selenium
» Identifying the element

Permissions in this forum:You cannot reply to topics in this forum
Forum Laboratorium BSI Bekasi :: MATERI LAB :: VISUAL FOXPRO 9 :: ARTIKEL, TIPS DAN TRIK-
Jump to: