ReDFlaG

Hi Guys, Since my beloved Macrium is no more avaliable for free, i decided to try to make somewhat usefull to do the same. I'm afraid autoit is not the most suitable language to do so, but i wanted to give it a try before having to learn C# After some days, here is what i've done. A very simple GUI for now, this will be more polish if it technically works It READS the sectors, but i'm not sure that the datas are usable in the target file it can't WRITE the sectors back to the device, i got some errors but can't find a fix. If some of you are willing to make this work , feel free to Other improvement i tryed to work on (with no more success) Skipping empty sectors to speed up backup process, but did no successfully do . Thanks . abackup.au3

both solution are working. thanks

Hi Little issue with that simple code, may someone tell me why i can' t have the array displayed ? #include <Timers.au3> #include <Array.au3> #include <GUIConstantsEx.au3> $mainwindow = GUICreate("TEST", 400, 320) GUISetState(@SW_SHOW) global $arr_switch[5] = ["Item 0", "Item 1", "Item 2", "Item 3", "Item 4"] Func _AutoRefresh($hWnd, $Msg, $iIDTimer, $dwTime) #forceref $hWnd, $Msg, $iIDTimer, $dwTime _ArrayDisplay($arr_switch) EndFunc $autorefresh=_Timer_SetTimer ($mainwindow,6000,"_AutoRefresh") While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE ExitLoop EndSwitch WEnd Thanks

Many thanks!

Hello all, When i change the name of a tab, the items that are holded into the tab disappear. i've found a workaround but it makes the GUI flicker: GUISetState(@SW_HIDE) then GUISetState(@SW_SHOW) Is there a clean way to do solve this issue ? Thanks Here 's an example of the issue: #include <Constants.au3> #include <Array.au3> #include <GuiTab.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> $mainwindow=GUICreate ('test',850,750,-1,-1,$WS_SIZEBOX+$WS_SYSMENU) $hTab = GUICtrlCreateTab(5, 10,800, 700) GUISetState() $Tab1= GUICtrlCreateTabItem("TAB ") GUICtrlCreateCheckbox("#",20,50,70,50) GUICtrlCreateCheckbox("#",20,100,70,50) GUICtrlCreateCheckbox("#",20,150,70,50) GUICtrlCreateCheckbox("#",20,200,70,50) GUICtrlCreateTabItem("") sleep(5000) _GUICtrlTab_SetItemText($hTab,0,"CHANGED") Do Until GUIGetMsg() = $GUI_EVENT_CLOSE GUIDelete()

Many thanks for your answers! Each one had provided me the help i needed

Hello, i'm trying to generate a various number of tabs that are each one "linked" to a variable name so that i can guiswitch. i got issue when i try to switch between tabs because the variable are not declared. here's the code $mainwindow=GUICreate ('Fiber Switch Monitor',850,750,-1,-1,$WS_SIZEBOX+$WS_SYSMENU) $hTab = GUICtrlCreateTab(5, 10,800, 700) GUISetState() For $i = 1 To UBound($arr_switch) - 1 assign ("hTab_"&$i , GUICtrlCreateTabItem("Switch "&$arr_switch[$i][1]),2) Next ;this popup ok and eval values are: 7 , 8 , 9 and 10. donno why. For $i = 1 To UBound($arr_switch) - 1 $temp=Eval("hTab_"&$i) If IsDeclared("hTab_"&$i) Then MsgBox(0, "hTab_"&$i&" declared", "eval: "&$temp) EndIf Next ;this fail GUISwitch($mainwindow, $hTab_1) GUICtrlCreateCheckbox("port #",20,20,70,50) If you can provide some help? Thanks a lot

@Authenticity your code work ! thanks

This code was working with an older version of autoit, Thanks for your help i'll try to solve that.

Thanks all of you. To answer back to kafu, i'd noticed that the problem was the $Diag with a 0 value. But i do not understand why, since it should got one (index number of the entrie). To be more clear i put 2 examples below: #include <GUIConstants.au3> GUICreate ("Test",750,450) $ListViewContext= GUICtrlCreateContextMenu() $Diag= GUICtrlCreateMenuitem("DiagIt", $ListViewContext) GUISetState() ;======================================================= While 1 $msg = GUIGetMsg() Select Case $msg = $Diag MsgBox(0,"ooops","oooops") EndSelect MsgBox(0,"test",$Diag) ConsoleWrite($Diag & @tab & $msg & @crlf) WEnd Value is 4. (perfect for me) #include <GUIConstants.au3> $mainwindow=GUICreate ("Test",750,450) $ListViewContext= GUICtrlCreateContextMenu($mainwindow) $Diag= GUICtrlCreateMenuitem("DiagIt", $ListViewContext) GUISetState() ;======================================================= While 1 $msg = GUIGetMsg() Select Case $msg = $Diag MsgBox(0,"ooops","oooops") EndSelect MsgBox(0,"test",$Diag) ConsoleWrite($Diag & @tab & $msg & @crlf) WEnd Value is 0. Why did it not get an "index" (item?) number. I must use a var to name the windows because i create different gui at the same time so i must handle the $GUI_EVENT_CLOSE differently:

Hello all, Here's a code that do NOT work #include <GUIConstants.au3> $mainwindow=GUICreate ("Test",750,450) $ListViewContext= GUICtrlCreateContextMenu($mainwindow) $Diag= GUICtrlCreateMenuitem("DiagIt", $ListViewContext) GUISetState() ;======================================================= While 1 $msg = GUIGetMsg() Select Case $msg = $Diag MsgBox(0,"ooops","oooops") EndSelect WEnd Here's a code that work: #include <GUIConstants.au3> $mainwindow=GUICreate ("Test",750,450) $ListViewContext= GUICtrlCreateContextMenu() $Diag= GUICtrlCreateMenuitem("DiagIt", $ListViewContext) GUISetState() ;======================================================= While 1 $msg = GUIGetMsg() Select Case $msg = $Diag MsgBox(0,"ooops","oooops") EndSelect WEnd I don't understand why it loops on the msgbox on the first one. (it shouldn't) The second one works, but the menu is only available when right clicking on the windows'name. I'd like that the menu be available when clicking anywhere in the main windows. Can you help? Thanks.

i'v done it like that: Do $temp = StderrRead($pid) $msg2 = GUIGetMsg() If $msg2 = $Stop Then ProcessClose ( "stuff.exe") ExitLoop EndIf Until @error and it's working. thanks.

My bad, it was bad copy/past. But the issue is still the same: how to kill the processe (via a button in the GUI) while the process is still running and you are executing the loop? (it seems that i can't do anything while the prog is reading the stderr). By the way, your loop is nicer than the one i was using, i'll use yours now, thanks!

hello, i launch a third party software via a button in a form $pid = Run(@ScriptDir &'\stuff.exe, '', @SW_HIDE, $STDERR_CHILD ) While 1 $temp &= StderrRead($pid) If @error Then ExitLoop Wend oÝ÷ ÚØb²è+-jH§Ê&zئzÊ"¦ëZaz¶î¶Ú'{h¶¢¹¬¢ØZ¶'é­ë,yØ­²Ú)²Ø^¦º ëb¶ÇÉè¶Ú0¢¹yÆ®±ç¯zx޲ȭÛzk-«b«Þm¶ªºajwjºb¶¼vÚ%£«¶©®*+ܨ~Ø^¦ºz˺Ú"µÍØÙÜÔÙ][Ü]H ][ÝÜÝY^I][ÝËJB but it's not working. Can someone help? Thanks.

thanks a lot to all of you, it's working perfectly.