start actual screensaver - how to ?

Archive: start actual screensaver - how to ?

Brummelchen
7th June 2004 19:02 UTC

start actual screensaver - how to ?
i found this code in antoher forum:

SendMessage(hWnd, 0x112, 0xF140, 0);

it should start the actual SS

how to in nsis ???

thx

Yathosho
7th June 2004 22:41 UTC

why dont you just read the registry for the current screensaver and launch it with ExecShell?

Brummelchen
7th June 2004 22:45 UTC

<lol> nice idea - better it is...

thx

(ps i know where to look)

Anders
7th June 2004 22:49 UTC

why go in the registry when u can just do:
SendMessage $HWNDPARENT 0x112 0xF140 0

Brummelchen
7th June 2004 22:56 UTC

Function .onInit
  ; check screen saver
  check1:
  ClearErrors
    ReadRegStr $INSTDIR HKCU "Control Panel\Desktop" "SCRNSAVE.EXE"
  IfErrors check2 ; not found
    StrCmp $INSTDIR "" check2 ; not set

  ;control file
  IfFileExists $INSTDIR 0 check2

  ;start screensaver
  Exec '"$INSTDIR" /S'

  ;error
  check2:
    Quit
FunctionEnd

HTH

Brummelchen
7th June 2004 23:01 UTC

>> SendMessage $HWNDPARENT 0x112 0xF140 0

does not work here, dunno why...

Function .onInit
;start screensaver
SendMessage $HWNDPARENT 0x112 0xF140 0
FunctionEnd

iceman_k
8th June 2004 03:02 UTC

That's because the installer window has not yet been created when .onInit is called.
Try putting it in .onGUIInit:


Function .onGuiInit
  SendMessage $HWNDPARENT 0x112 0xF140 0
FunctionEnd

or, if you are using MUI, something like:


!define MUI_CUSTOMFUNCTION_GUIINIT myGuiInit
Function myGuiInit
  SendMessage $HWNDPARENT 0x112 0xF140 0
FunctionEnd

Brummelchen
8th June 2004 03:37 UTC

that works :)

disadvatage - i see for a short period the gui - my first version did not

Yathosho
8th June 2004 04:15 UTC

use SilentInstall

iceman_k
8th June 2004 04:18 UTC

Your first version did not show the GUI because (surprise!) it had not yet been created in the .onInit function.
Why do you need to start the screensaver when you kick off your installer, anyway? Seems to be a counter-intuitive thing to do.

Brummelchen
8th June 2004 17:37 UTC

>> Why do you need to start the screensaver when you kick off your installer, anyway?

i am really off with my tools - this is no part of any installer .- this was a question from another forum some1 requestet "actually SS starts on desktop link"

Setups are not my favorite time wasters - i create some 3rd party apps for my mailer with nsis - i used winbatch before but nsis ist much smaller and more flexible

eg. i have a selfmade updater for mcafee sdat & stinger
or backup program for my mailer

btw SilentInstall does nothing - no ss started instead w/o

Anders
9th June 2004 01:05 UTC

if u want to start it without showing the installer u could call GetDesktopWindow with the system plugin 2 get a handle, or u can try calling DefWindowProc with the system plugin passing 0 as the hwnd (might work, not tried this :) )

deguix
9th June 2004 03:33 UTC

Try using SilentInstall silent in your installer outside sections and functions with SendMessage 0 0x112 0xF140 0 inside the .onInit callback function. (like Anders suggested, without System plugin codes and using SendMessage command)

Anders
9th June 2004 15:58 UTC

try this:
SendMessage 0xFFFF 0x112 0xF140 0

and if that doesnt work do:
System::Call 'user32::GetDesktopWindow() i .r0'
SendMessage $0 0x112 0xF140 0

Brummelchen
10th June 2004 00:04 UTC

try it yourself "silentinstall" NEVER works here :/

;--------------------------------
;Configuration

!define PRODUCT "Start Screensaver"
!define VERSION "1.0"

Name "Start Screensaver 1.0"
Caption "Start Screensaver 1.0"
OutFile "startscr1.exe"

; automatically close the installer when done.
AutoCloseWindow true

; hide the "show details" box
ShowInstDetails nevershow

SilentInstall silent
;--------------------------------
;Languages

BrandingText " Copyright 2003-2004 Brummelchen "

;--------------------------------
;Pages

;--------------------------------
;Installer Sections

Section ""
SectionEnd

;--------------------------------
;Installer Functions

Function .onGuiInit
  System::Call 'user32::GetDesktopWindow() i .r0'
  SendMessage $0 0x112 0xF140 0
FunctionEnd

Function .onGUIEnd
  Delete $pluginsdir\*.*
  RMdir $PLUGINSDIR
FunctionEnd

;)

Anders
10th June 2004 01:54 UTC

yeah, ur code doesnt work, but do u have to call it in .onGuiInit?

this code works just fine for me:

!define APP_NAME "Start SS"
Name "${APP_NAME}"
OutFile "${APP_NAME}.exe"
InstallDir "$PROGRAMFILES\nsis test\${APP_NAME}"
SilentInstall silent
Page instfiles
Section
SendMessage 0xFFFF 0x112 0xF140 0
SectionEnd

Brummelchen
10th June 2004 03:14 UTC

this was a suggest above - first version works fine...

i dont work with sections if not needed...

deguix
10th June 2004 12:18 UTC

Mine and Anders' suggestions won't work because (surprise!) SilentInstall silent makes the installer to don't create a GUI. Solution: Put the .onGuiInit code inside Function .onInit.

Brummelchen
14th June 2004 22:13 UTC

i should be able to notice that <omg>
thx for that hint - learned something new :)