MachinistProgrammer

Its great and all but it cannot open files here is the sollution just a simple shellexecute ExpFrame_Mod.au3.au3

im writing a simple internal data compressor which uses the ANSI charecter codes and converts them into a large integer which is then divided by a number (based on the compression level) the problem is that when the data is decompressed it hase to times the integer by the divided number, but the number returned 4.36484128440388e+039 how can i convert it to its expanded form (109121032110097109101032105115032098111098) #include <array.au3> Func _decompressdata($data,$level) $idata = _StringCut($data*$level,3) Local $chr For $i = 0 to UBound($idata) -1 $chr &= Chr($idata[$i]) Next Return $chr endFunc Func _StringCut($string, $size) $count = Ceiling(StringLen($string)/$size) Dim $array[$count+1], $start = 1 For $i = 1 To $count $array[$i] = StringMid($string, $start, $size) $start += $size Next $array[0] = $count _ArrayDelete($array,0) Return $array EndFunc

so i was writing a file manager window but i don't know how to put icons on the files & folders ; -- Created with ISN Form Studio 2 for ISN AutoIt Studio -- ; #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #Include <GuiButton.au3> #include <array.au3> #include <file.au3> #include <GuiListView.au3> Global $currentdir1,$currentdir2 _fm_get_stuff1() $Xplore_file_manager = GUICreate("Xplore file manager",400,565,-1,-1,-1,-1) GUISetBkColor(0xFFFFFF,$Xplore_file_manager) GUICtrlSetBkColor(-1,"0xBFBFFF") $Filelist1a = GUICtrlCreatelistview("Name |Size",10,100,380,420,0,$LVS_EX_GRIDLINES + 0x00000020) $filelist1 = GUICtrlGetHandle($Filelist1a) _arraytolist(_FM_Get_stuff1(),$filelist1a) $path = GUICtrlCreateInput("My Computer",110,70,280,30,-1,512) GUICtrlSetFont(-1,12,400,0,"MS Sans Serif") $b = GUICtrlCreateButton("Back",10,70,100,30,-1,-1) GUISetState(@SW_SHOW,$Xplore_file_manager) GUIRegisterMsg($WM_NOTIFY,"_Update_on_click") While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $b $ix = StringSplit($currentdir1,'\',2) $iu = UBound($ix) - 2 $ilen = StringLen($ix[$iu] & '\') $iprev = StringTrimRight($currentdir1,$ilen) _GUICtrlListView_DeleteAllItems($filelist1a) _arraytolist(_fm_get_stuff1($iprev),$filelist1a) If $iprev = '' Then GUICtrlSetData($path,'My Computer') Else GUICtrlSetData($path,$iprev) EndIf EndSwitch WEnd Func _FM_Get_stuff1($dir = '') If $dir = '' Then $drv = DriveGetDrive('all') Global $dat[UBound($drv)] For $i = 1 To UBound($drv) - 1 $drv[$i] = StringUpper($drv[$i]) $dat[$i] = FileGetSize($drv[$i]) Next $currentdir1 = '' Return $drv Else $currentdir1 = $dir $iarray = _FileListToArray($dir) If @error = 4 Then Return 0 Global $dat[UBound($iarray)] For $i = 1 to UBound($iarray) - 1 $dat[$i] = FileGetSize($dir & $iarray[$i]) Next Return $iarray EndIf EndFunc Func _arraytolist($array,$list) $iubound = UBound($array) - 1 For $i = 1 To $iUBound GUICtrlCreateListViewItem($array[$i] & '|' & $dat[$i] ,$list) Next EndFunc Func _Update_on_click($hWnd, $iMsg, $iwParam, $ilParam) #forceref $hWnd, $iMsg, $iwParam Local $hWndFrom, $iIDFrom, $iCode, $tNMHDR, $tInfo $tNMHDR = DllStructCreate($tagNMHDR, $ilParam) $hWndFrom = HWnd(DllStructGetData($tNMHDR, "hWndFrom")) $iIDFrom = DllStructGetData($tNMHDR, "IDFrom") $iCode = DllStructGetData($tNMHDR, "Code") Switch $hWndFrom Case $Filelist1 Switch $iCode Case $NM_DBLCLK $str = StringSplit(GUICtrlRead(GUICtrlRead($Filelist1a)),"|") If stringinstr(FileGetAttrib($currentdir1 & $str[1]),"d") Then _GUICtrlListView_DeleteAllItems($Filelist1a) $currentdir1 &= $str[1] _arraytolist(_fm_get_stuff1($currentdir1 & '\'),$Filelist1a) GUICtrlSetData($path,$currentdir1) ElseIf FileExists($currentdir1 & $str[1]) Then ShellExecute($currentdir1 & $str[1]) ElseIf StringRegExp($CurrentDir1 & $str[1], "[A-z]:") Then $currentdir1 &= $str[1] _GUICtrlListView_DeleteAllItems($Filelist1a) _arraytolist(_fm_get_stuff1(),$filelist1a) GUICtrlSetData($path,'My Computer') EndIf EndSwitch EndSwitch EndFunc Func _isdrive($drive) $id = DriveGetDrive('all') For $i = 0 To UBound($id) - 1 If $drive = $id[$i] Then MsgBox(0,'',$id[$i]) Return 1 EndIf Next Return 0 EndFunc

