Sign in to follow this  
Followers 0
Bert

Problem With Script

4 posts in this topic

I'm working on the SciTE toolbar options menu. I'm having trouble switching between the toolbar and the options gui. What I need to happen is to have the toolbar refresh itself with the new settings after you close the options GUI. I could use 2 scripts, and have the options script close the toolbar, then reopen it afterwords, but that is messy. I rather keep it on one script. Any help would be welcomed:

CODE
;#NoTrayIcon

#include<guiconstants.au3>

#include<misc.au3>

#include<string.au3>

Opt("MouseCoordMode", 2)

Opt("WinSearchChildren", 1)

Opt("WinTitleMatchMode", 4)

;Check if SciTE is running and start it if needed.

If Not ProcessExists("SciTE.exe") Then

Global $SciTE_Dir = RegRead('HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\App Paths\SciTE.exe', '')

Run($SciTE_Dir)

If Not WinWait("classname=SciTEWindow", 3000) Then Exit

EndIf

If _Singleton("SciTEAdditionalIcons", 1) = 0 Then Exit

Global $WM_COPYDATA = 74

Global $SciTECmd

Global $last_SciTE_Pos_x = -99999

Global $last_SciTE_Pos_y = -99999

Global $Scite_Hwnd = WinGetHandle("classname=SciTEWindow")

Global $Scite_pos = WinGetPos($Scite_Hwnd)

Global $w_size = WinGetClientSize($Scite_Hwnd)

; Get SciTE DirectorHandle

Global $Scite_Dir_hwnd = WinGetHandle("DirectorExtension")

; Get My GUI Handle numeric

;Global $My_Hwnd = GUICreate("SciTE interface", 100, 18, Default, DEFAULT,$WS_POPUP, BitOR($WS_EX_APPWINDOW, $WS_EX_TOOLWINDOW),$Scite_hwnd)

;Global $My_Hwnd = GUICreate("SciTE interface", 100, 18, Default, Default, $WS_POPUP, BitOR($WS_EX_MDICHILD,$WS_EX_TOPMOST ), $Scite_Hwnd) ;-

Global $My_Hwnd = GUICreate("SciTE interface", 100, 18, Default, Default,$WS_POPUP, $WS_EX_TOOLWINDOW, $Scite_hwnd)

;Global $My_Hwnd = GUICreate("SciTE interface", 550, 18, Default, Default, $WS_POPUP, BitOR($WS_EX_TOPMOST, $WS_EX_TOOLWINDOW))

Global $My_Gui_Width = 0

Global $go[1][2]

;

$Toolbar_Info = IniReadSection(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar")

$BarTop_Add = Int(IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "Bar", "Top", 54))

;GUISetState()

_Adjust_Toolbar_Info($Toolbar_Info)

_CreateToolbar($go, $Toolbar_Info, $My_Gui_Width)

$My_Dec_Hwnd = Dec(StringTrimLeft($My_Hwnd, 2))

;Register COPYDATA message.

GUIRegisterMsg($WM_COPYDATA, "MY_WM_COPYDATA")

While 1

If Not WinExists($Scite_Hwnd) Then Exit

$msg = GUIGetMsg()

If $msg = $GUI_EVENT_CLOSE Then Exit

If $msg > 1 Then

For $x = 0 To UBound($go) - 1

If $msg = $go[$x][0] Then

If $go[$x][1] = 9999 Then Exit

if $go[$x][1] = 961 then Send ("{F11}")

if $go[$x][1] = 107 then

$Url = "http://www.autoitscript.com/forum/index.php?act=idx"

DllCall("shell32.dll", "long", "ShellExecute", "hwnd", 0, "string", 'open', "string", $Url, "string", '', "string", @ScriptDir, "long", @SW_SHOWNORMAL)

endif

if $go[$x][1] = 108 then

_options()

endif

SendSciTE_Command($My_Hwnd, $Scite_Dir_hwnd, StringFormat("menucommand:%04d", $go[$x][1]))

_tiprefresh()

ExitLoop

EndIf

Next

EndIf

; set position of window correct

If WinActive($Scite_Hwnd) Or WinActive($My_Hwnd) Then

$Scite_pos = WinGetPos($Scite_Hwnd)

If $Scite_pos[0] <> $last_SciTE_Pos_x Or $Scite_pos[1] <> $last_SciTE_Pos_y Then

$last_SciTE_Pos_x = $Scite_pos[0]

$last_SciTE_Pos_y = $Scite_pos[1]

$w_size = WinGetClientSize($Scite_Hwnd)

WinMove($My_Hwnd, '', $Scite_pos[0] + 360, $Scite_pos[1] + ($Scite_pos[3] - $w_size[1]), $My_Gui_Width, 18)

GUISetState(@SW_SHOW)

EndIf

EndIf

; Re activate SciTE when Buttn window is activated

If WinActive($My_Hwnd) Then

WinActivate($Scite_Hwnd)

EndIf

WEnd

Exit

