Terima kasih atas kesempatan anda untuk mengunjungi website kami ini.
Kami adalah Toko Online (Usaha Wah Yang Sah) yang didirikan untuk menjawab kebutuhan masyarakat dan menyediakan berbagai kebutuhan akan produk-produk fashion yang anda butuhkan.
kami berusaha terus menambah produk-produk kami, sehingga benar - benar dapat memenuhi kebutuhan rekan-rekan semua. kami juga bekerja sama dengan para Importir, Pabrik dan Distributor utama sehingga kami dapat memberikan harga murah yang terbaik.
Anda dapat membeli produk-produk yang kami sediakan lewat situs ini dengan cara yang praktis dan mudah, jika anda melakukan order, akan segera kami tindaklanjuti.
Satu hal, jika anda puas dengan pelayanan kami, maka beritahu teman anda, tetapi jika anda kecewa dengan pelayanan kami, maka beritahu kami.
Jumat, 30 Januari 2009
Contoh program di bawah ini akan menunjukkan bagaimana cara untuk menyembunyikan icon pada desktop melalui program yang dibuat dengan Delphi.Keterangan tentang fungsi Show Window dan FindWindow dapat di lihat di sini.
Langka-langnya adalah :
1. Buatlah sebuah form sepeti pada gambar 17 berikut ini.
procedure TForm1.Button1Click(Sender: TObject);
begin
ShowWindow(FindWindow(nil,'Program Manager'),SW_HIDE);
end;
pada tombol Show icon codenya adalah sebagai berikut :
procedure TForm1.Button2Click(Sender: TObject);
begin
ShowWindow(FindWindow(nil,'Program Manager'),SW_SHOW);
end;
3. Jalankan program yang telah dibuat dan lihat hasil kerja kamu.
0 komentar:
Posting Komentar