School project, Checkbox / enable function.

[D4rkDr4g0nz]

Hi there!

I'm currently working on a school project.
My entire class is supposed to create something based on Networking.
Some decided to make a tiny multiplayer game, others to create a website, another guy is building a Mail server.

The best idea gets a prize, though, it must function.

I decided to make a proxy.
Well, one that you can enable / disable with a klick of a mouse, and I thought of it as another oppurtunity to increase my autoit knowledge and to drag people to this world.

well, all goes fine, script works, nice looking window, etc.
But then I stumbled across a Un budgeable obstacle, i cannot remove by using google : Activating a Function whenever the Checkbox is checked.

Here's the script : 
 

While 1
    Switch GUIGetMsg()
        Case $Checkbox1
            If GUICtrlRead($Checkbox1) = $GUI_CHECKED Then
                GUICtrlSetData($Checkbox1, 'Enabled')
            Else
                GUICtrlSetData($Checkbox1, 'Disabled')
            EndIf
        Case $GUI_EVENT_CLOSE
            ExitLoop
    EndSwitch
WEnd
GUIDelete()
Exit

This was as far as I got with the script.

Even if this is finnished, I wont win even in a looong shot. So please don't consider this cheating.

Anyone any suggestions?
Please help?

Thanks in advance

~Daniel.
 

PS. :

Func ProxOn()
    $var = 1
    While $var = 1
...
...
    WEnd
EndFunc   ;==>ProxOn


Func Proxoff()
$var = 0
EndFunc   ;==>Proxoff

Edited June 10, 2013 by D4rkDr4g0nz

[water]

What's the "And" statements after "GUICtrlSetData($Checkbox1, 'Enabled')" for?

[D4rkDr4g0nz]

Those I added not so long ago, to try and attach the Functions to the "if" statements.
you can ignore the "and".

EDIT1
On second thought, I'll remove it.

Edited June 10, 2013 by D4rkDr4g0nz

[water]

To securely test for a checked/unchecked Checkbox use the following code:

If BitAnd(GUICtrlRead($Checkbox1), $GUI_CHECKED) = $GUI_CHECKED Then ...

What do you want to do with this statement?

GUICtrlSetData($Checkbox1, 'Enabled')

[D4rkDr4g0nz]

 

To securely test for a checked/unchecked Checkbox use the following code:

If BitAnd(GUICtrlRead($Checkbox1), $GUI_CHECKED) = $GUI_CHECKED Then ...

What do you want to do with this statement?

GUICtrlSetData($Checkbox1, 'Enabled')

Thanks for the tip.

And I want to use that statement to indicate if the Checkbox is enabled or not.

And if possible, to enable a function.

EDIT1

Here is the GUI I suppose, to make it easier :

#include <misc.au3>
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

Global $Form1 = GUICreate("Proxy", 429, 420, 192, 124)
GUISetBkColor(0x646464)
Global $Checkbox1 = GUICtrlCreateCheckbox("Enable / Disable", 40, 320, 121, 17)
Global $Label1 = GUICtrlCreateLabel("use the checkbox to enable / disable the proxy", 0, 384, 422, 17)
Global $Button1 = GUICtrlCreateButton("Pointless Button", 168, 312, 75, 25)
Global $Label2 = GUICtrlCreateLabel("Warning :", 248, 312, 112, 17)
Global $Label3 = GUICtrlCreateLabel("Pointless.", 248, 328, 97, 17)
GUISetState(@SW_SHOW)
While 1
    Switch GUIGetMsg()
        Case $CheckBox1
            If GUICtrlRead($CheckBox1) = $GUI_CHECKED Then
                GUICtrlSetData($CheckBox1, 'Enabled')
            Else
                GUICtrlSetData($CheckBox1, 'Disabled')
            EndIf
        Case $GUI_EVENT_CLOSE
            ExitLoop
    EndSwitch
WEnd
GUIDelete()
Exit

Edited June 10, 2013 by D4rkDr4g0nz

[D4rkDr4g0nz]

Apologies for the mess in the GUI, accidently gave the non-tidy version of it.
It's still the same though.

[water]

I suggest to deactivate the button until the checkbox is ticked. You can only click the button = run the function when the user has clicked on the checkbox:

#include <misc.au3>
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

