Sign in to follow this  
Followers 0
Ibrahim

Still my problem not solved

15 posts in this topic

#include <GUIConstants.au3>

$gui = GUICreate ("The fucken application", 550, 490)
; background picture
$background = GUICtrlCreatePic ("prog.cap", 0, 0, 550, 396)
GUISetState (@SW_SHOW)
$Pressed = 0

; transparent child window
;$pic=GUICreate("", 14, 80, 0, 0,$WS_POPUP,$WS_EX_LAYERED+$WS_EX_MDICHILD,$gui)

$Button_IV_m = 1
$Button_IV_n = 2
$Button_IV_o = 3
$Button_IV_p = 4
$Button_VII_q = 5
$Button_VII_r = 6
$Button_VII_s = 7
$Button_VII_t = 8

$Button_VIII_u = 9
$Button_VIII_v = 10
$Button_VIII_w = 11
$Button_VIII_x = 12

$Button_IX_a = 13
$Button_IX_b = 14
$Button_IX_c = 15
$Button_IX_d = 16


$Button_1 = GUICtrlCreateButton ("Run &Notepad", 10, 400, 100, 25)
$Button_2 = GUICtrlCreateButton ("Check &Mail", 10, 430, 100, 25)
$Button_3 = GUICtrlCreateButton ("Messenger&", 10, 460, 100, 25)

$Button_IV = GUICtrlCreateButton ("&C++", 115, 400, 100, 25)
$Button_5 = GUICtrlCreateButton ("Scite", 115, 430, 100, 25)
$Button_6 = GUICtrlCreateButton ("Autoplay", 115, 460, 100, 25)

$Button_VII = GUICtrlCreateButton ("Messenger", 220, 400, 100, 25)
$Button_VIII = GUICtrlCreateButton ("&Office", 220, 430, 100, 25)
$Button_IX = GUICtrlCreateButton ("Check Mail.", 220, 460, 100, 25)
$Label1 = GUICtrlCreateLabel ("Your Text Goes here", 30, 31, 201, 215)
;GUISetBkColor (0xE00dddd)
call ("Main")
GUICtrlSetData ($Label1, "My Name Is Earl")
; transparent pic
;$basti_stay = GUICtrlCreatePic ("G:\Photos\جديد\Icons.bmp", 0, 0, 635, 576)
GUISetState (@SW_SHOW)
Func Clear()
if $Pressed = 9 Then
GUICtrlDelete ($Button_IX_d)
sleep (50)
GUICtrlDelete ($Button_IX_c)
sleep (50)
GUICtrlDelete ($Button_IX_B)
sleep (50)
GUICtrlDelete ($Button_IX_a)
sleep (250)
EndIf
if $Pressed = 7 Then
GUICtrlDelete ($Button_VII_t)
sleep (50)
GUICtrlDelete ($Button_VII_s)
sleep (50)
GUICtrlDelete ($Button_VII_r)
sleep (50)
GUICtrlDelete ($Button_VII_q)
sleep (250)
EndIf
if $Pressed = 8 Then
GUICtrlDelete ($Button_VIII_x)
sleep (50)
GUICtrlDelete ($Button_VIII_w)
sleep (50)
GUICtrlDelete ($Button_VIII_v)
sleep (50)
GUICtrlDelete ($Button_VIII_u)
sleep (250)
EndIf
if $Pressed = 4 Then
GUICtrlDelete ($Button_IV_p)
GUICtrlDelete ($Button_VII)
$Button_VII = GUICtrlCreateButton ("Messenger", 385, 400, 100, 25)
sleep (50)
GUICtrlDelete ($Button_IV_o)
GUICtrlDelete ($Button_VII)
$Button_VII = GUICtrlCreateButton ("Messenger", 330, 400, 100, 25)
sleep (50)
GUICtrlDelete ($Button_IV_n)
GUICtrlDelete ($Button_VII)
$Button_VII = GUICtrlCreateButton ("Messenger", 275, 400, 100, 25)
sleep (50)
GUICtrlDelete ($Button_IV_m)
GUICtrlDelete ($Button_VII)
$Button_VII = GUICtrlCreateButton ("Messenger", 220, 400, 100, 25)
sleep (250)