this is the project im working on it is almost done ;#GUIBuilder++.au3#================================== ;File Name.......:GUIBuilder++.au3 ;Creator.........:sean.campbell7 ;Created with....:Created with ISN AutoIt Studio ;Version.........:0.91 BETA ;============================================= Opt("GUIResizeMode", 802) #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <editconstants.au3> #Include <GuiButton.au3> #include <array.au3> #include <misc.au3> #include <TabConstants.au3> $crc = 0 Global $guihandle = "$HGUI" $xx = 0 $au3 = "" $codescreen = GUICreate("compiled code", 350, 350, -1, -1, $WS_CAPTION, $WS_EX_TOPMOST) $code = GUICtrlCreateEdit("", 20, 20, 310, 240, 2048, -1) GUICtrlSetBkColor($code, 0xFFFFFF) $cc = GUICtrlCreateButton("Copy", 220, 280, 100, 30, -1, -1) $ok = GUICtrlCreateButton("Ok", 120, 280, 100, 30, -1, -1) $sc = GUICtrlCreateButton("Save as", 20, 280, 100, 30, -1, -1) Global $ctrldata[1][8], $rdm = 1, $copyobj[7] $toolbar = GUICreate("GUIBuilder++", @DesktopWidth -5, @DesktopWidth -300, 0, 0, 0x00010000 + 0x00020000) $d = GUICtrlCreateButton("Date", 50, 300, 50, 50, -1, -1) $pb = GUICtrlCreateButton("progress bar", 0, 300, 50, 50, -1, -1) $s = GUICtrlCreateButton("slider", 50, 250, 50, 50, -1, -1) $co = GUICtrlCreateButton("combo box", 0, 350, 50, 50, -1, -1) $li = GUICtrlCreateButton("listbox", 50, 400, 50, 50, -1, -1) $g = GUICtrlCreateButton("group", 0, 400, 50, 50, -1, -1) $t = GUICtrlCreateButton("treeview", 50, 350, 50, 50, -1, -1) $i = GUICtrlCreateButton("input", 0, 150, 50, 50, -1, -1) $l = GUICtrlCreateButton("Lable", 50, 100, 50, 50, -1, -1) $b = GUICtrlCreateButton("Button", 0, 100, 50, 50, -1, -1) $c = GUICtrlCreateButton("checkbox", 50, 150, 50, 50, -1, -1) $ic = GUICtrlCreateButton("icon", 0, 250, 50, 50, -1, -1) $im = GUICtrlCreateButton("image", 50, 200, 50, 50, -1, -1) $r = GUICtrlCreateButton("radiobox", 0, 200, 50, 50, -1, -1) $e = GUICtrlCreateButton("edit", 0, 450, 50, 50) $ca = GUICtrlCreateButton("calender", 50, 450, 50, 50) $prop = GUICtrlCreateButton("GUI properties", 0, 50, 100, 50) $iFile = GUICtrlCreateMenu("File") $iFile_Export = GUICtrlCreateMenuItem('E&xport' & @TAB & 'Ctrl + E',$iFile) GUISetState(@SW_SHOW, $toolbar) GUISetState(@SW_MAXIMIZE, $toolbar) Global $lao $GUIprop = GUICreate("Gui Properties", 350, 307, -1, -1, -1, $ws_ex_topmost + $WS_EX_TOOLWINDOW) $tab = GUICtrlCreatetab(20, 20, 310, 240, 1024, -1) GUICtrlCreateTabItem("General") $wintit = GUICtrlCreateInput("", 140, 110, 150, 22, -1, 512) $hgui = GUICtrlCreateInput("HGUI", 140, 80, 150, 22, -1, 512) GUICtrlCreateLabel("Window Title:", 40, 113, 80, 15, -1, -1) GUICtrlSetBkColor(-1, "-2") GUICtrlCreateLabel("Window handle:$", 40, 83, 96, 15, -1, -1) GUICtrlSetBkColor(-1, "-2") $guihig = GUICtrlCreateInput(0, 140, 180, 50, 20, 8192, 512) GUICtrlCreateUpdown(-1) $guiwid = GUICtrlCreateInput("0", 140, 150, 50, 20, 8192, 512) GUICtrlCreateUpdown(-1) GUICtrlCreateLabel("GUI Hight:", 40, 183, 59, 15, -1, -1) GUICtrlSetBkColor(-1, "-2") GUICtrlCreateLabel("Px", 200, 183, 50, 15, -1, -1) GUICtrlSetBkColor(-1, "-2") GUICtrlCreateLabel("GUI Width:", 40, 153, 59, 15, -1, -1) GUICtrlSetBkColor(-1, "-2") GUICtrlCreateLabel("Px", 200, 153, 50, 15, -1, -1) GUICtrlSetBkColor(-1, "-2") GUICtrlCreateTabItem("") GUICtrlCreateLabel("GUI Colour", 40, 213, 71, 15, -1, -1) GUICtrlSetBkColor(-1, "-2") $colour = GUICtrlCreateInput("0xF0F0F0", 140, 210, 75, 20, -1, 512) GUICtrlCreateButton("Colour", 220, 210, 50, 20, -1, -1) $gcl = GUICtrlCreateButton("Cancel", 180, 270, 100, 30, -1, -1) $gok = GUICtrlCreateButton("Ok", 80, 270, 100, 30, -1, -1) $ctrledit = GUICreate("Control editor", 230, 400, @DesktopWidth / 4 * 3, -1, $WS_CAPTION, $WS_EX_TOPMOST) $apply = GUICtrlCreateButton("apply", 15, 340, 100, 30) $compile = GUICtrlCreateButton("compile", 115, 340, 100, 30) GUICtrlCreateTab(10, 30, 210, 300, $TCS_VERTICAL) GUICtrlCreateTabItem("General") $xpos = GUICtrlCreateInput("", 60, 40, 40, 22, $ES_NUMBER) GUICtrlCreateUpdown($xpos) GUICtrlCreateLabel("X", 50, 42, 22, 22) $ypos = GUICtrlCreateInput("", 120, 40, 40, 22, $ES_NUMBER) GUICtrlCreateUpdown($ypos) GUICtrlCreateLabel("Y", 110, 42, 22, 22) $name = GUICtrlCreateInput("", 60, 100, 100, 22) GUICtrlCreateLabel("Data", 60, 85, 50, 22) GUICtrlCreateLabel("handle", 60, 125, 50, 22) $handle = GUICtrlCreateInput("", 60, 144, 100, 22) GUICtrlCreateTabItem("Apearance") $width1 = GUICtrlCreateInput("", 60, 40, 40, 22, $ES_NUMBER) GUICtrlCreateUpdown($width1) $hight1 = GUICtrlCreateInput("", 120, 40, 40, 22, $ES_NUMBER) GUICtrlCreateUpdown($hight1) GUICtrlCreateTabItem("Style") GUICtrlCreateTabItem("StyleEx") GUICtrlCreateTabItem("State") Global $key[1][2] GUISetState(@SW_SHOW, $ctrledit) $board = GUICreate("new window", 350, 350, -1, -1, $WS_OVERLAPPEDWINDOW, $WS_EX_TOPMOST + $WS_EX_TOOLWINDOW) $del = GUICtrlCreateDummy() $copy = GUICtrlCreateDummy() $paste = GUICtrlCreateDummy() Global $keys[3][2] $keys[0][1] = $del $keys[0][0] = "{del}" $keys[1][1] = $copy $keys[1][0] = "^c" $keys[2][1] = $paste $keys[2][0] = "^v" GUISetAccelerators($keys) GUISetState(@SW_SHOW, $board) While 1 $cMsg = GUIGetCursorInfo($board) $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $ok GUISetState(@SW_HIDE, $codescreen) GUISetState(@SW_SHOW, $board) $crc = 0 Case $prop $oo = WinGetClientSize($board) GUICtrlSetData($wintit, WinGetTitle($board)) GUICtrlSetData($guihig, $oo[1]) GUICtrlSetData($guiwid, $oo[0]) GUISetState(@SW_SHOW, $GUIprop) $xx = 1 Case $gok WinMove($board, "", @DesktopWidth / 2 - GUICtrlRead($guihig) / 2, @DesktopHeight / 2 - GUICtrlRead($guiwid) / 2, GUICtrlRead($guiwid) + 16, GUICtrlRead($guihig) + 34) WinSetTitle($board, "", GUICtrlRead($wintit)) $guihandle = "$" & GUICtrlRead($hgui) $xx = 0 GUISetState(@SW_Hide, $GUIprop) GUISetState(@SW_SHOW, $board) Case $gcl GUISetState(@SW_hide, $GUIprop) GUISetState(@SW_SHOW, $board) $xx = 0 Case $sc GUISetState(@SW_HIDE, $codescreen) GUISetState(@SW_HIDE, $board) GUISetState(@SW_HIDE, $ctrledit) $dat = FilesaveDialog("Save script", "", "Autoit 3 script files(*.au3)") If $dat <> "" Then FileWrite($dat & ".au3", $au3) endif $crc = 0 GUISetState(@SW_SHOW, $ctrledit) GUISetState(@SW_SHOW, $board) Case $iFile_Export _compile(0) GUISetState(@SW_HIDE, $codescreen) GUISetState(@SW_HIDE, $board) GUISetState(@SW_HIDE, $ctrledit) $dat = FilesaveDialog("Save script", "", "Autoit 3 script files(*.au3)") If $dat <> "" Then $id = FileOpen($dat & ".au3",2) FileWrite($id, $au3) endif GUISetState(@SW_SHOW, $ctrledit) GUISetState(@SW_SHOW, $board) Case $cc ClipPut($au3) Case $width1, $hight1 _itemsetsize(GUICtrlRead($width1), GUICtrlRead($hight1)) Case $xpos, $ypos _itemsetpos(GUICtrlRead($xpos), GUICtrlRead($ypos)) Case $name _itemsetname(GUICtrlRead($name)) Case $apply _itemsetname(GUICtrlRead($name)) _itemsetpos(GUICtrlRead($xpos), GUICtrlRead($ypos)) _itemsetsize(GUICtrlRead($width1), GUICtrlRead($hight1)) If GUICtrlRead($handle) <> "" Then For $i = 0 to UBound($ctrldata) - 1 If $ctrldata[$i][0] = $lao and $lao <> "" Then $ctrldata[$i][7] = "$" & GUICtrlRead($handle) EndIf Next EndIf Case $del _deleteitem($lao) Case $copy _copy() Case $paste _paste() Case -7, -11 If $cMsg[4] > 0 Then _guictrldrag($cMsg[4], $board) Case $b _createitem("button") Case $l _createitem("label") case $pb _createitem("progress") case $i _createitem("input") Case $e _createitem("edit") Case $c _createitem("checkbox") Case $r _createitem("radiobox") Case $s _createitem("slider") Case $ic _createitem("icon") case $im _createitem("image") Case $d _createitem("date") case $ca _createitem("calender") Case $co _createitem("combo") Case $li _createitem("listbox") case $t _createitem("tree") Case $g _createitem("group") Case $compile _compile() Case $GUI_EVENT_MINIMIZE GUISetState(@SW_HIDE, $board) GUISetState(@SW_HIDE, $ctrledit) GUISetState(@SW_HIDE, $codescreen) GUISetState(@SW_HIDE, $GUIprop) Case $GUI_EVENT_RESTORE GUISetState(@SW_show, $ctrledit) GUISetState(@SW_Show, $board) If $crc Then GUISetState(@SW_SHOW, $codescreen) If $xx Then GUISetState(@SW_SHOW, $GUIprop) EndSwitch WinSetOnTop($ctrledit, "", 1) WEnd Func _guictrldrag($control, $hgui) $cbutton = $control $lao = $control $cInfo = GUIGetCursorInfo($hGUI) $aPos = ControlGetPos($hGUI, "", $cButton) $iSubtractX = $cInfo[0] - $aPos[0] $iSubtractY = $cInfo[1] - $aPos[1] Sleep(200) $cInfo = GUIGetCursorInfo($hGUI) If $cInfo[2] = 1 Then $cInfo = GUIGetCursorInfo($hGUI) If $cInfo[4] = $cButton Then Do $cInfo = GUIGetCursorInfo($hGUI) ControlMove($hGUI, "", $cButton, $cInfo[0] - $iSubtractX, $cInfo[1] - $iSubtractY) For $i = 0 to UBound($ctrldata) - 1 If $ctrldata[$i][0] = $control and $control <> "" Then $ctrldata[$i][1] = $cInfo[0] - $iSubtractX $ctrldata[$i][2] = $cInfo[1] - $iSubtracty EndIf Next For $i = 0 to UBound($ctrldata) - 1 If $ctrldata[$i][0] = $lao and $lao <> "" Then GUICtrlSetData($xpos, $ctrldata[$i][1]) GUICtrlSetData($ypos, $ctrldata[$i][2]) GUICtrlSetData($width1, $ctrldata[$i][3]) GUICtrlSetData($hight1, $ctrldata[$i][4]) GUICtrlSetData($name, $ctrldata[$i][5]) GUICtrlSetData($handle, StringTrimLeft($ctrldata[$i][7], 1)) EndIf next Until Not $cInfo[2] EndIf Else return 0 EndIf Do Until GUIGetMsg() = 0 _itemsetpos(_round($cInfo[0] - $iSubtractX), _round($cInfo[1] - $iSubtractY)) EndFunc Func _createitem($type, $x = 0, $y = 0, $width = -1, $hight = -1) $rdm += 1 Switch $type Case "button" If $width = -1 then $width = 50 If $hight = -1 then $hight = 30 $ct = GUICtrlCreateButton("my text", $x, $y, $width, $hight) ReDim $ctrldata[$rdm + 1][8] $ctrldata[$rdm][0] = $ct $ctrldata[$rdm][1] = $x $ctrldata[$rdm][2] = $y $ctrldata[$rdm][3] = $width $ctrldata[$rdm][4] = $hight $ctrldata[$rdm][5] = "my text" Case "label" If $width = -1 then $width = 100 If $hight = -1 then $hight = 20 $ct = GUICtrlCreateLabel("my text", $x, $y, $width, $hight) ReDim $ctrldata[$rdm + 1][8] $ctrldata[$rdm][0] = $ct $ctrldata[$rdm][1] = $x $ctrldata[$rdm][2] = $y $ctrldata[$rdm][3] = $width $ctrldata[$rdm][4] = $hight $ctrldata[$rdm][5] = "my text" Case "input" If $width = -1 then $width = 100 If $hight = -1 then $hight = 20 $ct = GUICtrlCreateinput("my text", $x, $y, $width, $hight) ReDim $ctrldata[$rdm + 1][8] $ctrldata[$rdm][0] = $ct $ctrldata[$rdm][1] = $x $ctrldata[$rdm][2] = $y $ctrldata[$rdm][3] = $width $ctrldata[$rdm][4] = $hight $ctrldata[$rdm][5] = "my text" Case "Edit" If $width = -1 then $width = 150 If $hight = -1 then $hight = 150 $ct = GUICtrlCreateEdit("my text", $x, $y, $width, $hight) ReDim $ctrldata[$rdm + 1][8] $ctrldata[$rdm][0] = $ct $ctrldata[$rdm][1] = $x $ctrldata[$rdm][2] = $y $ctrldata[$rdm][3] = $width $ctrldata[$rdm][4] = $hight $ctrldata[$rdm][5] = "my text" Case "progress" If $width = -1 then $width = 100 If $hight = -1 then $hight = 20 $ct = GUICtrlCreateProgress($x, $y, $width, $hight) GUICtrlSetData(-1, 50) ReDim $ctrldata[$rdm + 1][8] $ctrldata[$rdm][0] = $ct $ctrldata[$rdm][1] = $x $ctrldata[$rdm][2] = $y $ctrldata[$rdm][3] = $width $ctrldata[$rdm][4] = $hight $ctrldata[$rdm][5] = 50 Case "checkbox" If $width = -1 then $width = 50 If $hight = -1 then $hight = 20 $ct = GUICtrlCreateCheckbox("my text", $x, $y, $width, $hight) ReDim $ctrldata[$rdm + 1][8] $ctrldata[$rdm][0] = $ct $ctrldata[$rdm][1] = $x $ctrldata[$rdm][2] = $y $ctrldata[$rdm][3] = $width $ctrldata[$rdm][4] = $hight $ctrldata[$rdm][5] = "my text" Case "radiobox" If $width = -1 then $width = 50 If $hight = -1 then $hight = 20 $ct = GUICtrlCreateRadio("my text", $x, $y, $width, $hight) ReDim $ctrldata[$rdm + 1][8] $ctrldata[$rdm][0] = $ct $ctrldata[$rdm][1] = $x $ctrldata[$rdm][2] = $y $ctrldata[$rdm][3] = $width $ctrldata[$rdm][4] = $hight $ctrldata[$rdm][5] = "my text" Case "slider" If $width = -1 then $width = 150 If $hight = -1 then $hight = 20 $ct = GUICtrlCreateSlider($x, $y, $width, $hight) ReDim $ctrldata[$rdm + 1][8] $ctrldata[$rdm][0] = $ct $ctrldata[$rdm][1] = $x $ctrldata[$rdm][2] = $y $ctrldata[$rdm][3] = $width $ctrldata[$rdm][4] = $hight $ctrldata[$rdm][5] = 0 Case "icon" If $width = -1 then $width = 50 If $hight = -1 then $hight = 50 $ct = GUICtrlCreateIcon(@scriptdir & "\dummy.ico", -1, $x, $y, $width, $hight) ReDim $ctrldata[$rdm + 1][8] $ctrldata[$rdm][0] = $ct $ctrldata[$rdm][1] = $x $ctrldata[$rdm][2] = $y $ctrldata[$rdm][3] = $width $ctrldata[$rdm][4] = $hight $ctrldata[$rdm][5] = "my text" Case "image" If $width = -1 then $width = 50 If $hight = -1 then $hight = 50 $ct = GUICtrlCreatePic(@scriptdir & "\dummy.bmp", $x, $y, $width, $hight) ReDim $ctrldata[$rdm + 1][8] $ctrldata[$rdm][0] = $ct $ctrldata[$rdm][1] = $x $ctrldata[$rdm][2] = $y $ctrldata[$rdm][3] = $width $ctrldata[$rdm][4] = $hight $ctrldata[$rdm][5] = "" Case "date" If $width = -1 then $width = 150 If $hight = -1 then $hight = 20 $ct = GUICtrlCreateDate("", $x, $y, $width, $hight) ReDim $ctrldata[$rdm + 1][8] $ctrldata[$rdm][0] = $ct $ctrldata[$rdm][1] = $x $ctrldata[$rdm][2] = $y $ctrldata[$rdm][3] = $width $ctrldata[$rdm][4] = $hight $ctrldata[$rdm][5] = "" Case "calender" If $width = -1 then $width = 180 If $hight = -1 then $hight = 164 $ct = GUICtrlCreateMonthCal("", $x, $y, $width, $hight) ReDim $ctrldata[$rdm + 1][8] $ctrldata[$rdm][0] = $ct $ctrldata[$rdm][1] = $x $ctrldata[$rdm][2] = $y $ctrldata[$rdm][3] = $width $ctrldata[$rdm][4] = $hight $ctrldata[$rdm][5] = "" Case "combo" If $width = -1 then $width = 50 If $hight = -1 then $hight = 30 $ct = GUICtrlCreateCombo("my text", $x, $y, $width, $hight) GUICtrlSetData(-1, "item1|item2|item3", "item1") ReDim $ctrldata[$rdm + 1][8] $ctrldata[$rdm][0] = $ct $ctrldata[$rdm][1] = $x $ctrldata[$rdm][2] = $y $ctrldata[$rdm][3] = $width $ctrldata[$rdm][4] = $hight $ctrldata[$rdm][5] = "item1|item2|item3" Case "listbox" If $width = -1 then $width = 150 If $hight = -1 then $hight = 150 $ct = GUICtrlCreatelist("my text", $x, $y, $width, $hight) ReDim $ctrldata[$rdm + 1][8] $ctrldata[$rdm][0] = $ct $ctrldata[$rdm][1] = $x $ctrldata[$rdm][2] = $y $ctrldata[$rdm][3] = $width $ctrldata[$rdm][4] = $hight $ctrldata[$rdm][5] = "my text" Case "tree" If $width = -1 then $width = 150 If $hight = -1 then $hight = 150 $ct = GUICtrlCreateTreeView("my text", $x, $y, $width, $hight) $td = GUICtrlCreateTreeViewItem("my text", $ct) GUICtrlCreateTreeViewItem("sub", $td) ReDim $ctrldata[$rdm + 1][8] $ctrldata[$rdm][0] = $ct $ctrldata[$rdm][1] = $x $ctrldata[$rdm][2] = $y $ctrldata[$rdm][3] = $width $ctrldata[$rdm][4] = $hight $ctrldata[$rdm][5] = "my text" Case "group" If $width = -1 then $width = 150 If $hight = -1 then $hight = 150 $ct = GUICtrlCreateGroup("my text", $x, $y, $width, $hight) ReDim $ctrldata[$rdm + 1][8] $ctrldata[$rdm][0] = $ct $ctrldata[$rdm][1] = $x $ctrldata[$rdm][2] = $y $ctrldata[$rdm][3] = $width $ctrldata[$rdm][4] = $hight $ctrldata[$rdm][5] = "my text" EndSwitch GUICtrlSetCursor($ct, 9) $ctrldata[$rdm][6] = $type $ctrldata[$rdm][7] = "$" & $type & $rdm - 1 $lao = $ct For $i = 0 to UBound($ctrldata) - 1 If $ctrldata[$i][0] = $lao and $lao <> "" Then GUICtrlSetData($xpos, $ctrldata[$i][1]) GUICtrlSetData($name, $ctrldata[$i][5]) GUICtrlSetData($width1, $ctrldata[$i][3]) GUICtrlSetData($hight1, $ctrldata[$i][4]) GUICtrlSetData($ypos, $ctrldata[$i][2]) GUICtrlSetData($handle, StringTrimLeft($ctrldata[$i][7], 1)) EndIf Next ControlFocus($board, "", GUICtrlGetHandle($ct)) EndFunc Func _deleteitem($item) GUICtrlDelete($item) For $i = 0 to UBound($ctrldata) - 1 If $ctrldata[$i][0] = $item and $item <> "" Then _ArrayDelete($ctrldata, $i) $lao = $ctrldata[$i - 1][0] GUICtrlSetData($xpos, $ctrldata[$i - 1][1]) GUICtrlSetData($name, $ctrldata[$i - 1][5]) GUICtrlSetData($width1, $ctrldata[$i - 1][3]) GUICtrlSetData($hight1, $ctrldata[$i - 1][4]) GUICtrlSetData($ypos, $ctrldata[$i - 1][2]) GUICtrlSetData($handle, StringTrimLeft($ctrldata[$i - 1][7], 1)) EndIf Next ControlFocus($board, "", $item) EndFunc Func _itemsetpos($x, $y, $item = $lao) GUICtrlSetPos($item, $x, $y) for $i = 0 to UBound($ctrldata) - 1 If $ctrldata[$i][0] = $item and $item <> "" Then $ctrldata[$i][1] = $x $ctrldata[$i][2] = $y GUICtrlSetData($xpos, $ctrldata[$i][1]) GUICtrlSetData($ypos, $ctrldata[$i][2]) EndIf Next EndFunc Func _itemsetname($name, $item = $lao) GUICtrlSetdata($item, $name) for $i = 0 to UBound($ctrldata) - 1 If $ctrldata[$i][0] = $item and $item <> "" Then $ctrldata[$i][5] = $name EndIf Next EndFunc Func _itemsetsize($x, $y, $item = $lao) for $i = 0 to UBound($ctrldata) - 1 If $ctrldata[$i][0] = $item and $item <> "" Then $ctrldata[$i][3] = $x $ctrldata[$i][4] = $y GUICtrlSetPos($item, $ctrldata[$i][1], $ctrldata[$i][2], $x, $y) EndIf Next EndFunc Func _round($number) If $number < 0 then Return 0 Global $n = $Number $ilen = StringLen($n) if StringTrimLeft($n, $ilen - 1) = 5 or StringTrimleft($n, $ilen - 1) = 0 Then Return $n if StringTrimLeft($n, $ilen - 1) > 5 Then Do $ilen = StringLen($n) if StringTrimLeft($n, $ilen - 1) <= 7 Then ;so that 7 will become 5 not 10 $n -= 1 ElseIf StringTrimLeft($n, $ilen - 1) >= 7 Then $n += 1 EndIf $ilen = StringLen($n) Until StringTrimLeft($n, $ilen - 1) = 5 or StringTrimleft($n, $ilen - 1) = 0 Else Do $ilen = StringLen($n) if StringTrimLeft($n, $ilen - 1) < 3 Then ;so that 3 will become 5 not 0 $n -= 1 ElseIf StringTrimLeft($n, $ilen - 1) >= 3 Then $n += 1 EndIf $ilen = StringLen($n) Until StringTrimLeft($n, $ilen - 1) = 5 or StringTrimleft($n, $ilen - 1) = 0 EndIf Return $n EndFunc Func _copy($item = $lao) For $i = 0 to UBound($ctrldata) - 1 If $ctrldata[$i][0] = $item and $item <> "" Then $copyobj[1] = $ctrldata[$i][1] $copyobj[2] = $ctrldata[$i][2] $copyobj[3] = $ctrldata[$i][3] $copyobj[4] = $ctrldata[$i][4] $copyobj[5] = $ctrldata[$i][5] $copyobj[6] = $ctrldata[$i][6] EndIf Next EndFunc Func _paste() If $copyobj[1] <> "" Then _createitem($copyobj[6], _round($cMsg[0]), _round($cMsg[1]), $copyobj[3], $copyobj[4]) _itemsetname($copyobj[5]) GUICtrlSetData($name, $copyobj[5]) EndIf EndFunc Func _compile($iflag=1) Global $au3 = ";created with guibuilder++" & @crlf & "#include <GUIConstantsEx.au3>" & @CRLF & "#include <WindowsConstants.au3>" & @CRLF $size = WinGetClientSize($board) $au3 &= $guihandle & " = GUICreate('" & WinGetTitle($board) & "'," & $size[0] & "," & $size[1] & ")" & @CRLF For $i = 0 To UBound($ctrldata) - 1 Switch $ctrldata[$i][6] Case "button" $au3 &= $ctrldata[$i][7] & " = GUICtrlCreateButton('" & $ctrldata[$i][5] & "'," & $ctrldata[$i][1] & "," & $ctrldata[$i][2] & "," & $ctrldata[$i][3] & "," & $ctrldata[$i][4] & ")" & @crlf Case "label" $au3 &= $ctrldata[$i][7] & " = GUICtrlCreateLabel('" & $ctrldata[$i][5] & "'," & $ctrldata[$i][1] & "," & $ctrldata[$i][2] & "," & $ctrldata[$i][3] & "," & $ctrldata[$i][4] & ")" & @crlf Case "input" $au3 &= $ctrldata[$i][7] & " = GUICtrlCreateInput('" & $ctrldata[$i][5] & "'," & $ctrldata[$i][1] & "," & $ctrldata[$i][2] & "," & $ctrldata[$i][3] & "," & $ctrldata[$i][4] & ")" & @crlf Case "Edit" $au3 &= $ctrldata[$i][7] & " = GUICtrlCreateEdit('" & $ctrldata[$i][5] & "'," & $ctrldata[$i][1] & "," & $ctrldata[$i][2] & "," & $ctrldata[$i][3] & "," & $ctrldata[$i][4] & ")" & @crlf Case "progress" $au3 &= $ctrldata[$i][7] & " = GUICtrlCreateProgress('" & $ctrldata[$i][5] & "'," & $ctrldata[$i][1] & "," & $ctrldata[$i][2] & "," & $ctrldata[$i][3] & "," & $ctrldata[$i][4] & ")" & @crlf Case "checkbox" $au3 &= $ctrldata[$i][7] & " = GUICtrlCreateCheckbox('jmn" & $ctrldata[$i][5] & "'," & $ctrldata[$i][1] & "," & $ctrldata[$i][2] & "," & $ctrldata[$i][3] & "," & $ctrldata[$i][4] & ")" & @crlf Case "radiobox" $au3 &= $ctrldata[$i][7] & " = GUICtrlCreateRadio('" & $ctrldata[$i][5] & "'," & $ctrldata[$i][1] & "," & $ctrldata[$i][2] & "," & $ctrldata[$i][3] & "," & $ctrldata[$i][4] & ")" & @crlf Case "slider" $au3 &= $ctrldata[$i][7] & " = GUICtrlCreateSlider('" & $ctrldata[$i][1] & "'," & $ctrldata[$i][2] & "," & $ctrldata[$i][3] & "," & $ctrldata[$i][4] & ")" & @crlf & "guictrlsetdata(-1," & $ctrldata[$i][5] & ")" & @crlf Case "icon" $au3 &= $ctrldata[$i][7] & " = GUICtrlCreateIcon('" & $ctrldata[$i][5] & "',-1," & $ctrldata[$i][1] & "," & $ctrldata[$i][2] & "," & $ctrldata[$i][3] & "," & $ctrldata[$i][4] & ")" & @crlf Case "image" $au3 &= $ctrldata[$i][7] & " = GUICtrlCreatePic('" & $ctrldata[$i][5] & "'," & $ctrldata[$i][1] & "," & $ctrldata[$i][2] & "," & $ctrldata[$i][3] & "," & $ctrldata[$i][4] & ")" & @crlf Case "date" $au3 &= $ctrldata[$i][7] & " = GUICtrlCreateDate('" & $ctrldata[$i][5] & "'," & $ctrldata[$i][1] & "," & $ctrldata[$i][2] & "," & $ctrldata[$i][3] & "," & $ctrldata[$i][4] & ")" & @crlf Case "calender" $au3 &= $ctrldata[$i][7] & " = GUICtrlCreateMonthCal('" & $ctrldata[$i][5] & "'," & $ctrldata[$i][1] & "," & $ctrldata[$i][2] & "," & $ctrldata[$i][3] & "," & $ctrldata[$i][4] & ")" & @crlf Case "combo" $au3 &= $ctrldata[$i][7] & " = GUICtrlCreateCombo('" & $ctrldata[$i][5] & "'," & $ctrldata[$i][1] & "," & $ctrldata[$i][2] & "," & $ctrldata[$i][3] & "," & $ctrldata[$i][4] & ")" & @crlf Case "listbox" $au3 &= $ctrldata[$i][7] & " = GUICtrlCreateList('" & $ctrldata[$i][5] & "'," & $ctrldata[$i][1] & "," & $ctrldata[$i][2] & "," & $ctrldata[$i][3] & "," & $ctrldata[$i][4] & ")" & @crlf Case "tree" $au3 &= $ctrldata[$i][7] & " = GUICtrlCreateTreeView('" & $ctrldata[$i][5] & "'," & $ctrldata[$i][1] & "," & $ctrldata[$i][2] & "," & $ctrldata[$i][3] & "," & $ctrldata[$i][4] & ")" & @crlf Case "group" $au3 &= $ctrldata[$i][7] & " = GUICtrlCreateGroup('" & $ctrldata[$i][5] & "'," & $ctrldata[$i][1] & "," & $ctrldata[$i][2] & "," & $ctrldata[$i][3] & "," & $ctrldata[$i][4] & ")" & @crlf EndSwitch next $au3 &= "GUISetState()" & @CRLF & "while 1" & @CRLF & @TAB & "Switch GUIGetMsg()" & @CRLF & @TAB & @TAB & "Case -3" & @CRLF & @TAB & "Exit" & @crlf & @TAB & "EndSwitch" & @CRLF & "WEnd" if $iflag Then GUICtrlSetData($code, $au3) GUISetState(@SW_SHOW, $codescreen) EndIf EndFunc

