Windows 7 Forums

Welcome to Windows 7 Forums. Our forum is dedicated to helping you find support and solutions for any problems regarding your Windows 7 PC be it Dell, HP, Acer, Asus or a custom build. We also provide an extensive Windows 7 tutorial section that covers a wide range of tips and tricks.


Windows 7: StartOrbz - Start Orb Manager & Creator

23 Feb 2010   #21
dmex

 

Quote   Quote: Originally Posted by Blizarro View Post
I didnt want to make that public since im not sure it will work. Oh well.

Tell me what you guys think.
It really needs a 'Restore Defaults' button

kinda ended up looking through the source code to find what it was doing and hopefully revert the changes after I tried it, luckily you create the backup of explorer.exe

I dont think its using the right resource offset since it left my Start Icon like this:

StartOrbz - Start Orb Manager & Creator-smenu.jpg

I also noticed the KillsExplorer function doesn't cleanly exit explorer but merely kills it

It looks like your using VB so heres the code you require to exit explorer cleanly.

Code:
    Imports System.ComponentModel
    Imports System.Runtime.InteropServices


    Private Const WM_QUIT As UInt32 = &H12

    <DllImport("user32.dll", SetLastError:=True, CharSet:=CharSet.Auto)> _
    Private Shared Function PostMessage(ByVal hWnd As IntPtr, ByVal Msg As UInteger, ByVal wParam As IntPtr, ByVal lParam As IntPtr) As Boolean
    End Function

    <DllImport("user32.dll", EntryPoint:="FindWindow", SetLastError:=True, CharSet:=CharSet.Auto)> _
    Private Shared Function FindWindowByClass(ByVal lpClassName As String, ByVal zero As IntPtr) As IntPtr
    End Function

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
       
        Dim pExplorer As IntPtr = FindWindowByClass("Progman", IntPtr.Zero)
        If Not pExplorer = IntPtr.Zero Then

            Dim result = PostMessage(pExplorer, WM_QUIT, IntPtr.Zero, IntPtr.Zero)
            If result Then
                'do something here, explorer has exited
            Else
                Throw New Win32Exception(Marshal.GetLastWin32Error())
            End If
        Else
            Throw New Win32Exception(Marshal.GetLastWin32Error())
        End If

    End Sub
If you need code for anything then let me know and ill be happy to help




My System SpecsSystem Spec
.
23 Feb 2010   #22
The444

w7 ultimate
 
 

please could i test this for you also ?
My System SpecsSystem Spec
23 Feb 2010   #23
dmex

 

Quote   Quote: Originally Posted by The444 View Post
please could i test this for you also ?
Link is above

I forgot to say Im running Win7 x64.
My System SpecsSystem Spec
.

23 Feb 2010   #24
Blizarro

Windows 7 Ultimate x86
 
 

Quote   Quote: Originally Posted by dmex View Post
Quote   Quote: Originally Posted by Blizarro View Post
I didnt want to make that public since im not sure it will work. Oh well.

Tell me what you guys think.
It really needs a 'Restore Defaults' button

kinda ended up looking through the source code to find what it was doing and hopefully revert the changes after I tried it, luckily you create the backup of explorer.exe

I dont think its using the right resource offset since it left my Start Icon like this:

Attachment 56082

I also noticed the KillsExplorer function doesn't cleanly exit explorer but merely kills it

It looks like your using VB so heres the code you require to exit explorer cleanly.

Code:
    Imports System.ComponentModel
    Imports System.Runtime.InteropServices
 
 
    Private Const WM_QUIT As UInt32 = &H12
 
    <DllImport("user32.dll", SetLastError:=True, CharSet:=CharSet.Auto)> _
    Private Shared Function PostMessage(ByVal hWnd As IntPtr, ByVal Msg As UInteger, ByVal wParam As IntPtr, ByVal lParam As IntPtr) As Boolean
    End Function
 
    <DllImport("user32.dll", EntryPoint:="FindWindow", SetLastError:=True, CharSet:=CharSet.Auto)> _
    Private Shared Function FindWindowByClass(ByVal lpClassName As String, ByVal zero As IntPtr) As IntPtr
    End Function
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
 
        Dim pExplorer As IntPtr = FindWindowByClass("Progman", IntPtr.Zero)
        If Not pExplorer = IntPtr.Zero Then
 
            Dim result = PostMessage(pExplorer, WM_QUIT, IntPtr.Zero, IntPtr.Zero)
            If result Then
                'do something here, explorer has exited
            Else
                Throw New Win32Exception(Marshal.GetLastWin32Error())
            End If
        Else
            Throw New Win32Exception(Marshal.GetLastWin32Error())
        End If
 
    End Sub