EndIf
EndFunc ;==>Clear
GUISetState ()
Func Main()
While 1
$msg = GUIGetMsg ()
if $msg = $GUI_EVENT_CLOSE then Exit
if $msg = $Button_1 then
call ("Clear")
Run ('Notepad.exe') ; Will Run/Open Notepad
$Pressed = 1
EndIf
if $msg = $Button_2 then
call ("Clear")
GUICtrlSetData ($Label1, "You've Pressed Check My Mail")
$Pressed = 2
EndIf
if $msg = $Button_VIII then
call ("Clear")
$Button_VIII_u = GUICtrlCreateButton ("Word", 325, 430, 50, 25)
sleep (50)
$Button_VIII_v = GUICtrlCreateButton ("Excel", 380, 430, 50, 25)
sleep (50)
$Button_VIII_w = GUICtrlCreateButton ("Access", 435, 430, 50, 25)
sleep (50)
$Button_VIII_x = GUICtrlCreateButton ("P.Point", 490, 430, 50, 25)
$Pressed = 8
GUICtrlSetData ($Label1, "You've Pressed Ms Office")
call ("Main")
endif
if $msg = $Button_VIII_u then MsgBox (0, 'Testing', '8a')
if $msg = $Button_VIII_v then MsgBox (0, 'Testing', '8b') ; Will demonstrate Button 2 being pressed
if $msg = $Button_VIII_w then MsgBox (0, 'Testing', '8c')
if $msg = $Button_VIII_x then MsgBox (0, 'Testing', '8d')
;___________________________________________________________________________________________________
_____ 4

if $msg = $Button_IV then Call ("Four")

;___________________________________________________________________________________________________
_____________VII

if $msg = $Button_VII then

Dim $msg = $Button_VII
call ("Clear")
$Button_VII_q = GUICtrlCreateButton ("Yahoo", 325, 400, 50, 25)
sleep (50)
$Button_VII_r = GUICtrlCreateButton ("MSN", 380, 400, 50, 25)
sleep (50)
$Button_VII_s = GUICtrlCreateButton ("Gmail", 435, 400, 50, 25)
sleep (50)
$Button_VII_t = GUICtrlCreateButton ("Web", 490, 400, 50, 25)
$msg = GUIGetMsg ()
$Pressed = 7
Dim $msg = $Button_VII
call ("Main")

EndIf
if $msg = $Button_VII_q then MsgBox (0, 'Testing', 'yahoob')
if $msg = $Button_VII_r then MsgBox (0, 'Testing', 'Bmsn msned') ; Will demonstrate Button 2 being pressed
if $msg = $Button_VII_s then MsgBox (0, "", '7c')
if $msg = $Button_VII_t then MsgBox (0, "", '7c')
;___________________________________________________________________________________________________
__________________________IX

if $msg = $Button_IX then
call ("Clear")
$Button_IX_a = GUICtrlCreateButton ("Yahoo", 325, 460, 50, 25)
sleep (50)
$Button_IX_b = GUICtrlCreateButton ("Hotmail", 380, 460, 50, 25)
sleep (50)
$Button_IX_c = GUICtrlCreateButton ("Gmail", 435, 460, 50, 25)
sleep (50)
$Button_IX_d = GUICtrlCreateButton ("Maktoob", 490, 460, 50, 25)
$Pressed = 9
call ("Main")

EndIf
if $msg = $Button_IX_a then MsgBox (0, 'Testing', 'mail9a')
if $msg = $Button_IX_b then MsgBox (0, 'Testing', 'mail9b') ; Will demonstrate Button 2 being pressed
if $msg = $Button_IX_c then MsgBox (0, 'Testing', 'mail9c')
if $msg = $Button_IX_d then MsgBox (0, 'Testing', 'mail9d')

Wend

EndFunc ;==>Main

Func Four()
call ("Clear")
$msg = ""
GUICtrlDelete ($Button_VII)
$Button_IV_m = GUICtrlCreateButton ("Browse", 220, 400, 50, 25)
$Button_VII = GUICtrlCreateButton ("Messenger", 275, 400, 100, 25)
sleep (50)
GUICtrlDelete ($Button_VII)
$Button_IV_n = GUICtrlCreateButton ("Compile", 275, 400, 50, 25)
$Button_VII = GUICtrlCreateButton ("Messenger", 330, 400, 100, 25)
sleep (50)
GUICtrlDelete ($Button_VII)
$Button_IV_o = GUICtrlCreateButton ("Edit", 330, 400, 50, 25)
$Button_VII = GUICtrlCreateButton ("Messenger", 385, 400, 100, 25)
sleep (50)
GUICtrlDelete ($Button_VII)
$Button_IV_p = GUICtrlCreateButton ("Tidy", 385, 400, 50, 25)
$Button_VII = GUICtrlCreateButton ("Messenger", 440, 400, 100, 25)
$Pressed = 4
GUICtrlSetData ($Label1, "You've Pressed C")


