Skip to main content

Flash - Jump Scene with Checkbox

Sejak siang sampai sore aku ngoprek-oprek Flash. Project untuk bikin presentation tool emang belum dilaksanakan, tapi mendingan siap-siap dari sekarang biar bisa lebih mudah nantinya. Dillah juga kerja keras untuk bisa menguasai Flash.

Kali ini aku coba ngoprek gimana caranya bikin "slider bar", seperti yang ada di Media Player. Berbagai cara aku coba, dan nggak sia-sia, meskipun belum mencapai hasil maksimal. Aku udah bisa mengontrol movie (memanfaatkan perintah goto), jika slider (movieClip) di geser, ke kanan maupun ke kiri. Di sini aku belajar tentang startDrag() -- ternyata 4 argument terakhir adalah batas dari drag).

Terus kata Dillah itu nggak bakal kepakai, mendingan pikirkan tentang checkbox. Maksudnya adalah gimana caranya biar orang bisa membuat pilihan presentasi apa aja (secara acak) yang ingin dia lihat. Jadi movie nantinya bakal bisa berjalan sesuai urutan yang diinginkan user.

Aku memeras otak untuk mencari ide. Akhirnya ada ide, menggunakan variabel global (array), untuk menampung data nextStep dari masing-masing scene (soalnya rencananya tiap modul akan dikelompokkan dalam scene). Jadi saat user memilih checkbox, terus menekan tombol Ok, data akan disimpan dalam Array, kemudian jump ke scene yang diinginkan. Di akhir masing-masing scene (kecuali scene terakhir), diberi lagi action yang ngecek ke mana dia harus jump. Kalau kosong berarti berhenti.

Setelah trial and error berkali-kali, akhirnya berhasil juga :)
Dari pengalaman ini aku belajar cara makai checkbox, variabel global dan array di Flash.
Labels:

Comments

Post a Comment

Popular posts from this blog

PostGreSQL :: Hitung Umur

Ternyata untuk menghitung umur dari data yang disimpan di PostGreSQL sangat gampang. PostGreSQL sendiri sudah menyediakan fungsi yang mendukung. Beberapa fungsi yang bisa dipakai adalah AGE dan EXTRACT. AGE dipakai untuk menghitung umur dari sebuah data, dibandingkan dengan hari ini, atau dengan data lain (tipenya timestamp). Misal: age(timestamp '1980-09-27'), akan menghasilkan nilai (bertipe interval) "24 years 1 mon 25 days". Nah, kalau mau mengambil nilai tahunnya saja, tinggal menggunakan EXTRACT Contoh: EXTRACT(year FROM AGE(timestamp '2001-09-27')), hasilnya akan jadi 24.
Post a Comment
Read more

PHP :: Selisih Jam

Setelah kemarin kesulitan untuk melakukan increment ataupun decrement terhadap variabel waktu (date/time) di PHP, kali ini nemuin masalah untuk mencari selisih waktu (dari satu jam ke jam tertentu), yang perlu untuk ngitung lembur karyawan. Tadinya kepikiran untuk buat fungsi sendiri, yang flow -nya kira-kira begini: - masing-masing dipisah menjadi jam, menit, detik - bandingkan antara keduanya. - lakukan pengurangan terhadap masing-masing komponen (jam, menit dan detik) - gabungkan hasil perhitungan ... (selisih jam + selisih menit + selisih detik) Tapi waktu aku ingat kasus Next Date, ... muncul ide untuk menggunakan cara yang sama, yaitu memanfaatkan format UNIX timestamp, terus nyoba mencari selisihnya. TERNYATA BERHASIL !!! Flownya seperti ini: - masing-masing dipisah menjadi jam, menit,detik - ubah masing-masing ke format timestamp, gunakan fungsi mktime() - kurangkan kedua jam - hasilnya dibagi 60 (karena satuannya pakai menit), sementara selisih timestamp itu dalam detik Algori
11 comments
Read more

Delphi :: Split String

Akhirnya ketemu juga cara untuk melakukan split string. (Terbiasa pakai PHP sih, yang sangat memanjakan dalam pengelolaan string.) Di sini memanfaatkan TStringList, unit Classes. // procedure untuk split string procedure Split (const Delimiter: Char; // delimiter charachter Input: string; // input string const Strings: TStrings) ; // list of string result begin Assert(Assigned(Strings)) ; Strings.Clear; Strings.Delimiter := Delimiter; Strings.DelimitedText := Input; end; // contoh pemakaian procedure TForm1.Button1Click(Sender: TObject) ; var A: TStringList; begin A := TStringList.Create; try Split(' ', 'your delphi guide', A) ; ShowMessage(a[0]) ; //your ShowMessage(a[1]) ; //delphi ShowMessage(a[2]) ; //guide finally A.Free; end; end; Source : http://delphi.about.com/cs/adptips2002/a/bltip1102_5.htm Wheew .. akhirnya. One step ahead!!
2 comments
Read more