Show or Hide Icon Desktop
Pada desktop biasanya diletakkan icon-icon shortcut yang fungsinya untuk memilih dan menjalankan suatu aplikasi yang terdapat pada Windows dengan mudah dan cepat. Namun pada saat shortcut yang diletakkan terlalu banyak malah terkadang membuat tampilan desktop menjadi penuh.
Kita dapat menyembunyikan atau menampilkan icon-icon shortcut tersebut dengan membuat aplikasi sederhana dari delphi, sebagai contoh dibangkitkan melalui TButton adalah sebagai berikut :
// - Menyembunyikan Icon Desktop - procedure TForm1.Button1Click(Sender:
TObject); Begin ShowWindow(FindWindow(nil,'Program Manager'),SW_HIDE); End;
// - Menampilkan Icon Desktop -
procedure TForm1.Button2Click(Sender:
TObject); Begin ShowWindow(FindWindow(nil,'Program Manager'),SW_SHOW); End;
|
Selamat mencoba...
|