Hilfe bei Funscript

Hiho,

wollte mal ein kleines Funscript schreiben, was folgendes macht (wenn es das schon gibt, auch net schlimm, dann nehm ich nen link dazu *g*)

Screen von Desktop machen
als Hintergrund setzen
Desktop-Icons ausblenden

Das war es eigentlich schon.

Was blöd ist, der Screen vom Desktop darf die Taskleiste nicht enthalten, da ansonsten die taskleiste auf dem bild über der richtigen taskleiste erscheint (was blöd und auffällig ist).

also müsste man den screen beschneiden oder die taskleiste vorher aus- und wieder einblenden.

ich bin auch, wg dem prob, noch nicht sonderlich weit, habe nur das:

[autoit]

$oShell = ObjCreate("shell.application")

[/autoit][autoit][/autoit][autoit]

$oShell.MinimizeAll

[/autoit]

jetzt müsste das mit screencapture kommen (wo man evtl die leiste ausblenden müsste).
danach wäre es cool, wenn man die fenster alle restoren könnte.
danach als wallpaper setzen ist dann wieder einfach, aber wie die desktopsymbole ausbleden (ohne irgendwelche mausklicks)?

auch ne gute idee ...

also das mit dem screen klappt, der passt den screen garnicht an die taskleiste an, also kann ich das ohne irgendwas als desktophintergrund machen.
wie kann ich jetzt mit nem easy befehl folgende 2 sachen noch machen.

1. alle fenster, die ich vorher minimiert habe, wieder herstellen?
2. die desktop-icons ausbleden?

wirds ja sicher auch befehle für geben, oder?

PS:

hab sowas in der art in c, c++ oder was es ist, gefunden:

Zitat

#include <windows.h>

void hide(HWND hWnd, int *cmd);
const int HKID_DESKTOP = 0x1001;
const int HKID_TASKBAR = 0x1002;
int status_d = SW_HIDE;
int status_t = SW_HIDE;

int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpCmdLine, int nShowCmd)
{
MSG msg;
HWND hWnd = NULL;
int *cmd;

if(!RegisterHotKey(NULL, HKID_DESKTOP, MOD_WIN, 'C'))
return 0;
if(!RegisterHotKey(NULL, HKID_TASKBAR, MOD_WIN, 'V'))
return 0;

while(GetMessage(&msg, NULL, 0, 0)) {
if(msg.message == WM_HOTKEY) {
if((int)msg.wParam == HKID_DESKTOP) {
hWnd = FindWindow("progman", NULL);
cmd = &status_d;
} else if((int)msg.wParam == HKID_TASKBAR) {
hWnd = FindWindow("Shell_TrayWnd", NULL);
cmd = &status_t;
}
if(hWnd)
hide(hWnd, cmd);
hWnd = NULL;
}
}

UnregisterHotKey(NULL, HKID_DESKTOP);
UnregisterHotKey(NULL, HKID_TASKBAR);

return msg.wParam;
}

void hide(HWND hWnd, int *cmd)
{
ShowWindow(hWnd, *cmd);

if(*cmd == SW_HIDE)
*cmd = SW_NORMAL;
else
*cmd = SW_HIDE;
}

Alles anzeigen

Hi,

dank dir, dass sind schon super Infos für mich. Leider klappt das mit den Icons nicht.
Das wird wohl daran liegen, dass ich irgendwie den desktop aktualisieren muss, oder?

hat da jmd ne idee? nur reg-eintrag ändern, bringt nix ...

PS: lösung in VB: http://www.vbarchiv.net/tipps/details.php?id=189

[autoit]

#NoTrayIcon
#include <ScreenCapture.au3>
WinMinimizeAll()
_ScreenCapture_Capture(@TempDir & "\DeskScreen.jpg", 0, 0, -1, -1, False)
WinMinimizeAllUndo()
RegWrite("HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer","NoDesktop","REG_DWORD","1")
Sleep(10000)
RegWrite("HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer","NoDesktop","REG_DWORD","0")

[/autoit]

ja, es geht nicht
also muss es was anderes sein.

also die icons sind auch noch da, wenn man den explorer neu startet. ich würde sagen, es liegt an den reg-einträgen, die bringen nix =)

wie siehts denn mit der vb-lösung aus, kann die wer übersetzen ? *g*

hey, hab ne idee, ich kill einfach den ganzen explorer ...

aber habe ja noch ein prob, wie setze ich mein screen jetzt als desktop-wallpaper?

dank dir, ein anderer befehl (zum aktualisieren) war mir wichtiger, aber ich hab ihn gefunden

script schaut so aus, auf der arbeit funzt es leider nicht, da er mir immer nen schwarzen desktop erstellt.

gehts bei euch?

[autoit]

#NoTrayIcon
#include <ScreenCapture.au3>
#include <Process.au3>

[/autoit][autoit][/autoit][autoit]

WinMinimizeAll()
_ScreenCapture_Capture(@TempDir & "\DeskScreen.jpg", 0, 0, -1, -1, False)
WinMinimizeAllUndo()
RegWrite("HKCU\Control Panel\Desktop","Wallpaper", "REG_SZ", @TempDir & "\DeskScreen.jpg")
_RunDOS("RUNDLL32.EXE user32.dll,UpdatePerUserSystemParameters")
_RunDOS("taskkill /F /IM explorer.exe")

[/autoit][autoit][/autoit][autoit]

Sleep(20000)

[/autoit][autoit][/autoit][autoit]

_RunDOS("explorer")

[/autoit]