Func _Adjust_Toolbar_Info(ByRef $Toolbar_Info)

ReDim $Toolbar_Info[uBound($Toolbar_Info) - 1][3]

Local $tmp_string

For $x = 1 To UBound($Toolbar_Info) - 1

If $Toolbar_Info[$x][0] <> "bar" Then

$tmp_string = StringSplit($Toolbar_Info[$x][1], "|")

$Toolbar_Info[$x][1] = $tmp_string[1]

$Toolbar_Info[$x][2] = $tmp_string[2]

EndIf

Next

EndFunc ;==>_Adjust_Toolbar_Info

;

Func _CreateToolbar(ByRef $go, ByRef $Toolbar_Info, ByRef $My_Gui_Width)

Local $x, $y, $bar

ReDim $go[uBound($Toolbar_Info) ][2]

$y = 1

For $x = 1 To UBound($Toolbar_Info) - 1

If $Toolbar_Info[$x][0] = "bar" Then

$vbar1=GUICtrlCreateGraphic($y, 1, 1, 24, $SS_GRAYFRAME)

GUICtrlSetBkColor($vbar1, 0xFF0000)

GUICtrlSetResizing($vbar1, $GUI_DOCKALL)

$vbar2=GUICtrlCreateGraphic(($y+1), 1, 1, 24)

GUICtrlSetBkColor($vbar2, 0xffffff)

GUICtrlSetResizing($vbar2, $GUI_DOCKALL)

$y += 5

Else

$go[$x][0] = GUICtrlCreateIcon(@ScriptDir & "\bin\" & $Toolbar_Info[$x][1], -1, $y + 4, 1, 16, 16, Default, $SS_LEFT)

$go[$x][1] = Number($Toolbar_Info[$x][0])

GUICtrlSetTip($go[$x][0], $Toolbar_Info[$x][2])

$y += 24

EndIf

Next

$My_Gui_Width = $y

EndFunc ;==>_CreateToolbar

; Refreshes tip on icon after icon is clicked.

Func _tiprefresh()

For $x = 1 To UBound($Toolbar_Info) - 1

GUICtrlSetTip($go[$x][0], $Toolbar_Info[$x][2])

Next

EndFunc ;==>_tiprefresh

; Send command to SciTE

Func SendSciTE_Command($My_Hwnd, $Scite_Dir_hwnd, $sCmd)

Sleep(100)

ConsoleWrite('-->' & $sCmd & @LF)

Local $CmdStruct = DllStructCreate('Char[' & StringLen($sCmd) + 1 & ']')

DllStructSetData($CmdStruct, 1, $sCmd)

Local $COPYDATA = DllStructCreate('Ptr;DWord;Ptr')

DllStructSetData($COPYDATA, 1, 1)

DllStructSetData($COPYDATA, 2, StringLen($sCmd) + 1)

DllStructSetData($COPYDATA, 3, DllStructGetPtr($CmdStruct))

DllCall('User32.dll', 'None', 'SendMessage', 'HWnd', $Scite_Dir_hwnd, _

'Int', $WM_COPYDATA, 'HWnd', $My_Hwnd, _

'Ptr', DllStructGetPtr($COPYDATA))

EndFunc ;==>SendSciTE_Command

; Received Data from SciTE

Func MY_WM_COPYDATA($hWnd, $msg, $wParam, $lParam)

Local $COPYDATA = DllStructCreate('Ptr;DWord;Ptr', $lParam)

$SciTECmdLen = DllStructGetData($COPYDATA, 2)

Local $CmdStruct = DllStructCreate('Char[255]', DllStructGetData($COPYDATA, 3))

$SciTECmd = StringLeft(DllStructGetData($CmdStruct, 1), $SciTECmdLen)

ConsoleWrite('<--' & $SciTECmd & @LF)

;GUICtrlSetData($list,GUICtrlRead($list) & '<--' & $SciTECmd & @CRLF )

EndFunc ;==>MY_WM_COPYDATA

Func _options()

;#include <GuiConstants.au3>

;#include<string.au3>

GUISetState(@SW_HIDE,$My_Hwnd)

$opt1=GuiCreate("SciTE Toolbar Options", 400, 420,-1, -1 , BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPSIBLINGS))

;GUI CONTROLS SECTION---------------------------------------------------------

;standard release

$Checkbox_1 = GuiCtrlCreateCheckbox("Run", 15, 20, 96, 14)

$Checkbox_2 = GuiCtrlCreateCheckbox("Compile", 15, 40, 93, 14)

$Checkbox_3 = GuiCtrlCreateCheckbox("AutoIt Helpfile V3.1.1", 15, 60, 120, 14)

$Checkbox_4 = GuiCtrlCreateCheckbox("SyntaxCheck", 15, 80, 120, 14)

$group1 = GUICtrlCreateGroup("Standard", 10, 0, 140, 100)

GUICtrlSetBkColor($group1,0x00ff00)

;beta release

