Entwickler-Ecke

Windows API - Desktop Symbole ausblenden


GericasS - Fr 03.04.09 12:05
Titel: Desktop Symbole ausblenden
Morgen,

ich habe eine Frage zum ein/ausblenden der Desktop Symbole. Ich würde gerne wissen ob es sich realisieren lässt die Symbole über eine Tastenkombination ein und ausblenden zu lassen.
Das ganze könnte man doch über eine Applikation die dauerhaft im Hintergrund läuft realsieren oder ?

LG

GericasS


Moderiert von user profile iconNarses: Topic aus Sonstiges (Delphi) verschoben am Fr 03.04.2009 um 12:08


Stundenplan - Mi 08.04.09 11:04

Bitte sehr: (Nicht getestet)

Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
var
  wnd: HWND;
begin
  wnd :=  FindWindow('Progman''Program Manager');
  wnd :=  FindWindowEx(wnd, 0'SHELLDLL_DefView'nil);
  wnd :=  FindWindowEx(wnd, 0'SysListView32''FolderView');

  if wnd <> 0 then
  begin
     ShowWindow(wnd,SW_HIDE);
  end;
end;


Das mit der Tastenkombination würde sich mit einem Timer und GetAsyncKeystate(vKey: Integer) zB.: so lösen:

Delphi-Quelltext
1:
2:
3:
4:
5:
6:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
if GetAsyncKeystate(VK_CONTROL) <> 0 then    //STRG
   if GetAsyncKeystate(VK_SPACE) <> 0 then   //Leertaste
 //Anweisungen
end;


Xentar - Mi 08.04.09 11:26

Du meinst diese Funktion REchtsklick -> Symbole anordnen nach -> Desktopsymbole anzeigen?

Du könntest mit diversen Programmen, z.B. RegMon, prüfen, welcher Registry Eintrag dafür verändert wird, und dann testen, diesen per Software zu setzen.


GericasS - Mi 08.04.09 14:40

Danke für den Sourcecode und den Tipp. Ich werde gleich mal alles beide ausprobieren.

Danke


LG

GericasS