Re: [Programmer-VB] deteksi aktif/non aktif form

Fri, 13 Jan 2006 02:47:07 -0800

ini contoh sederhana, dan masih harus dikembangkan lagi
 
Private Sub Form_Load()
    Timer1.Interval = 5000
End Sub
 
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    Timer1.Enabled = False
    Timer1.Enabled = True
End Sub
 
Private Sub Timer1_Timer()
    WindowState = 1
End Sub
 
 
Pasang kontrol Timer pada form.
 
Pada saat form di load, timer akan di set dengan interval 5000 (5 detik), artinya setelah 5 detik maka form akan minimized (windowstate=1).
 
Hitungan 5 detik akan selalu direset ke 0 (nol) jika mouse bergerak di atas form (lewat form_mousemove), dan ini artinya selama mouse bergerak di atas form maka form tidak akan diminimized.
 
Timer interval dapat diatur sesuai dengan waktu yang dibutuhkan (1000 artinya 1 detik).
 
Selamat mencoba.
 
Salam,
BH.
 
 

iyan_graduated <[EMAIL PROTECTED]> wrote:
Buat Vb'ers, Saya mau tanya bagaimana coding yang baik untuk
mendeteksi bila dalam interval tertentu (misal. 5 menit) form tidak
ada proses atau tidak aktif, maka form automatis akan minimized dengan
sendirinya..
mirip2 expired time gitu....
 

Yahoo! Photos
Got holiday prints? See all the ways to get quality prints in your hands ASAP.

Wahana Programmer Groups Links

<*> Untuk mengunjungi sponsor milis ini, klik link berikut:
    http://wahanaprogrammer.net

<*> Untuk menghubungi owner milis ini, kirim email ke:
    [EMAIL PROTECTED]

<*> Konsultasi pemrogramman bisa chat disini:
    Yahoo! Messenger: wahanaprogrammer


YAHOO! GROUPS LINKS



Kirim email ke