If you need code for anything then let me know and ill be happy to help

Thanks for the code. I already coded a real restore button. I will release later. Im going to pull the file from DA
My System SpecsSystem Spec
25 Feb 2010   #25
Blizarro

Windows 7 Ultimate x86
 
 

Ok, I updated the program. A lot of changes made.

StartOrbz by ~Blizo on deviantART
My System SpecsSystem Spec
25 Feb 2010   #26
Aero

Windows 7 Ultimate 64-Bit
 
 

Hmm... looks nice, Better then the other ones (e.g: Kishan's Start Orb Changer) from the looks of the screenshots. Could I be a tester too?
My System SpecsSystem Spec
25 Feb 2010   #27
severdever

Windows 7 Ultimate x64
 
 

This looks like the perfect peice of software to fulfill everyone's need to customize the start orb with their own image!

I'd love to test this software, please send me the link!
My System SpecsSystem Spec
25 Feb 2010   #28
Anthony

Microsoft Community Contributor Award Recipient

MS Windows 7 Professional 64-bit SP1
 
 

Link 2 posts above yours
My System SpecsSystem Spec
25 Feb 2010   #29
valtonray

Windows 7 Ultimate Signature Edition
 
 

very nice look forward to seeing this.
My System SpecsSystem Spec
25 Feb 2010   #30
severdever

Windows 7 Ultimate x64
 
 

Quote   Quote: Originally Posted by Anthony View Post
Link 2 posts above yours
Thanks...
It doesnt seem to work though, when i click apply startorb it just restarts explorer.exe, and then there is a blank space were it should be!

Please someone help me?
My System SpecsSystem Spec
Reply

 StartOrbz - Start Orb Manager & Creator




Thread Tools




Similar help and support threads
Thread Forum
StartOrbz Genuine Creations
Welcome to the official StartOrbz image set downloads area. To get the ball rolling im uploading some "test" creations that I made while testing StartOrbz. Right click on any Start Orb Set and download the png. Then use the import feature to add it to your collection. Enjoy! You can...
Customization
Boot manager at start up with only one OS
My laptop sony vaio VPCEL24FX window 7 home premium 64 bit, has this boot manager that keeps poping up on startup. I have search the window seven forums and found several post with the same topics, the only differences is that the issue is for dual boots. I only have one OS which is the window 7...
General Discussion
Desktop Windows Manager Session Manager service can't start or crashes
Hi There, I have started getting this message "desktop windows manager has stopped working" a few weeks ago and since then I can't use the Aero desktop properly. When I tried to open the Services in device manager they wouldn't open and I followed a few links and tries to solve the issue. After...
Themes and Styles
StartOrbz Error (Was unable to unlock explorer.exe)
Hi! I just downloaded StartOrbz Studio, but when I try to change my Start Orb, an error appears. If anyone knows how to fix it, please tell me :/ This is the error and my current processes: Thanks!
Customization
Start Task Manager is shadowed out
Earlier you assisted me in retrieving several missing Start > Power buttons. Now I noticed that when I right-click the task bar, "Start Task Manager" is shadowed out and I don't have access to it. Do you have a fix for this too?
BSOD Help and Support
Task manager won't start
I try to start the task manager, from desktop or Ctrl+Alt+Del and it will not pop up. Someone said it could be disabled so I used a registry key settings file to enable it but this has not worked. Now I am getting this message: (See attached screenshot) Any help is appreciated. ;)
BSOD Help and Support


Our Sites

Site Links

About Us

Find Us

Windows 7 Forums is an independent web site and has not been authorized, sponsored, or otherwise approved by Microsoft Corporation. "Windows 7" and related materials are trademarks of Microsoft Corp.

Designer Media Ltd

All times are GMT -5. The time now is 07:39.
Twitter Facebook Google+ Seven Forums iOS App Seven Forums Android App