ShutDhown, Restart Komputermu dengan Delphi

Untuk melakukan shutdown, restart logoff komputer, sebenarnya gak susah2 amat kok. Cukup dengan menggunakan fungsi ExitWindowsEx.

Pertama design form sesukamu, setelah itu tambahkan deklarasi fungsi ExitWindowsEx sebagai berikut :

function ExitWindowsEx (uFlags : word ; dwReserved : DWORD) : BOOL ;

Parameter pertama diatas menerangkan apa yang harus dilakukan komputer. Jadi parameter ini dapat bernilai :

1. EWX_RESTART (Melalukan restart dengan menampilkan peringatan)
2. EWX_SHUTDOWN (Melakukan shutdown dengan menampilkan peringatan)
3. EWX_LOGOFF (Melakukan logoff dengan menampilkan peringatan)
4. EWX_FORCE (Melakukan shutdown tanpa menampilkan peringatan. Sehingga ada kemungkinan Anda kehilangan data yang belum di save)

Untuk paramater kedua Anda cukup memberikan nilai 0.

Kalau Anda ingin melakukan shutdown cukup tuliskan script di bawah ini :

exitWindowsEx (EWX_SHUTDOWN, 0);

Instalasi QReport pada Borland Delphi 7

Beberapa waktu yang lalu saya kesulitan membuat laporan pada Borland Delphi dengan QReport karena tidak dapat menemukan menu QReport pada Delphi 7. Jika Anda mengalami hal yang sama, mudah-mudahan tulisan di bawah ini bisa membantu Anda.

Pada saat kita menginstal pertama kali, terkadang QReport belum terinstall juga, maka dari itu kita dapat menginstallnya secara manual seperti menginstall komponen-komponen yang lain. Langkah-langkah yang dapat Anda lakukan adalah sebagai berikut:

1. Pilih menu Component - Install Packages. Nah.. setelah itu akan muncul window seperti di bawah ini :

2. Tekan tombol ADD untuk menambahkan Packages

3. Cari file dclqrt70.bpl pada directory ..\Borland\Delphi7\Bin kemudian tekan OPEN

4. Maka akan muncul Packages "Quick Report Components" pada window packages anda. Trus klik OK.

5. Langkah selanjutnya periksa tab QReport

6. Nah.. sekarang Anda sudah dapat membuat laporan dengan Quick Report