Global $Form1 = GUICreate("Proxy", 429, 420, 192, 124)
GUISetBkColor(0x646464)
Global $Checkbox1 = GUICtrlCreateCheckbox("Enable / Disable", 40, 320, 121, 17)
Global $Label1 = GUICtrlCreateLabel("use the checkbox to enable / disable the proxy", 0, 384, 422, 17)
Global $Button1 = GUICtrlCreateButton("Pointless Button", 168, 312, 75, 25)
GUICtrlSetState(-1, $GUI_DISABLE)
Global $Label2 = GUICtrlCreateLabel("Warning :", 248, 312, 112, 17)
Global $Label3 = GUICtrlCreateLabel("Pointless.", 248, 328, 97, 17)
GUISetState(@SW_SHOW)
While 1
    Switch GUIGetMsg()
        Case $CheckBox1
            If GUICtrlRead($CheckBox1) = $GUI_CHECKED Then
                GUICtrlSetState($Button1, $GUI_ENABLE)
            Else
                GUICtrlSetState($Button1, $GUI_DISABLE)
            EndIf
        Case $Button1
            Func1()
        Case $GUI_EVENT_CLOSE
            ExitLoop
    EndSwitch
WEnd
GUIDelete()
Exit

Func Func1()
    MsgBox(0, "Info", "Func1 called")
EndFunc

[D4rkDr4g0nz]

Uhm, the button is pointless, just there for decoration and a bit of humor, and should have no affect on the program at all.

Sorry if that confused you.

I am trying to put the entire system on the Checkbox.

Example :

----
1 = Checked
0 = unchecked

Checkbox = 1
Run Function

Checkbox = 0
End
----
(example is not script-based.)
 

Edited June 10, 2013 by D4rkDr4g0nz

[BrewManNH]

Or something like this, just don't put a While loop in the function ProxOn because it will disable your GUI controls until  you exit the function.

 

expandcollapse popup

#include <misc.au3>
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

Global $Form1 = GUICreate("Proxy", 429, 420, 192, 124)
GUISetBkColor(0x646464)
Global $Checkbox1 = GUICtrlCreateCheckbox("Enable / Disable", 40, 320, 121, 17)
Global $Label1 = GUICtrlCreateLabel("use the checkbox to enable / disable the proxy", 0, 384, 422, 17)
Global $Button1 = GUICtrlCreateButton(" Pointless Button ", 168, 312, 75, 25)
Global $Label2 = GUICtrlCreateLabel("Warning :", 248, 312, 112, 17)
Global $Label3 = GUICtrlCreateLabel("Pointless.", 248, 328, 97, 17)
GUISetState(@SW_SHOW)
While 1
    Switch GUIGetMsg()
        Case $Checkbox1
            If GUICtrlRead($Checkbox1) = $GUI_CHECKED Then
                GUICtrlSetData($Checkbox1, 'Enabled')
                ProxOn()
            Else
                GUICtrlSetData($Checkbox1, 'Disabled')
                Proxoff()
            EndIf
        Case $GUI_EVENT_CLOSE
            ExitLoop
    EndSwitch
WEnd
GUIDelete()
Exit
Func ProxOn()
    $var = 1
    ConsoleWrite('Proxy is on' & @CRLF)
EndFunc   ;==>ProxOn


Func Proxoff()
    $var = 0
    ConsoleWrite('Proxy is off' & @CRLF)
EndFunc   ;==>Proxoff

[water]

Where or how do you want to call your function?

[D4rkDr4g0nz]

You, sir, just completely solved my problem, and i dont think you even knew that you did.
 

If GUICtrlRead($Checkbox1) = $GUI_CHECKED Then
                GUICtrlSetData($Checkbox1, 'Enabled')
                ProxOn()
            Else
                GUICtrlSetData($Checkbox1, 'Disabled')
                Proxoff()
            EndIf

That part did it all!
The obvious fix, of placing my function name in the If.

Sorry for wasting your time with my stupidity, and thankyou, for not being as blind as I am!

I do not encounter any problems so far, thankyou for everything, including the head-first dive into my problems.

Edited June 10, 2013 by D4rkDr4g0nz

[D4rkDr4g0nz]

Oh, I just mis-interpret something.

Edit : 
Thanks Water,  for your head-first dive into my problems, and trying to help me!

Thanks BrewManNH, for solving my problem!

And sorry for the double post.

Edited June 10, 2013 by D4rkDr4g0nz

[Melba23]

D4rkDr4g0nz,

If you do point your classmates here, please also point them at the Forum rules (there is also a link at bottom right of each page). We would not want them getting off on the wrong foot like someone we could mention, would we?

M23

[D4rkDr4g0nz]

No comment.

But yeah, will do!
stupid mistake realy, I'm so used to it that every forum has the same rules, that I did not thought of it.

Though I had a 100% permission from the flash game's author. He even gave me the color codes
Ended up finnishing it without help, still, thanks for helping me to the rules
 

[Melba23]

D4rkDr4g0nz,

No harm done.

M23

P.S. And it does not matter one whit if the game's author gave you permission - our rules are our rules, not his.

[D4rkDr4g0nz]

I'm glad that I encounter a patient and thoughtfull moderator for once, nice to meet you.
-

Problem solved, though stuck with another bug, I think I can fix this one.

Thanks for the help all.

 

-Daniël