Contoh program di bawah ini akan menunjukkan bagaimana cara untuk menyembunyikan taskbarHanya Menampilkan Icon Pada Taskbar. Read more ... » melalui program yang dibuat dengan DelphiMembuat Group Pada Laporan. Read more ... ».
Untuk menyembunyikan dan menampilkan taskbar kita dapat menggunakan salah satu dari fungsi Windows APIMendisable Menu dan Tombol Close. Read more ... » yaitu ShowWindow yang deklarasinya sebagai berikut:
-
Parameter pertama dari fungsi ShowWindow merupakan handle window yang akan ditampilkan atau disembunyikan. Parameter kedua adalah bagaimana window tersebut ditampilkan. Yang menjadi pertanyaan kita, darimana kita mendapatkan handle window dari taskbar ? Caranya adalah dengan memanggil fungsi FindWindow.
-
-
<span id="more-170"></span>
-
<pre lang="Delphi">function FindWindow (lpClassName, lpWindowName : PChar) : HWND;
Parameter pertama merupakan nama kelas jendela (window class). Pada Delphi nama ini identik dengan nama kelas dari FormMenambahkan Form Pada DLL. Read more ... », misalnya TForm1, TForm2, dst. Parameter kedua adalah caption dari form (TForm.Caption).
Kembalian dari fungsi FindWindow adalah handle form yang dicari. Bila Windows tidak menemukan form yang dimaksud, FindWindow akan mengembalikan nilai 0.
Untuk mencari handle form dari taskbar :
-
Parameter pertama dari FindWindow diisi dengan Shell_TrayWnd yang merupakan window class dari taskbar. Sedangkan parameter kedua diisi dengan Nil yang menunjukkan bahwa form taskbar tidak mempunyai caption.
-
-
Kode selengkapnya untuk menyembunyikan taskbar adalah sbb :
-
<pre lang="Delphi">procedure TForm1.Button1Click(Sender: TObject);
-
var
-
hTaskBar :Thandle;
-
begin
-
hTaskBar := FindWindow('Shell_TrayWnd',Nil); ShowWindow(hTaskBar,Sw_Hide);
-
end;
Untuk menampilkan taskbar langkahnya sama dengan yang di atas. Yang berbeda hanya parameter kedua dari ShowWindow, yang semula SW_HIDE diganti dengan SW_NORMAL. Kode lengkapnya adalah sebagai berikut :
-
var
-
hTaskBar :Thandle;
-
begin
-
hTaskBar := FindWindow('Shell_TrayWnd',Nil); ShowWindow(hTaskBar,Sw_Normal);
-
end;



kren bnget.,,
kreatifitasx dtmbah jdi makin banyak yang mengunjungi situs nie
kerennnnnnnnnnnnnnnnnnnn artikel nya dewi suka
siiiiiiiiiiiiiiiiiippppppppppppppppppp sayang aku kurang ngertiii…he3x, maklum tukang pacul nang sawah