Kali ini saya akan mengajak kamu membuat program sederhana yang berfungsi untuk mengetahui posisi kursor dengan menggunakan Delphi.

 

1. Buat project baru dengan mengklik File > New > Application

 

2. Kemudian muncul sebuah Form baru

 

3. Letakkan 1 buah GroupBox, 1 buah Label, dan 1 buat Timer. Lalu kamu atur posisinya menjadi seperti gambar dibawah

 

4. Selanjutnya ubah Caption dari GroupBox1 menjadi ‘Posisi Kursor’, Caption Label1 menjadi ‘(0, 0)’, dan Interval Timer1 menjadi ‘10’

 

 

 

5. Klik dua kali pada Timer1, dan kamu ketikkan kode berikut. Jangan lupa untuk menambahkan sebuah variable yaitu CurPos dengan tipe TPoint

 

 

6. Kemudian jalankan program dengan cara mengklik Run > Run pada menu utama delphi atau dengan menekan F9 pada keyboard kamu

 

Dibawah ini adalah tampilan setelah program dijalankan

 

Selamat mencoba..

 

 

Free Cd | Dating Friends | sk8ter | Free Gadgets