$Checkbox_5 = GuiCtrlCreateCheckbox("Run with Beta", 15, 125, 120, 14)

$Checkbox_6 = GuiCtrlCreateCheckbox("Compile with Beta", 15, 145, 120, 14)

$Checkbox_7 = GuiCtrlCreateCheckbox("Beta AutoIt Helpfile", 15, 165, 120, 14)

$Checkbox_8 = GuiCtrlCreateCheckbox("Syntax Check Beta", 15, 185, 120, 14)

$group2 = GUICtrlCreateGroup("Beta", 10, 105, 140, 100)

GUICtrlSetBkColor($group2,0x00ffff)

;external tools

$Checkbox_9 = GuiCtrlCreateCheckbox("Function Popup", 15, 230, 120, 14)

$Checkbox_10 = GuiCtrlCreateCheckbox("AutoIt Window Info", 15, 250, 120, 14)

$Checkbox_11 = GuiCtrlCreateCheckbox("AU3Recorder", 15, 270, 120, 14)

$Checkbox_12 = GuiCtrlCreateCheckbox("Macro Generator", 15, 290, 120, 14)

$Checkbox_13 = GuiCtrlCreateCheckbox("Tidy AutoIt Source", 15, 310, 120, 14)

$Checkbox_14 = GuiCtrlCreateCheckbox("Code Wizard", 15, 330, 120, 14)

$Checkbox_15 = GuiCtrlCreateCheckbox("GUI Builder", 15, 350, 120, 14)

$Checkbox_16 = GuiCtrlCreateCheckbox("Koda(FormDesigner)", 15, 370, 120, 14)

$Checkbox_17 = GuiCtrlCreateCheckbox("AutoIt Forum", 15, 390, 120, 14)

$group3 = GUICtrlCreateGroup("External Tools", 10, 210, 140, 200)

GUICtrlSetBkColor($group3,0x0000ff)

;SciTE shortcut tools

$Checkbox_18 = GuiCtrlCreateCheckbox("Insert Bookmarked Line(s)", 165, 20, 180, 14)

$Checkbox_19 = GuiCtrlCreateCheckbox("Debug to MsgBox", 165, 40, 150, 14)

$Checkbox_20 = GuiCtrlCreateCheckbox("Debug to Console", 165, 60, 120, 14)

$Checkbox_21 = GuiCtrlCreateCheckbox("Debug Remove Lines", 165, 80, 120, 14)

$Checkbox_22 = GuiCtrlCreateCheckbox("Full Screen", 165, 100, 120, 14)

$Checkbox_23 = GuiCtrlCreateCheckbox("Show Call tip", 165, 120, 120, 14)

$Checkbox_24 = GuiCtrlCreateCheckbox("Complete Symble", 165, 140, 120, 14)

$Checkbox_25 = GuiCtrlCreateCheckbox("Selected text Uppercase", 165, 160, 150, 14)

$Checkbox_26 = GuiCtrlCreateCheckbox("Selected text Lowercase", 165, 180, 150, 14)

$Checkbox_27 = GuiCtrlCreateCheckbox("Block comment or uncomment", 165, 200, 165, 14)

$Checkbox_28 = GuiCtrlCreateCheckbox("Box Comment", 165, 220, 120, 14)

$Checkbox_29 = GuiCtrlCreateCheckbox("Insert Abbrevation", 165, 240, 120, 14)

$Checkbox_30 = GuiCtrlCreateCheckbox("Clear output", 165, 260, 120, 14)

$Checkbox_31 = GuiCtrlCreateCheckbox("Macro list", 165, 280, 120, 14)

$group4 = GUICtrlCreateGroup("Built in SciTE Tools", 160, 0, 180, 300)

GUICtrlSetBkColor($group4,0xff0000)

$button1=GUICtrlCreateButton("Select All", 160, 310, 85, 25)

$button2=GUICtrlCreateButton("Remove All", 160, 340, 85, 25)

$button3=GUICtrlCreateButton("Apply and Close", 255, 310, 85, 25)

$button4=GUICtrlCreateButton("Cancel", 255, 340, 85, 25)

#region -GUI STARTUP SETTINGS SECTION

;standard

$item1="Rocket.ico|Run"

$item2="Tools1.ico|Compile"

$item3="Qmark.ico|AutoIt Helpfile V3.1.1"

$item4="Envel.ico|SyntaxCheck"

$item5="go.ico|Run with Beta"

$item6="toolbox.ico|Compile with Beta"

$item7="Book07.ico|Beta AutoIt Helpfile"

$item8="SafetyHelmet.ico|Syntax Check Beta"

$item9="FuncPopUp.ico|Function Popup"

$item10="Binoculars1c.ico|AutoIt Window Info"

$item11="SonyTRV99.ico|AU3Recorder"

$item12="Etchasketch.ico|Macro Generator"

$item13="tidy.ico|Tidy AutoIt Source"

$item14="Wizard.ico|Code Wizard"

$item15="CodelessDrill.ico|GUI Builder"