for technical reasons "(" = "[" (autoit) code goes here (/autoit)

im trying to make a gui editor but i have a problem i need to be able to make an infinate amount of dragable buttons i tryed this but it dosent work $board = GUICreate('',500,500) Global $buttons[2] $buttons[0] = GUICtrlCreateButton("button 1",0,0,20,20) $buttons[1] = GUICtrlCreateButton("button 2",100,100,20,20) GUISetState(@SW_SHOW,$board) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit case -7,$buttons[_ArraySearch($button,$nMsg)] _drag($board,$buttons[_ArraySearch($button,$nMsg)]) EndSwitch WEnd

I updated it to 0.2.0.1

$startup = GUICreate("startup",400,250,-1,-1,$WS_POPUPWINDOW,-1) GUISetBkColor(0xFFFFFF,$startup) GUICtrlCreateProgress(0,230,400,20,-1,-1) GUICtrlCreateIcon("my icon.ico",-1,70,60,150,150,-1,-1) GUICtrlCreateLabel("CodeQ",80,100,230,62,-1,-1) GUICtrlSetFont(-1,48,400,0,"OCR A Std") GUICtrlSetBkColor(-1,"-2") GUICtrlCreateLabel("1.2",270,160,48,17,-1,-1) GUICtrlSetFont(-1,15,400,0,"OCR A Std") GUICtrlSetBkColor(-1,"-2") $Graphic1 = GUICtrlCreateGraphic(0, 0, 389, 157) GUICtrlSetGraphic(-1, $GUI_GR_PENSIZE, 12) GUICtrlSetGraphic(-1, $GUI_GR_COLOR, 0xFF0000) GUICtrlSetGraphic(-1, $GUI_GR_MOVE, 4, 77) GUICtrlSetGraphic(-1, $GUI_GR_BEZIER, 311, -3, 84, 86, 249, 96) ;<<-- i want this GUICtrlSetGraphic(-1, $GUI_GR_COLOR, 0x000080) GUICtrlSetGraphic(-1, $GUI_GR_MOVE, -15, 93) GUICtrlSetGraphic(-1, $GUI_GR_BEZIER, 334, -8, 64, 104, 280, 126);<<--and this ontop GUISetState(@SW_SHOW,$startup)im trying to make a gui that has 2 lines how can i make the lines ontop of an icon and a label