while 1
$msg = GUIGetMsg ()
Select
Case $msg = $Button_IV_m
MsgBox (0, 'Testing', 'cccccccc4a')
Case $msg = $Button_IV_n
MsgBox (0, 'Testing', 'cccccccc4b')
Case $msg = $Button_IV_o
MsgBox (0, 'Testing', 'ccccccccc4c')
Case $msg = $Button_IV_p
MsgBox (0, 'Testing', 'cccccccccccc4d')
Case Else
call ("Main")
$msg = ""
EndSelect
WEnd
EndFunc ;==>Four
[font="Arial Black"][/font][size="6"][/size]

This was my code and when i press $button_VII it goes for a function in another one donot know why and the same with other buttons please i need help

Share this post


Link to post
Share on other sites



Some form of formatting would be nice .

For

example

If

I wrote

everything in

this

message

like this,

Then you'd

probly

find

it

hard to read.

Some formatting makes it a little easier to follow where a function or loop starts and finishes.

I looked at your post last time you posted, but the way your code is written just made give up on it before I started.

I don't mean to be offensive when I say this, that's just me though , to each his own.

Someone will probly happen along soon and actually be helpfull :)

Till then

Cheers

Share this post


Link to post
Share on other sites

#4 ·  Posted (edited)

Sorry I couldn't get my mind around the roman numerals as ctrl identifiers..

Maybe you could try creating all the controls from the start of the script, then using hide and show ctrl instead of delete ctrl.

Edit: I added four buttons to every main button , click any button and the label tells you last button clicked.

Basically it does the same as your script Ibrahim, but with more added buttons.. use it ase a template if you like.

Just give the buttons the names you want and ad what you want the button to do.

#include <GUIConstants.au3>

Global $Button[46], $Expand[9]

$gui = GUICreate ("The Censored Application", 550, 490)
$Label_1 = GUICtrlCreateLabel ("Your Text Goes here", 30, 31, 201, 215)
$Button[1] = GUICtrlCreateButton ("Run &Notepad", 10, 400, 100, 25)
$Button[2] = GUICtrlCreateButton ("Check &Mail", 10, 430, 100, 25)
$Button[3] = GUICtrlCreateButton ("Messenger&", 10, 460, 100, 25)
$Button[4] = GUICtrlCreateButton ("&C++", 115, 400, 100, 25)
$Button[5] = GUICtrlCreateButton ("Scite", 115, 430, 100, 25)
$Button[6] = GUICtrlCreateButton ("Autoplay", 115, 460, 100, 25)
$Button[7] = GUICtrlCreateButton ("Messenger", 220, 400, 100, 25)
$Button[8] = GUICtrlCreateButton ("&Office", 220, 430, 100, 25)
$Button[9] = GUICtrlCreateButton ("Check Mail.", 220, 460, 100, 25)
$Button[10] = GUICtrlCreateButton('Npad 1', 115, 400, 50, 25)
$Button[11] = GUICtrlCreateButton('Npad 2', 170, 400, 50, 25)
$Button[12] = GUICtrlCreateButton('Npad 3', 225, 400, 50, 25)
$Button[13] = GUICtrlCreateButton('Npad 4', 280, 400, 50, 25)
$Button[14] = GUICtrlCreateButton('CMail 1', 115, 430, 50, 25)
$Button[15] = GUICtrlCreateButton('CMail 2', 170, 430, 50, 25)
$Button[16] = GUICtrlCreateButton('CMail 3', 225, 430, 50, 25)
$Button[17] = GUICtrlCreateButton('CMail 4', 280, 430, 50, 25)
$Button[18] = GUICtrlCreateButton('Msgr 1', 115, 460, 50, 25)
$Button[19] = GUICtrlCreateButton('Msgr 2', 170, 460, 50, 25)
$Button[20] = GUICtrlCreateButton('Msgr 3', 225, 460, 50, 25)
$Button[21] = GUICtrlCreateButton('Msgr 4', 280, 460, 50, 25)
$Button[22] = GUICtrlCreateButton('Browse', 220, 400, 50, 25)
$Button[23] = GUICtrlCreateButton('Compile', 275, 400, 50, 25)
$Button[24] = GUICtrlCreateButton('Edit', 330, 400, 50, 25)
$Button[25] = GUICtrlCreateButton('Tidy', 385, 400, 50, 25)
$Button[26] = GUICtrlCreateButton('Scite 1', 220, 430, 50, 25)
$Button[27] = GUICtrlCreateButton('Scite 2', 275, 430, 50, 25)
$Button[28] = GUICtrlCreateButton('Scite 3', 330, 430, 50, 25)
$Button[29] = GUICtrlCreateButton('Scite 4', 385, 430, 50, 25)
$Button[30] = GUICtrlCreateButton('Aplay 1', 220, 460, 50, 25)
$Button[31] = GUICtrlCreateButton('Aplay 2', 275, 460, 50, 25)
$Button[32] = GUICtrlCreateButton('Aplay 3', 330, 460, 50, 25)
$Button[33] = GUICtrlCreateButton('Aplay 4', 385, 460, 50, 25)
$Button[34] = GUICtrlCreateButton('Yahoo', 325, 400, 50, 25)
$Button[35] = GUICtrlCreateButton('MSN', 380, 400, 50, 25)
$Button[36] = GUICtrlCreateButton('Gmail', 435, 400, 50, 25)
$Button[37] = GUICtrlCreateButton('Web', 490, 400, 50, 25)
$Button[38] = GUICtrlCreateButton('Word', 325, 430, 50, 25)
$Button[39] = GUICtrlCreateButton('Excel', 380, 430, 50, 25)
$Button[40] = GUICtrlCreateButton('Access', 435, 430, 50, 25)
$Button[41] = GUICtrlCreateButton('P.Point', 490, 430, 50, 25)
$Button[42] = GUICtrlCreateButton('Yahoo', 325, 460, 50, 25)
$Button[43] = GUICtrlCreateButton('Hotmail', 380, 460, 50, 25)
$Button[44] = GUICtrlCreateButton('Gmail', 435, 460, 50, 25)
$Button[45] = GUICtrlCreateButton('Maktoob', 490, 460, 50, 25)
For $p = 10 To 45
    GUICtrlSetState($Button[$p], $GUI_HIDE + $GUI_DISABLE)