$item16="Crayons.ico|Koda(FormDesigner)"

$item17="au3.ico|AutoIt Forum"

$item18="NotePad.ico|Insert Bookmarked Line(s)"

$item19="IDBadge.ico|Debug to MsgBox"

$item20="Zvaiofu045.ico|Debug to Console"

$item21="Papertowels.ico|Debug Remove Lines"

$item22="full.ico|Full Screen"

$item23="text.ico|Show Call tip"

$item24="incid.ICO|Complete Symble"

$item25="upper.ico|Selected text Uppercase"

$item26="lower.ico|Selected text Lowercase"

$item27="padlock.ICO|Block comment or uncomment"

$item28="OpenBox.ico|Box Comment"

$item29="insert_abb.ICO|Insert Abbrevation"

$item30="cleaner.ICO|Clear output"

$item31="macro1.ico|Macro list"

$item32="Pinchers.ICO|Options"

$item33="Door2.ico|Exit Toolbar"

#endregion

#region - ini check to see what needs to be checked before GUI is enabled

$check1 = IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar","303","")

if $check1 = $item1 then GUICtrlSetState($Checkbox_1,$GUI_CHECKED)

$check2 = IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar","301","")

if $check2 = $item2 then GUICtrlSetState($Checkbox_2,$GUI_CHECKED)

$check3 = IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar","901","")

if $check3 = $item3 then GUICtrlSetState($Checkbox_3,$GUI_CHECKED)

$check4 = IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar","1103","")

if $check4 = $item4 then GUICtrlSetState($Checkbox_4,$GUI_CHECKED)

$check5 = IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar","1100","")

if $check5 = $item5 then GUICtrlSetState($Checkbox_5,$GUI_CHECKED)

$check6 = IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar","1101","")

if $check6 = $item6 then GUICtrlSetState($Checkbox_6,$GUI_CHECKED)

$check7 = IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar","1102","")

if $check7 = $item7 then GUICtrlSetState($Checkbox_7,$GUI_CHECKED)

$check8 = IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar","1104","")

if $check8 = $item8 then GUICtrlSetState($Checkbox_8,$GUI_CHECKED)

$check9 = IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar","1105","")

if $check9 = $item9 then GUICtrlSetState($Checkbox_9,$GUI_CHECKED)

$check10 = IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar","1106","")

if $check10 = $item10 then GUICtrlSetState($Checkbox_10,$GUI_CHECKED)

$check11 = IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar","1107","")

if $check11 = $item11 then GUICtrlSetState($Checkbox_11,$GUI_CHECKED)

$check12 = IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar","1108","")

if $check12 = $item12 then GUICtrlSetState($Checkbox_12,$GUI_CHECKED)

$check13 = IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar","1109","")

if $check13 = $item13 then GUICtrlSetState($Checkbox_13,$GUI_CHECKED)

$check14 = IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar","1110","")

if $check14 = $item14 then GUICtrlSetState($Checkbox_14,$GUI_CHECKED)

$check15 = IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar","1111","")

if $check15 = $item15 then GUICtrlSetState($Checkbox_15,$GUI_CHECKED)

$check16 = IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar","1112","")

if $check16 = $item16 then GUICtrlSetState($Checkbox_16,$GUI_CHECKED)

$check17 = IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar","107","")

if $check17 = $item17 then GUICtrlSetState($Checkbox_17,$GUI_CHECKED)

$check18 = IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar","1123","")

if $check18 = $item18 then GUICtrlSetState($Checkbox_18,$GUI_CHECKED)

$check19 = IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar","1124","")

if $check19 = $item19 then GUICtrlSetState($Checkbox_19,$GUI_CHECKED)

$check20 = IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar","1125","")

if $check20 = $item20 then GUICtrlSetState($Checkbox_20,$GUI_CHECKED)

$check21 = IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar","1126","")

if $check21 = $item21 then GUICtrlSetState($Checkbox_21,$GUI_CHECKED)

$check22 = IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar","961","")

if $check22 = $item22 then GUICtrlSetState($Checkbox_22,$GUI_CHECKED)

$check23 = IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar","232","")

if $check23 = $item23 then GUICtrlSetState($Checkbox_23,$GUI_CHECKED)

$check24 = IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar","233","")

if $check24 = $item24 then GUICtrlSetState($Checkbox_24,$GUI_CHECKED)

$check25 = IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar","240","")

if $check25 = $item25 then GUICtrlSetState($Checkbox_25,$GUI_CHECKED)

$check26 = IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar","241","")

if $check26 = $item26 then GUICtrlSetState($Checkbox_26,$GUI_CHECKED)

$check27 = IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar","243","")

if $check27 = $item27 then GUICtrlSetState($Checkbox_27,$GUI_CHECKED)

$check28 = IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar","246","")

if $check28 = $item28 then GUICtrlSetState($Checkbox_28,$GUI_CHECKED)