i have started a new project and i need to know how microsoft word highlights spelling mistakes and add images i looked at RichEdit ith no luck All i know that the class for ms word documents is _Wwg

what about if you have new tabs e.g. the tabs in scite?

how did you intergrate your plugins with the gui so well?

what does this do

Sorry didn't know about the pm (don't use forums much)

it is sad that autoit will never be ported to mac/linux especially considuring its writen in C++ which means the porting prossess would be easier than other applcations. any way if you wanted to use it on mac you could always use an windows emulator

codeq the code multi-language code editor now updated to 0.2.0.1 laungages - java - autoit needed - C/C#/C++ - Flash AS - js - lua - php - python format [m1] ; functions /[m1] [m2] ; macros /[m1] [m3] ; udfs /[m3] [m4] ; ??? /[m4] [imports] ; imports /[imports]Downloads and more | | V http://code.google.com/p/codeq/

what are the com objects for autoit e.g. autoit.error

does the eclipse for CC++ compiler work for a plugin dll

im developing my own script editor for more than autoit e.g php js c++ etc how did you get the autocomplete function to be called when a charecter was typed into the control

in a switch loop how can i get a notification on when the contrlo has been edited but it stops while 1 switch Sci_GetModify($Sci) case 1 msgbox(0,"","the control has been edited") endswitch wend this script will cause the message box to keep reapearing

