Wallpaper Viewer
Jika anda sering mengganti-ganti walpaper, tentunya sangat merepotkan jika anda harus membuka Control Panel, lalu Display Seting dan bla bla....Dibicarakan saja sudah capek. Dengan aplikasi ini anda cukup memilih file gambar seperti pada program Picture Viewer dan mengklik sebuah tombol, maka sekejap wallpaper anda telah berubah.
Adapun caranya adalah sebagai berikut.
1. Tambahkan kontrol-kontrol ke Form dan atur propertiesnyaseperti berikut.
| Jenis Kontrol | Nama Kontrol | Properties | Nilai |
|---|---|---|---|
| Form | Form1 | Caption | Picture Viewer |
| DriveListBox | Drive1 | - | - |
| DirListBox | Dir1 | - | - |
| FileListBox | File1 | - | - |
| Image | Image1 | Stretch | True |
| CommondButton | Command1 | Caption | Set This Picture As Wallpaper |
2. Susunlah letak kontrol-kontrol tersebut pada form sehingga menjadi kira-kira seperti gambar berikut.
3. Ketikkan listing berikut pada kode editor
Private Const SPIF_UPDATEINFILE=&H1
Private Const SPI_SETDESKWALLPAPER=20
Private Const SPIF_SENDWININICHANGE=&H2
Private Declare SystemParametersInfo
Posting Komentar