Next
GUISetState (@SW_SHOW)

While 1
    $msg = GUIGetMsg()
    Select
        Case $msg = $GUI_EVENT_CLOSE
            Exit
        Case $msg = $Button[1]
            GUICtrlSetData($Label_1, 'Last Button Pressed: Run Notepad')
            Expand(0, 10, 13)
        Case $msg = $Button[2]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Check Mail")
            Expand(1, 14, 17)
        Case $msg = $Button[3]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Messenger")
            Expand(2, 18, 21)
        Case $msg = $Button[4]
            GUICtrlSetData ($Label_1, "Last Button Pressed: C++")
            Expand(3, 22, 25)
        Case $msg = $Button[5]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Scite")
            Expand(4, 26, 29)
        Case $msg = $Button[6]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Autoplay")
            Expand(5, 30, 33)
        Case $msg = $Button[7]
            GUICtrlSetData ($Label_1, "Last Button Pressed: MessengerX")
            Expand(6, 34, 37)
        Case $msg = $Button[8]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Office")
            Expand(7, 38, 41)
        Case $msg = $Button[9]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Check Mail")
            Expand(8, 42, 45)
        Case $msg = $Button[10]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Npad 1")
        Case $msg = $Button[11]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Npad 2")
        Case $msg = $Button[12]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Npad 3")
        Case $msg = $Button[13]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Npad 4")
        Case $msg = $Button[14]
            GUICtrlSetData ($Label_1, "Last Button Pressed: CMail 1")
        Case $msg = $Button[15]
            GUICtrlSetData ($Label_1, "Last Button Pressed: CMail 2")
        Case $msg = $Button[16]
            GUICtrlSetData ($Label_1, "Last Button Pressed: CMail 3")
        Case $msg = $Button[17]
            GUICtrlSetData ($Label_1, "Last Button Pressed: CMail 4")
        Case $msg = $Button[18]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Msgr 1")
        Case $msg = $Button[19]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Msgr 2")
        Case $msg = $Button[20]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Msgr 3")
        Case $msg = $Button[21]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Msgr 4")
        Case $msg = $Button[22]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Browse")
        Case $msg = $Button[23]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Compile")
        Case $msg = $Button[24]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Edit")
        Case $msg = $Button[25]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Tidy")
        Case $msg = $Button[26]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Scite 1")
        Case $msg = $Button[27]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Scite 2")
        Case $msg = $Button[28]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Scite 3")
        Case $msg = $Button[29]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Scite 4")
        Case $msg = $Button[30]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Aplay 1")
        Case $msg = $Button[31]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Aplay 2")
        Case $msg = $Button[32]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Aplay 3")
        Case $msg = $Button[33]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Aplay 4")
        Case $msg = $Button[34]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Yahoo")
        Case $msg = $Button[35]
            GUICtrlSetData ($Label_1, "Last Button Pressed: MSN")
        Case $msg = $Button[36]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Gmail")
        Case $msg = $Button[37]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Web")
        Case $msg = $Button[38]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Word")
        Case $msg = $Button[39]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Excel")
        Case $msg = $Button[40]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Access")
        Case $msg = $Button[41]
            GUICtrlSetData ($Label_1, "Last Button Pressed: P.Point")
        Case $msg = $Button[42]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Yahoo")
        Case $msg = $Button[43]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Hotmail")
        Case $msg = $Button[44]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Gmail")
        Case $msg = $Button[45]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Maktoob")
    EndSelect