im making a program with autoit i want to make it so if i click on a spesific file type (eg file.ext) it opens with my program and sets the file name as a $variable please help

thanks but i fixed the glitch of it not being in the middle of the screen #include <GUIConstantsEx.au3> #include <guictrlonhover.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #include <GuiConstants.au3> #include <WindowsConstants.au3> #include <ButtonConstants.au3> #include <StaticConstants.au3> #include <WinAPI.au3> #include <GUIConstantsEx.au3> ;#FUNCTIONS# ==================================================================================================================== ;_MsgBoxCreate ;_MsgBoxCuStyle ; =============================================================================================================================== Global $mcolour2 = 0x191919, $mcolour1 = 0x8C8C8C ; #FUNCTION# ==================================================================================================================== ; Name...........: _MsgBoxCreate ; Description ...: Better looking message boxes with custom styles ; Syntax.........: _MsgBoxCreate($mflag = 1,$mtitle = "title",$mline1 = "line 1",$mline2 = "line 2",$mline3 = "line 3") ; Parameters ....: $mflag - Flag for message box 1 = ok 2 = yes/no 3 = retry/ignore/Cancel ; $mtitle - Title of message box ; $mline1 - The first line of the message box ; $mline2 - The second line of the message box ; $mline3 - The third line of the message box ; Output.........: $output - if $output = 0 then, clicked on the X 1 then, clicked on ok 2 then, clicked on yes 3 then, clicked on no ; 4 then, clicked on retry 5 then, clicked on abort 6 then, clicked on ignore ; ; styles.........: global $mcolour1 = <colour code 1>, $mcolour2 = <colour code 2> to set the colour ; Author ........: Sycam inc (sean campbell) ; Remarks .......: none ; Related .......: ; =============================================================================================================================== Func _MsgBoxCreate($mflag,$mtitle,$mline1,$mline2,$mline3) $1 = @DesktopWidth/2 $width = $1-300 $2 = @DesktopHeight/2 $hight = $2-200 global $msgboxgui = GUICreate($mtitle, 600, 400,$width,$hight, BitOR($WS_POPUP, $WS_SYSMENU, $WS_EX_LAYERED)) GUISetBkColor($mcolour1) $exit = GUICtrlCreateLabel("",585,0,15,15,$GUI_GR_RECT) $Graphic1 = GUICtrlCreateGraphic(0, 0, 600, 75) GUICtrlSetGraphic(-1, $GUI_GR_COLOR, $mcolour2, $mcolour2) GUICtrlSetGraphic(-1, $GUI_GR_RECT, 0, 0, 600, 75) GUICtrlSetGraphic(-1, $GUI_GR_PENSIZE, 4) GUICtrlSetGraphic(-1, $GUI_GR_COLOR, $mcolour1, $GUI_GR_NOBKCOLOR) GUICtrlSetGraphic(-1, $GUI_GR_MOVE, 600, 0) GUICtrlSetGraphic(-1, $GUI_GR_LINE, 585, 15) GUICtrlSetGraphic(-1, $GUI_GR_MOVE, 585, 0) GUICtrlSetGraphic(-1, $GUI_GR_LINE, 600, 15) $Graphic2 = GUICtrlCreateGraphic(0, 325, 605, 80) GUICtrlSetGraphic(-1, $GUI_GR_COLOR, $mColour2, $mcolour2) GUICtrlSetGraphic(-1, $GUI_GR_RECT, 0, 0, 600, 75) if $mflag = 1 Then $ok = GUICtrlCreateLabel(" ok", 200, 200, 200, 35) GUICtrlSetFont(-1, 20, 400, 0, "Myriad Web Pro") GUICtrlSetBkColor(-1, $mColour2) guictrlsetcolor(-1,$mcolour1) Else if $mflag = 2 Then $yes = GUICtrlCreateLabel(" yes", 90, 200, 200, 35) GUICtrlSetFont(-1, 20, 400, 0, "Myriad Web Pro") GUICtrlSetBkColor(-1, $mColour2) guictrlsetcolor(-1,$mColour1) $no = GUICtrlCreateLabel(" no", 310, 200, 200, 35) GUICtrlSetFont(-1, 20, 400, 0, "Myriad Web Pro") GUICtrlSetBkColor(-1, $mColour2) GUICtrlSetColor(-1, $mColour1) Else If $mflag = 3 Then $retry = GUICtrlCreateLabel(" retry", 10, 200, 180, 35) GUICtrlSetFont(-1, 20, 400, 0, "Myriad Web Pro") GUICtrlSetBkColor(-1, $mColour2) guictrlsetcolor(-1,$mColour1) $abort = GUICtrlCreateLabel(" abort", 210, 200, 180, 35) GUICtrlSetFont(-1, 20, 400, 0, "Myriad Web Pro") GUICtrlSetBkColor(-1, $mColour2) guictrlsetcolor(-1,$mColour1) $ignore = GUICtrlCreateLabel(" ignore", 410, 200, 180, 35) GUICtrlSetFont(-1, 20, 400, 0, "Myriad Web Pro") GUICtrlSetBkColor(-1, $mColour2) guictrlsetcolor(-1,$mColour1) EndIf EndIf EndIf $Label2 = GUICtrlCreateLabel($mtitle, 20, 15, 560, 50) GUICtrlSetFont(-1, 28, 400, 0, "Impact") GUICtrlSetColor(-1, $mColour1) GUICtrlSetBkColor(-1,$mColour2) $Label3 = GUICtrlCreateLabel($mline1, 100, 100, 400, 25) GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif") GUICtrlSetColor(-1, $mColour2) $Label4 = GUICtrlCreateLabel($mline2, 100, 125, 400, 25) GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif") GUICtrlSetColor(-1, $mColour2) $Label5 = GUICtrlCreateLabel($mline3, 100, 150, 600, 25) GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif") GUICtrlSetColor(-1, $mColour2) GUISetState(@SW_SHOW) if $mflag = 1 Then While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $GUI_EVENT_PRIMARYDOWN Drag() Case $exit GUIDelete($msgboxgui) Global $output = 0 ExitLoop Case $ok Global $output = 1 GUIDelete($msgboxgui) ExitLoop ;Case $msgboxgui EndSwitch WEnd Else if $mflag = 2 Then While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $GUI_EVENT_PRIMARYDOWN Drag() Case $exit GUIDelete($msgboxgui) Global $output = 0 ExitLoop Case $yes Global $output = 2 GUIDelete($msgboxgui) ExitLoop Case $no Global $output = 3 GUIDelete($msgboxgui) ExitLoop ; Case $msgboxgui EndSwitch WEnd Else if $mflag = 3 then While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $GUI_EVENT_PRIMARYDOWN Drag() Case $exit GUIDelete($msgboxgui) Global $output = 0 ExitLoop Case $retry Global $output = 4 GUIDelete($msgboxgui) ExitLoop Case $ignore Global $output = 6 GUIDelete($msgboxgui) ExitLoop case $abort Global $output = 5 GUIDelete($msgboxgui) ExitLoop ;Case $msgboxgui EndSwitch WEnd EndIf EndIf EndIf EndFunc Func Drag() dllcall("user32.dll","int","ReleaseCapture") dllcall("user32.dll","int","SendMessage","hWnd", $msgboxgui,"int",$WM_NCLBUTTONDOWN,"int", $HTCAPTION,"int", 0) EndFunc

