Source Code untuk Mengatur Tampilkan Jendela Aplikasi di Desktop
Berikut ini adalah salah satu trik yang teman - teman bisa gunakan untuk mengatur tampilan dari jendela aplikasi yang ada di desktop. Dengan ini teman - teman bisa mengatur agar semua aplikasi yang sedang terbuka di minimize, ditampilkan seluruhnya di desktop dengan posisi horizontal atau vertikal dan juga bisa mengatur perpindahan jendela antar aplikasi. Cara manual untuk melakukan ini adalah dengan menekan tombol Show Desktop atau Switch Between Windows di Taskbar. OK sekarang mungkin biar lebih jelas langsung kita coba saja source codenya dan mungkin untuk percobaan silahkan buka beberapa aplikasi dulu sebelum menjalankan source code di bawah ini :
&& Membuat variable public yang diisikan object Shell.Application
PUBLIC oShell
oShell=CreateObject("Shell.Application")
oShell=CreateObject("Shell.Application")
&& Meminimize semua jendela aplikasi yang sedang aktif
oShell.MinimizeAll&& Mengembalikan posisi sebelum dilakukan MinimizeAll
oShell.UndoMinimizeALL
&& Mengatur semua jendela tampil secara Cascade
oShell.CascadeWindows
&& Mengatur semua jendela tampil secara Horizontal
oShell.TileHorizontally
&& Mengatur semua jendela tampil secara Vertikal
oShell.TileVertically
&& Menampilkan kotak pilihan aplikasi yang ingin diaktifkan
oShell.WindowSwitcher
Cara mencoba source code diatas, ketikkan dan jalankan dulu 2 baris syntak pertama di Command Window, kemudian jalankan satu persatu baris perintah selanjutnya.
SELAMAT MENCOBA...!!
No comments :
Post a Comment