WEnd

Func Expand($0, $1, $2)
    $y = ''
    If $0 = 0 Or $0 = 3 Then $y = 400
    If $0 = 1 Or $0 = 4 Then $y = 430
    If $0 = 2 Or $0 = 5 Then $y = 460
    If $Expand[$0] = 0 Then
        If $Expand[0] = 1 Then Expand(0, 10, 13)
        If $Expand[1] = 1 Then Expand(1, 14, 17)
        If $Expand[2] = 1 Then Expand(2, 18, 21)
        If $Expand[3] = 1 Then Expand(3, 22, 25)
        If $Expand[4] = 1 Then Expand(4, 26, 29)
        If $Expand[5] = 1 Then Expand(5, 30, 33)
        If $Expand[6] = 1 Then Expand(6, 34, 37)
        If $Expand[7] = 1 Then Expand(7, 38, 41)
        If $Expand[8] = 1 Then Expand(8, 42, 45)
        $Expand[$0] = 1
        $x = 275
        For $s = $1 To $2
            GUICtrlSetState($Button[$s], $GUI_ENABLE + $GUI_SHOW)
            If $0 = 0 Or $0 = 1 Or $0 = 2 Then 
                GUICtrlSetPos($Button[$0 + 4], $x -105, $y, 100, 25)
                GUICtrlSetPos($Button[$0 + 7], $x, $y, 100, 25)
            ElseIf $0 = 3 Or $0 = 4 Or $0 = 5 Then
                GUICtrlSetPos($Button[$0 + 4], $x, $y, 100, 25)
            EndIf   
            $x = $x + 55
            Sleep(50)
        Next
    ElseIf $Expand[$0] = 1 Then
        $Expand[$0] = 0
        $x = 385
        For $s = $2 To $1 Step -1
            GUICtrlSetState($Button[$s], $GUI_HIDE + $GUI_DISABLE)
            If $0 = 0 Or $0 = 1 Or $0 = 2 Then 
                GUICtrlSetPos($Button[$0 + 4], $x -105, $y, 100, 25)
                GUICtrlSetPos($Button[$0 + 7], $x, $y, 100, 25)
            ElseIf $0 = 3 Or $0 = 4 Or $0 = 5 Then
                GUICtrlSetPos($Button[$0 + 4], $x, $y, 100, 25)
            EndIf   
            $x = $x - 55
            Sleep(50)
        Next
    EndIf
EndFunc

I haven't checked out your attached script yet, I'll have a look now :)

Edit: added buttons to all main buttons :D

If you want explanations to how the expand functions work then just ask and I'll do my best to explain.

Edit: Made the expand functions into 1 function :D

Cheers.

Edited by smashly

Share this post


Link to post
Share on other sites

My best advice is to clean up your code. If you get to a point where you have trouble try to recreate it with a simpel sample.

How am I suposed to read this?