the look of the message box was semi-inspired by norton360 message boxes #info#========================================================= flags - 1 = ok - 2 = yes no - 3 = retry ignore abort getting the output - if $output = 0 then, clicked on the X 1 then, clicked on ok 2 then, clicked on yes 3 then, clicked on no 4 then, clicked on retry 5 then, clicked on abort 6 then, clicked on ignore setting the style - use global $mcolour1 = <colour code 1>, $mcolour2 = <colour code 2> to set the colour #============================================================== example script #include <MsgBox++.au3> Global $mcolour1 = 0xffffff, $mcolour2 = 0x0d1d1d1d ;sets the colour to black and white _MsgBoxCreate(1," an example script for MsgBox++","to set the colour use","global $mcolour1 = <colour code 1>, $mcolour2 ="," <colour code 2> to set the colour") _MsgBoxCreate(2," yes and no","the output for the last box was " & $output,"","") _MsgBoxCreate(3," retry, abort and ignore","the output for the last box was " & $output,"","") _MsgBoxCreate(1," finnished","the output for the lst box was " & $output,"","")msgbox++.au3

i used this udf and i didnt get an error code but it didnt work #include <zip.au3> $hFolder = "D:7z-shell" $hZipFile = "@AppDataDir & 'hello.zip'" $flag = '1' _Zip_AddFolderContents($hZipFile, $hFolder, $flag = 1)

can you please change your download mirror as it is outdated