Cara memindahkan Tulisan di Command menggunakan Foxpro

                        

                  Selamat bertemu kembali kawan...... di pertemuan kali ini saya akan , membahas tentang proses perpindahan tulisan di Command, Sebenernya bukan cuma Command saja, tapi yang lain juga bisa, seperti : Foto, TextBox,Shape yang bisa dipindah-pindah sesuai yang anda inginkan.

Langsung saja.........

Langkah :
    1. Buka Foxpronya
    2.Buat Project
    3. Buat Formnya.

OK.... ini dia Kasusnya.......

Coba lihat gambar disamping......

           Tanda pagar "#" , awal dijalankan tanda tersebut ada ditengah, ketika salah satu tombol (tombol paling kiri/kanan) di klik maka tanda pagar tersebut akan berpindah, seperti yang dikatakan diatas tadi, contoh yang saat ini saya biat adala menggunakan Command, anda bisa menggunakan apa saja bisa tergantung typenya dalam penulisan kodingnya.

 Ketika diklik maka tanda pagar tersebut pindah, berawal di tengah kemudian pindah ke kiri.

Kodingnya gak susah koq........

Di cermati. OK.....

Pada tombol diatas , isikan koding dibawah ini :

DO CASE 

CASE thisform.command2.Caption="#"

thisform.command2.Caption=""

thisform.command3.Caption="#"

thisform.command4.Caption=""

CASE thisform.command3.Caption="#"

thisform.command3.Caption=""

thisform.command4.Caption="#"

thisform.command2.Caption=""

OTHERWISE

thisform.command2.Caption="#"

thisform.command3.Caption=""

thisform.command4.Caption=""

ENDCASE

Sedangkan pada tombol diatas ini isikan koding dibawah ini :

DO CASE
CASE thisform.command4.Caption="#"
thisform.command4.Caption=""
thisform.command3.Caption="#"
thisform.command4.Caption=""
CASE thisform.command3.Caption="#"
thisform.command3.Caption=""
thisform.command2.Caption="#"
thisform.command3.Caption=""
OTHERWISE
thisform.command2.Caption="#"
thisform.command3.Caption=""
thisform.command4.Caption=""

ENDCASE