EndFunc   ;==>Clear
GUISetState()
Func Main()oÝ÷ Ù.(!µÊ'²'^­è­¥ªí¡ü¨º»Z²×¨®Ëræî¶ë"Z®¢×îËb¢yÚꮢÜ"Y趭Ê(^¨ç(g§¶Ì(é]méâq殶­s`uT7G&ÄFVÆWFRb33c´'WGFöåõd b33c´'WGFöåôeöÒÒuT7G&Ä7&VFT'WGFöâgV÷C´'&÷w6RgV÷C²Â##ÂCÂSÂ#R b33c´'WGFöåõdÒuT7G&Ä7&VFT'WGFöâgV÷C´ÖW76VævW"gV÷C²Â#sRÂCÂÂ#R 6ÆVWS uT7G&ÄFVÆWFRb33c´'WGFöåõd b33c´'WGFöåôeöâÒuT7G&Ä7&VFT'WGFöâgV÷C´6ö×ÆRgV÷C²Â#sRÂCÂSÂ#R b33c´'WGFöåõdÒuT7G&Ä7&VFT'WGFöâgV÷C´ÖW76VævW"gV÷C²Â33ÂCÂÂ#R 6ÆVWS uT7G&ÄFVÆWFRb33c´'WGFöåõd b33c´'WGFöåôeöòÒuT7G&Ä7&VFT'WGFöâgV÷C´VFBgV÷C²Â33ÂCÂSÂ#R b33c´'WGFöåõdÒuT7G&Ä7&VFT'WGFöâgV÷C´ÖW76VævW"gV÷C²Â3RÂCÂÂ#R 6ÆVWS uT7G&ÄFVÆWFRb33c´'WGFöåõd b33c´'WGFöåôe÷ÒuT7G&Ä7&VFT'WGFöâgV÷CµFGgV÷C²Â3RÂCÂSÂ#R b33c´'WGFöåõdÒuT7G&Ä7&VFT'WGFöâgV÷C´ÖW76VævW"gV÷C²ÂCCÂCÂÂ#R b33cµ&W76VBÒ@ uT7G&Å6WDFFb33c´Æ&VÃÂgV÷Cµ÷Rb33·fR&W76VB2gV÷C²

Why all the destroy create destroy create stuff?

Share this post


Link to post
Share on other sites

@ Uten , so it wasn't just me with a low experience level of scripting that found Ibrahim script style hard to understand..lol

Must admit I have no neat or great style either , but I can usually follow the start and end of a function or loop in most cases, but not this time.

I was surprised that his script ran without much error off the bat :)

Spose this is what's called learning ..weeee :D

Cheers

Share this post


Link to post
Share on other sites

#7 ·  Posted (edited)

Updated my 2nd post Ibrahim :)

Added buttons to all main buttons..

If buttons are expanded and you click the main button again the expanded buttons will unexpand.

(unexpand .. hmm I don't think that's actually a word...lol)

Give it a go if you like..

Cheers

Edit: made the expand functions into 1 function instead of 4. :D

Edited by smashly

Share this post


Link to post
Share on other sites

Thanks you guys for all the critisisms,well . . . it was all helpfull though

thanks again

and body wanna show the error in my script just reformulate the code if he can . . .

Share this post


Link to post
Share on other sites

Well I'm just about to post your code updated again if you like ..

I've added cutomisable buttons..

You can right click any button and give it a new name.

Also can right click and select what you want the button to run..

Also added right click the main menu so you can set the button animation speed anything from 0 to 100.

All sub buttons can run urls , files/programs, folders, drives.

Basically every sub button can be configured to run anything with or without:

Parameter

Working Directory

Verb (open , edit, print, Default open)

Show Flag ( Launch Maximized , Minimised or Show , Default Show)

No need to edit the script to make a button run what you want , most of it cofigurable from the gui itself via right click context.

Will finish it up and post it a bit later if you want ?

Cheers.

Share this post


Link to post
Share on other sites

#12 ·  Posted (edited)

Edit: see my last post for an updated again version of your script.

Added save settings on exit, load setting on startup :)

Edited by smashly

Share this post


Link to post
Share on other sites

your welcome :D

I'm just using your script as a learning tool, it'll only help me to write better scripts for myself over time.

The list of problems you have are the same as everyone else , the best you can do is work through and around those problems and in time the problems seem to become less.

Bahhh , scratch that last part , the more you work out the more problems you find :)

Well I'm off for the next couple of days , ttyl

have fun.

Cheers.

Share this post


Link to post
Share on other sites

#15 ·  Posted (edited)

Back after a couple of days away,

I've updated your script with save settings to ini on exit and load settings from ini on startup :)

So now you can set all the buttons up the way you want and they'll be the same way when you start it up again.

This will be my last edit of your script as I'm sure you can get the gist of my example and do with it what you may ..lol

Cheers

Edited by smashly

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0