$check29 = IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar","247","")

if $check29 = $item29 then GUICtrlSetState($Checkbox_29,$GUI_CHECKED)

$check30 = IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar","420","")

if $check30 = $item30 then GUICtrlSetState($Checkbox_30,$GUI_CHECKED)

$check31 = IniRead(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar","314","")

if $check31 = $item31 then GUICtrlSetState($Checkbox_31,$GUI_CHECKED)

#endregion

GuiSetState()

While 1

$msg = GuiGetMsg()

Select

Case $msg = $GUI_EVENT_CLOSE

ExitLoop

Case $msg = $button1

GUICtrlSetState($Checkbox_1,$GUI_CHECKED)

GUICtrlSetState($Checkbox_2,$GUI_CHECKED)

GUICtrlSetState($Checkbox_3,$GUI_CHECKED)

GUICtrlSetState($Checkbox_4,$GUI_CHECKED)

GUICtrlSetState($Checkbox_5,$GUI_CHECKED)

GUICtrlSetState($Checkbox_6,$GUI_CHECKED)

GUICtrlSetState($Checkbox_7,$GUI_CHECKED)

GUICtrlSetState($Checkbox_8,$GUI_CHECKED)

GUICtrlSetState($Checkbox_9,$GUI_CHECKED)

GUICtrlSetState($Checkbox_10,$GUI_CHECKED)

GUICtrlSetState($Checkbox_11,$GUI_CHECKED)

GUICtrlSetState($Checkbox_12,$GUI_CHECKED)

GUICtrlSetState($Checkbox_13,$GUI_CHECKED)

GUICtrlSetState($Checkbox_14,$GUI_CHECKED)

GUICtrlSetState($Checkbox_15,$GUI_CHECKED)

GUICtrlSetState($Checkbox_16,$GUI_CHECKED)

GUICtrlSetState($Checkbox_17,$GUI_CHECKED)

GUICtrlSetState($Checkbox_18,$GUI_CHECKED)

GUICtrlSetState($Checkbox_19,$GUI_CHECKED)

GUICtrlSetState($Checkbox_20,$GUI_CHECKED)

GUICtrlSetState($Checkbox_21,$GUI_CHECKED)

GUICtrlSetState($Checkbox_22,$GUI_CHECKED)

GUICtrlSetState($Checkbox_23,$GUI_CHECKED)

GUICtrlSetState($Checkbox_24,$GUI_CHECKED)

GUICtrlSetState($Checkbox_25,$GUI_CHECKED)

GUICtrlSetState($Checkbox_26,$GUI_CHECKED)

GUICtrlSetState($Checkbox_27,$GUI_CHECKED)

GUICtrlSetState($Checkbox_28,$GUI_CHECKED)

GUICtrlSetState($Checkbox_29,$GUI_CHECKED)

GUICtrlSetState($Checkbox_30,$GUI_CHECKED)

GUICtrlSetState($Checkbox_31,$GUI_CHECKED)

Case $msg = $button2

GUICtrlSetState($Checkbox_1,$GUI_UNCHECKED)

GUICtrlSetState($Checkbox_2,$GUI_UNCHECKED)

GUICtrlSetState($Checkbox_3,$GUI_UNCHECKED)

GUICtrlSetState($Checkbox_4,$GUI_UNCHECKED)

GUICtrlSetState($Checkbox_5,$GUI_UNCHECKED)

GUICtrlSetState($Checkbox_6,$GUI_UNCHECKED)

GUICtrlSetState($Checkbox_7,$GUI_UNCHECKED)

GUICtrlSetState($Checkbox_8,$GUI_UNCHECKED)

GUICtrlSetState($Checkbox_9,$GUI_UNCHECKED)

GUICtrlSetState($Checkbox_10,$GUI_UNCHECKED)

GUICtrlSetState($Checkbox_11,$GUI_UNCHECKED)

GUICtrlSetState($Checkbox_12,$GUI_UNCHECKED)

GUICtrlSetState($Checkbox_13,$GUI_UNCHECKED)

GUICtrlSetState($Checkbox_14,$GUI_UNCHECKED)

GUICtrlSetState($Checkbox_15,$GUI_UNCHECKED)

GUICtrlSetState($Checkbox_16,$GUI_UNCHECKED)

GUICtrlSetState($Checkbox_17,$GUI_UNCHECKED)

GUICtrlSetState($Checkbox_18,$GUI_UNCHECKED)

GUICtrlSetState($Checkbox_19,$GUI_UNCHECKED)

GUICtrlSetState($Checkbox_20,$GUI_UNCHECKED)

GUICtrlSetState($Checkbox_21,$GUI_UNCHECKED)

GUICtrlSetState($Checkbox_22,$GUI_UNCHECKED)

GUICtrlSetState($Checkbox_23,$GUI_UNCHECKED)

GUICtrlSetState($Checkbox_24,$GUI_UNCHECKED)

GUICtrlSetState($Checkbox_25,$GUI_UNCHECKED)

GUICtrlSetState($Checkbox_26,$GUI_UNCHECKED)

GUICtrlSetState($Checkbox_27,$GUI_UNCHECKED)

GUICtrlSetState($Checkbox_28,$GUI_UNCHECKED)

GUICtrlSetState($Checkbox_29,$GUI_UNCHECKED)

GUICtrlSetState($Checkbox_30,$GUI_UNCHECKED)

GUICtrlSetState($Checkbox_31,$GUI_UNCHECKED)

Case $msg = $button3

IniDelete(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar")

IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "bar", "")

$ch1=GUICtrlRead($Checkbox_1)

$ch2=GUICtrlRead($Checkbox_2)

$ch3=GUICtrlRead($Checkbox_3)

$ch4=GUICtrlRead($Checkbox_4)

if $ch1 = 1 then IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "303", $item1)

