Alle (!) geöffneten Fenster minimieren bzw. Desktop anzeigen

VB2008er · 25. Februar 2011, 14:01

Hi,

ich versuche grade ein Programm zu schreiben, dass unter anderem alle geöffneten fenster durch einen button minimiern soll.
Ich finde aber grade nichts passendes, daher frage ich hier also wie das gehen könnte.
Denn mit Windows.Formstate kann man ja glaube ich nur die eigene form ansprechen, oder?

Tobse101 · 25. Februar 2011, 14:08

Geh jedes Fenster durch (For each) und minimiere es. (Win API)

Tobi

Dodo · 25. Februar 2011, 14:12

[VB 2010] ALLE Fenster Handles

in Verbindung mit

vbarchiv.net/api/api_showwindow.html

SystemUnknow · 25. Februar 2011, 14:12

alles geöffnete anwendungen aufliesten.
[VB 2010] ALLE Fenster Handles

Mit ShowWindow kannst alles Anwendungen/Fenster minimieren.

Dodo · 25. Februar 2011, 14:26

lol Alex *g* ikk war schneller

bla · 25. Februar 2011, 14:50

alternativ: sendkeys: win + m (falls das überhaupt geht)

Mono · 25. Februar 2011, 15:08

Hi,

ich kenn da einen Weg über VB Script und das Shell Object.
Ich weiss nicht, ob es eine .NET Alternative gibt:

VB.NET-Quellcode

Set objShell = CreateObject("Shell.Application")
objShell.ToggleDesktop

Denke aber mal, das es etwas schneller und unkomplizierter ist als über WinApi und ShowWindow und EnumWindow etc;)

VB2008er · 25. Februar 2011, 15:11

hab mich mit Sendkeys noch nicht so beschäftigt, wie kann ich denn da die Windoofs-Taste sende? :rolleyes:

Edit @ mono: Der Name "objShell" wurde nicht deklariert.

RodFromGermany · 25. Februar 2011, 15:12

Da kannst Du auch gleich auf die Windows-Menüleiste klicken und "Desktop anzeigen" auswählen.

Dodo · 25. Februar 2011, 15:13

google.de/search?q=sendkeys+wi…official&client=firefox-a

@Rod: Das Icon kann man aber auch löschen =)

VB2008er · 25. Februar 2011, 15:14

Haha.....nein eigtl. sollen alle Fensster minimiert werden wenn ich an der Maus zwei Tasten gleichzeitig drücke, aber das is ne andere Sache

SystemUnknow · 25. Februar 2011, 15:15

~~Auch wenn du mit SendKeys machst, muß du trotzdem alle geöffnete Fenster/Anwendungen aufliesten.~~
Lösungen siehe von mir & Dodo !

EDIT//
@Dodo: hast recht...habs vergessen... !

Dodo · 25. Februar 2011, 15:17

@Alex: Da muss ich dich berichtigen, die Windowstaste + M minimiert auch alle Fenster, die brauchen nicht den Focus.

VB2008er · 25. Februar 2011, 15:17

SystemUnknow schrieb:

Auch wenn du mit SendKeys machst, muß du trotzdem alle geöffnete Fenster/Anwendungen aufliesten.
Lösungen siehe von mir & Dodo !

Warum das denn?

Mono · 25. Februar 2011, 15:22

Offensichtlich wurde mein Post überlesen xD
Das ist genau das, was passiert, wenn man auf Desktop anzeigen klickt.

@Dodo Das Desktop Anzeigen Symbol kann man,wenn man es löscht, auch wieder herstellen xD :P

VB2008er · 25. Februar 2011, 15:27

Und wie willst das mit der Maus veranlassen? Wenn du ein Fenster hast, was nicht gerahmt...gefenstert (ka wie das heißt :D) ist, dann kommst du ja nicht an die Taskbar da unten.

Mono · 25. Februar 2011, 15:31

VB.NET-Quellcode

dim obJShell as Object
Set objShell = CreateObject("Shell.Application")
objShell.ToggleDesktop

//EDIT

Du kannst auch den COM Verweis hinzufügen, der heisst
Microsoft Shell Controls and Automation.

So kannst du late binding vermeiden: (wichtig falls du Option Strict On verwendest ;)

VB.NET-Quellcode

Dim oSh As New Shell32.Shell
oSh.MinimizeAll()
oSh = nothing
gc.collect

~~Hm, latebinding isses immernoch, ich muss mal schauen, was Application für ein Typ ist :D~~

So gehts auch ohne late binding

VB2008er · 25. Februar 2011, 15:35

ohhhhhh...das geht! Und so einfach

(Ich hatte das falsch gemacht, nicht als object...)
Jetzt kriegste ma nen Daumen von mir :thumbsup:

Alle (!) geöffneten Fenster minimieren bzw. Desktop anzeigen

Alle (!) geöffneten Fenster minimieren bzw. Desktop anzeigen

VB.NET-Quellcode

SystemUnknow schrieb:

VB.NET-Quellcode

VB.NET-Quellcode

Ähnliche Themen

5 Benutzer haben hier geschrieben