if $ch2 = 1 then IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "301", $item2)

if $ch3 = 1 then IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "901", $item3)

if $ch4 = 1 then IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "1103", $item4)

if $ch1=1 or $ch2=1 or $ch3=1 or $ch4=1 then FileWriteLine(@ScriptDir & "\bin\SciteToolbar.ini", "bar=")

$ch5=GUICtrlRead($Checkbox_5)

$ch6=GUICtrlRead($Checkbox_6)

$ch7=GUICtrlRead($Checkbox_7)

$ch8=GUICtrlRead($Checkbox_8)

if $ch5 = 1 then IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "1100", $item5)

if $ch6 = 1 then IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "1101", $item6)

if $ch7 = 1 then IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "1102", $item7)

if $ch8 = 1 then IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "1104", $item8)

if $ch5=1 or $ch6=1 or $ch7=1 or $ch8=1 then FileWriteLine(@ScriptDir & "\bin\SciteToolbar.ini", "bar=")

$ch9=GUICtrlRead($Checkbox_9)

$ch10=GUICtrlRead($Checkbox_10)

$ch11=GUICtrlRead($Checkbox_11)

$ch12=GUICtrlRead($Checkbox_12)

$ch13=GUICtrlRead($Checkbox_13)

$ch14=GUICtrlRead($Checkbox_14)

$ch15=GUICtrlRead($Checkbox_15)

$ch16=GUICtrlRead($Checkbox_16)

$ch17=GUICtrlRead($Checkbox_17)

if $ch9 = 1 then IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "1105", $item9)

if $ch10 = 1 then IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "1106", $item10)

if $ch11 = 1 then IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "1107", $item11)

if $ch12 = 1 then IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "1108", $item12)

if $ch13 = 1 then IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "1109", $item13)

if $ch14 = 1 then IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "1110", $item14)

if $ch15 = 1 then IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "1111", $item15)

if $ch16 = 1 then IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "1112", $item16)

if $ch17 = 1 then IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "107", $item17)

if $ch9=1 or $ch10=1 or $ch11=1 or $ch12=1 or $ch13=1 or $ch14=1 or $ch15=1 or $ch16=1 or $ch17=1 then FileWriteLine(@ScriptDir & "\bin\SciteToolbar.ini", "bar=")

$ch18=GUICtrlRead($Checkbox_18)

$ch19=GUICtrlRead($Checkbox_19)

$ch20=GUICtrlRead($Checkbox_20)

$ch21=GUICtrlRead($Checkbox_21)

$ch22=GUICtrlRead($Checkbox_22)

$ch23=GUICtrlRead($Checkbox_23)

$ch24=GUICtrlRead($Checkbox_24)

$ch25=GUICtrlRead($Checkbox_25)

$ch26=GUICtrlRead($Checkbox_26)

$ch27=GUICtrlRead($Checkbox_27)

$ch28=GUICtrlRead($Checkbox_28)

$ch29=GUICtrlRead($Checkbox_29)

$ch30=GUICtrlRead($Checkbox_30)

$ch31=GUICtrlRead($Checkbox_31)

if $ch18 = 1 then IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "1123", $item18)

if $ch19 = 1 then IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "1124", $item19)

if $ch20 = 1 then IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "1125", $item20)

if $ch21 = 1 then IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "1126", $item21)

if $ch22 = 1 then IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "961", $item22)

if $ch23 = 1 then IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "232", $item23)

if $ch24 = 1 then IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "233", $item24)

if $ch25 = 1 then IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "240", $item25)

if $ch26 = 1 then IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "241", $item26)

if $ch27 = 1 then IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "243", $item27)

if $ch28 = 1 then IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "246", $item28)

if $ch29 = 1 then IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "247", $item29)

if $ch30 = 1 then IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "420", $item30)

if $ch31 = 1 then IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "314", $item31)

if $ch18=1 or $ch19=1 or $ch20=1 or $ch21=1 or $ch22=1 or $ch23=1 or $ch24=1 or $ch25=1 or $ch26=1 or $ch27=1 or $ch28=1 or $ch29=1 or $ch30=1 or $ch31=1 then FileWriteLine(@ScriptDir & "\bin\SciteToolbar.ini", "bar=")

IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "108", $item32)

IniWrite(@ScriptDir & "\bin\SciteToolbar.ini", "ToolBar", "9999", $item33)

FileWriteLine(@ScriptDir & "\bin\SciteToolbar.ini", "bar=")

GUIDelete($opt1)

;_Adjust_Toolbar_Info($Toolbar_Info)

_CreateToolbar($go, $Toolbar_Info, $My_Gui_Width)

$My_Dec_Hwnd = Dec(StringTrimLeft($My_Hwnd, 2))

;Register COPYDATA message.

GUIRegisterMsg($WM_COPYDATA, "MY_WM_COPYDATA")

GUISetState(@SW_SHOW,$My_Hwnd)

Case $msg = $button4

GUIDelete($opt1)

;_Adjust_Toolbar_Info($Toolbar_Info)

_CreateToolbar($go, $Toolbar_Info, $My_Gui_Width)

$My_Dec_Hwnd = Dec(StringTrimLeft($My_Hwnd, 2))

;Register COPYDATA message.

GUIRegisterMsg($WM_COPYDATA, "MY_WM_COPYDATA")

GUISetState(@SW_SHOW,$My_Hwnd)

;;;

EndSelect

WEnd

Exit

EndFunc

#cs

Here are the other values that could be useful for you:

Go = 301

Compile = 302

Complete list from the SciTE source file scite.h

// Menu IDs.

// These are located 100 apart. No one will want more than 100 in each menu

#define IDM_MRUFILE 1000

#define IDM_TOOLS 1100

#define IDM_BUFFER 1200

#define IDM_IMPORT 1300

#define IDM_LANGUAGE 1400

// File

#define IDM_NEW 101

#define IDM_OPEN 102

#define IDM_OPENSELECTED 103

#define IDM_REVERT 104

#define IDM_CLOSE 105

#define IDM_SAVE 106

#define IDM_SAVEAS 110

#define IDM_SAVEASHTML 111

#define IDM_SAVEASRTF 112

#define IDM_SAVEASPDF 113

#define IDM_FILER 114

#define IDM_SAVEASTEX 115

#define IDM_SAVEACOPY 116

#define IDM_SAVEASXML 117

#define IDM_MRU_SEP 120

#define IDM_PRINTSETUP 130

#define IDM_PRINT 131

#define IDM_LOADSESSION 132

#define IDM_SAVESESSION 133

#define IDM_QUIT 140

#define IDM_ENCODING_DEFAULT 150

#define IDM_ENCODING_UCS2BE 151

#define IDM_ENCODING_UCS2LE 152

#define IDM_ENCODING_UTF8 153

#define IDM_ENCODING_UCOOKIE 154

#define MRU_START 16

#define IMPORT_START 19

#define TOOLS_START 3

// Edit

#define IDM_UNDO 201

#define IDM_REDO 202

#define IDM_CUT 203

#define IDM_COPY 204

#define IDM_PASTE 205

#define IDM_CLEAR 206

#define IDM_SELECTALL 207

#define IDM_PASTEANDDOWN 208

#define IDM_FIND 210

#define IDM_FINDNEXT 211

#define IDM_FINDNEXTBACK 212

#define IDM_FINDNEXTSEL 213

#define IDM_FINDNEXTBACKSEL 214

#define IDM_FINDINFILES 215

#define IDM_REPLACE 216

#define IDM_GOTO 220

#define IDM_BOOKMARK_NEXT 221

#define IDM_BOOKMARK_TOGGLE 222

#define IDM_BOOKMARK_PREV 223

#define IDM_BOOKMARK_CLEARALL 224

#define IDM_BOOKMARK_NEXT_SELECT 225

#define IDM_BOOKMARK_PREV_SELECT 226

#define IDM_MATCHBRACE 230

#define IDM_SELECTTOBRACE 231

#define IDM_SHOWCALLTIP 232

#define IDM_COMPLETE 233

#define IDM_COMPLETEWORD 234

#define IDM_EXPAND 235

#define IDM_TOGGLE_FOLDALL 236

#define IDM_TOGGLE_FOLDRECURSIVE 237

#define IDM_EXPAND_ENSURECHILDRENVISIBLE 238

#define IDM_UPRCASE 240

#define IDM_LWRCASE 241

#define IDM_ABBREV 242

#define IDM_BLOCK_COMMENT 243

#define IDM_STREAM_COMMENT 244

#define IDM_COPYASRTF 245

#define IDM_BOX_COMMENT 246

#define IDM_INS_ABBREV 247

#define IDM_JOIN 248

#define IDM_SPLIT 249

#define IDM_DUPLICATE 250

#define IDM_INCSEARCH 252

#define IDM_ENTERSELECTION 256

#define IDC_INCFINDTEXT 253

#define IDC_INCFINDBTNOK 254

#define IDD_FIND2 255

#define IDC_EDIT1 1000

#define IDC_STATIC -1

#define IDM_PREVMATCHPPC 260

#define IDM_SELECTTOPREVMATCHPPC 261

#define IDM_NEXTMATCHPPC 262

#define IDM_SELECTTONEXTMATCHPPC 263

// Tools

#define IDM_COMPILE 301

#define IDM_BUILD 302

#define IDM_GO 303

#define IDM_STOPEXECUTE 304

#define IDM_FINISHEDEXECUTE 305

#define IDM_NEXTMSG 306

#define IDM_PREVMSG 307

#define IDM_MACRO_SEP 310

#define IDM_MACRORECORD 311

#define IDM_MACROSTOPRECORD 312

#define IDM_MACROPLAY 313

#define IDM_MACROLIST 314

#define IDM_ACTIVATE 320

#define IDM_SRCWIN 350

#define IDM_RUNWIN 351

#define IDM_TOOLWIN 352

#define IDM_STATUSWIN 353

#define IDM_TABWIN 354

// Options

#define IDM_SPLITVERTICAL 401

#define IDM_VIEWSPACE 402

#define IDM_VIEWEOL 403

#define IDM_VIEWGUIDES 404

#define IDM_SELMARGIN 405

#define IDM_FOLDMARGIN 406

#define IDM_LINENUMBERMARGIN 407

#define IDM_VIEWTOOLBAR 408

#define IDM_TOGGLEOUTPUT 409

#define IDM_VIEWTABBAR 410

#define IDM_VIEWSTATUSBAR 411

#define IDM_TOGGLEPARAMETERS 412

#define IDM_OPENFILESHERE 413

#define IDM_WRAP 414

#define IDM_WRAPOUTPUT 415

#define IDM_READONLY 416

#define IDM_CLEAROUTPUT 420

#define IDM_SWITCHPANE 421

#define IDM_EOL_CRLF 430

#define IDM_EOL_CR 431

#define IDM_EOL_LF 432

#define IDM_EOL_CONVERT 433

#define IDM_TABSIZE 440

#define IDM_MONOFONT 450

#define IDM_OPENLOCALPROPERTIES 460

#define IDM_OPENUSERPROPERTIES 461

#define IDM_OPENGLOBALPROPERTIES 462

#define IDM_OPENABBREVPROPERTIES 463

#define IDM_OPENLUAEXTERNALFILE 464

//#define IDM_SELECTIONMARGIN 490

//#define IDM_BUFFEREDDRAW 491

//#define IDM_USEPALETTE 492

// Buffers

#define IDM_PREVFILE 501

#define IDM_NEXTFILE 502

#define IDM_CLOSEALL 503

#define IDM_SAVEALL 504

#define IDM_BUFFERSEP 505

#define IDM_PREVFILESTACK 506

#define IDM_NEXTFILESTACK 507

// Help

#define IDM_HELP 901

#define IDM_ABOUT 902

#define IDM_HELP_SCITE 903

// Windows specific windowing options

#define IDM_ONTOP 960

#define IDM_FULLSCREEN 961

// Dialog control IDs

#define IDGOLINE 220

#define IDABOUTSCINTILLA 221

#define IDFINDWHAT 222

#define IDFILES 223

#define IDDIRECTORY 224

#define IDCURRLINE 225

#define IDLASTLINE 226

#define IDEXTEND 227

#define IDTABSIZE 228

#define IDINDENTSIZE 229

#define IDUSETABS 230

#define IDREPLACEWITH 231

#define IDWHOLEWORD 232

#define IDMATCHCASE 233

#define IDDIRECTIONUP 234

#define IDDIRECTIONDOWN 235

#define IDREPLACE 236

#define IDREPLACEALL 237

#define IDREPLACEINSEL 238

#define IDREGEXP 239

#define IDWRAP 240

#define IDUNSLASH 241

#define IDCMD 242

// id for the browse button in the grep dialog

#define IDBROWSE 243

#define IDABBREV 244

#define IDREPLACEINBUF 244

#define IDMARKALL 245

#define IDGOLINECHAR 246

#define IDCURRLINECHAR 247

#define IDREPLDONE 248

#define IDDOTDOT 249

#define IDFINDINSTYLE 250

#define IDFINDSTYLE 251

#define IDPARAMSTART 300

// Dialog IDs

#define IDD_FIND 400

#define IDD_REPLACE 401

#define IDD_BUFFERS 402

#define IDD_FIND_ADV 403

#define IDD_REPLACE_ADV 404

#define IDR_CLOSEFILE 100

#ce

Share this post


Link to post
Share on other sites



maybe

; Restart your program
; Author UP_NORTH

Func _restart()
    If @Compiled = 1 Then
        Run( FileGetShortName(@ScriptFullPath))
    Else
        Run( FileGetShortName(@AutoItExe) & " " & FileGetShortName(@ScriptFullPath))
    EndIf
    Exit
EndFunc

8)


NEWHeader1.png

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