joseLB Posted August 9, 2019 Posted August 9, 2019 (edited) 4 minutes ago, Jos said: I am obviously running the latest Beta, but would have expected the same for the latest production. Did you try the small script on your latest production install and did it not generate the errors? Jos I´m not sure about if my instaled version is the last one. I will ckeck, upgrade if needed and make this test. At my current production version it´s not warning about eval. So, probably is not the latest one. Edited August 9, 2019 by joseLB
joseLB Posted August 9, 2019 Posted August 9, 2019 oops, mistake: just ruiing the samll test, it Works... >Running Au3Stripper (19.102.1901.0) from:C:\Program Files (x86)\AutoIt3\SciTE\Au3Stripper cmdline: - 0.03 Iteration 1 Strip and Rename Functions result: Output 7 lines and stripped 0 lines -### StripOnly/StripFunc Error: Found eval() statement using unsolvable variable, which will/could lead to removal of Global Const definition for this variable. >### current Func: @@ C:\Users\JOS~1\AppData\Local\Temp\OBsED45.tmp(3,1): Warning for line:MsgBox(4096,$K, GUICtrlRead( eval("tlNivMan_" & $K) ) &@cr& eval("tlNivMan_" & $K) &@cr& "tlNivMan_" & $K ) -### StripOnly/StripFunc Error: Found eval() statement using unsolvable variable, which will/could lead to removal of Global Const definition for this variable. >### current Func: @@ C:\Users\JOS~1\AppData\Local\Temp\OBsED45.tmp(3,1): Warning for line:MsgBox(4096,$K, GUICtrlRead( eval("tlNivMan_" & $K) ) &@cr& eval("tlNivMan_" & $K) &@cr& "tlNivMan_" & $K ) -### StripOnly/StripFunc Error: Found eval() statement using unsolvable variable, which will/could lead to removal of Global Const definition for this variable. >### current Func: @@ C:\Users\JOS~1\AppData\Local\Temp\OBsED45.tmp(4,1): Warning for line:If GUICtrlRead( eval( "tlNivMan_" & $K) ) = $GUI_CHECKED Then -============================================================================================================= -#### Au3Stripper Found 3 Error(s)!!!! This means your script could have problems running properly. #### -============================================================================================================= - 0.03 Iteration 2 Strip Variables result: Output 7 lines and stripped 0 lines - 0.05 Iteration 3 Strip and Rename Variables result: Output 7 lines and stripped 0 lines
Developers Jos Posted August 9, 2019 Author Developers Posted August 9, 2019 So now I am wondering what you have in that script that makes it not report the issue. Can you share it, or a stripped down version that doesn't report these errors? Jos SciTE4AutoIt3 Full installer Download page - Beta files Read before posting How to post scriptsource Forum etiquette Forum Rules Live for the present, Dream of the future, Learn from the past.
joseLB Posted August 9, 2019 Posted August 9, 2019 2 minutes ago, Jos said: So now I am wondering what you have in that script that makes it not report the issue. Can you share it, or a stripped down version that doesn't report these errors? Jos It´s ok to share. The problem is that to work/compile as this is a 4 year Project, and is not so organized as supposed, I have parts scatered in many places. So, I will try to mount a stripped down version code with the problem so i can send you. But it will be a little later, ok. I´m in office just now.
joseLB Posted August 9, 2019 Posted August 9, 2019 I think I got the compilation withou the warning arround the same piece of code. While not totaly functional, I think it fullfil your needs. expandcollapse popup#AutoIt3Wrapper_Run_Au3Stripper=y #Au3Stripper_Parameters=/so /rm #include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #include <ComboConstants.au3> #include <ListviewConstants.au3> #include <GUIListView.au3> #include <EditConstants.au3> #include <Array.au3> #include <Date.au3> #include <ScreenCapture.au3> #include <SLG.au3> #include <File.au3> #include <FileConstants.au3> #include <SliderConstants.au3> #include <CommMG.au3> #include <TrayConstants.au3> Opt("GUIOnEventMode",1) ;modo de interação com usuário via Eventos e não guiGetMsg Func NivelDensidadeManual() ;este é um modelo de rotina ativada pelo Menu_manut, que tem botões que executam atividades quaisquer. ;diferente das rotinas feitas até agora (08/08/19) , foi feita uma simplificação. Aqui os eventos dos campos da tela e do "X", chama diretamente a rotina, atraves ; dos comandos GUISetOnEvent($GUI_EVENT_CLOSE, "NivelDensidadeManual") e GUICtrlSetOnEvent(-1, "NivelDensidadeManual") colocados na definição da tela abaixo Static $tl_NivDenMan=0, $tlNivMan_endEL=0, $tlNivMan_nomEL=0,$tlNivMan_btSalvar=0, $tlNivMan_motivo=0 Static $tlNivMan_1=0,$tlNivMan_2=0,$tlNivMan_3=0,$tlNivMan_4=0,$tlNivMan_5=0,$tlNivMan_6=0,$tlNivMan_7=0,$tlNivMan_8=0,$tlNivMan_9=0,$tlNivMan_10=0, $tlNivMan_11=0 Static $tlDenMan_1=0,$tlDenMan_2=0,$tlDenMan_3=0,$tlDenMan_4=0,$tlDenMan_5=0,$tlDenMan_6=0,$tlDenMan_7=0,$tlDenMan_8=0,$tlDenMan_9=0 Static $endELNiv=1, $nomELNiv="", $EL_Nom=0 local $msgCTRL=0, $msgTela If $tl_NivDenMan = 0 Then ;#### Momento1: criação da tela #Region ### START Koda GUI section ### Form=C:\SMB\Central_PC\V6\testeDensidade.kxf $tl_NivDenMan = GUICreate("Nivel & Densidade Manuais", 304, 361, 595, 226) GUISetBkColor(0xFFFFFF) GUISetOnEvent($GUI_EVENT_CLOSE, "NivelDensidadeManual") $Group1 = GUICtrlCreateGroup("NÍVEL", 80, 12, 73, 341) $tlNivMan_1 = GUICtrlCreateRadio("+25", 88, 35, 57, 17) GUICtrlSetFont(-1, 14, 400, 0, "MS Sans Serif") $tlNivMan_2 = GUICtrlCreateRadio("+20", 88, 63, 49, 17) GUICtrlSetFont(-1, 14, 400, 0, "MS Sans Serif") $tlNivMan_3 = GUICtrlCreateRadio("+15", 87, 91, 49, 17) GUICtrlSetFont(-1, 14, 400, 0, "MS Sans Serif") $tlNivMan_4 = GUICtrlCreateRadio("+10", 87, 119, 49, 17) GUICtrlSetFont(-1, 14, 400, 0, "MS Sans Serif") $tlNivMan_5 = GUICtrlCreateRadio("+5", 86, 149, 49, 17) GUICtrlSetFont(-1, 14, 400, 0, "MS Sans Serif") $tlNivMan_6 = GUICtrlCreateRadio("nivel", 86, 177, 65, 17) GUICtrlSetState(-1, $GUI_CHECKED) GUICtrlSetFont(-1, 14, 800, 0, "Arial") $tlNivMan_7 = GUICtrlCreateRadio("-5", 87, 208, 49, 17) GUICtrlSetFont(-1, 14, 400, 0, "MS Sans Serif") $tlNivMan_8 = GUICtrlCreateRadio("-10", 87, 236, 49, 17) GUICtrlSetFont(-1, 14, 400, 0, "MS Sans Serif") $tlNivMan_9 = GUICtrlCreateRadio("-15", 86, 264, 49, 17) GUICtrlSetFont(-1, 14, 400, 0, "MS Sans Serif") $tlNivMan_10 = GUICtrlCreateRadio("-20", 86, 292, 49, 17) GUICtrlSetFont(-1, 14, 400, 0, "MS Sans Serif") $tlNivMan_11 = GUICtrlCreateRadio("-25", 85, 322, 49, 17) GUICtrlSetFont(-1, 14, 400, 0, "MS Sans Serif") GUICtrlCreateGroup("", -99, -99, 1, 1) $tlNivMan_endEL = GUICtrlCreateInput("", 8, 36, 41, 28) GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif") GUICtrlSetOnEvent(-1, "NivelDensidadeManual") $Label1 = GUICtrlCreateLabel("endEL", 4, 12, 51, 24) GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif") GUICtrlSetTip(-1, "endereço EL medido") $tlNivMan_nomEL = GUICtrlCreateInput("", 9, 108, 41, 28) GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif") $Label2 = GUICtrlCreateLabel("nomEL", 5, 84, 55, 24) GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif") $tlNivMan_btSalvar = GUICtrlCreateButton("SALVAR", 8, 300, 63, 53) GUICtrlSetOnEvent(-1, "NivelDensidadeManual") $Group3 = GUICtrlCreateGroup("DENSIDADE", 160, 12, 137, 341) $tlDenMan_1 = GUICtrlCreateRadio("até 1.125", 168, 35, 117, 17) GUICtrlSetFont(-1, 12, 800, 0, "Arial") $tlDenMan_2 = GUICtrlCreateRadio("1.125 a 1.150", 168, 67, 117, 17) GUICtrlSetFont(-1, 12, 800, 0, "Arial") $tlDenMan_4 = GUICtrlCreateRadio("1.175 a 1.200", 168, 140, 117, 17) GUICtrlSetFont(-1, 12, 800, 0, "Arial") $tlDenMan_3 = GUICtrlCreateRadio("1.150 a 1.175", 168, 104, 117, 17) GUICtrlSetFont(-1, 12, 800, 0, "Arial") $tlDenMan_5 = GUICtrlCreateRadio("1.200 a 1.225", 168, 175, 117, 17) GUICtrlSetFont(-1, 12, 800, 0, "Arial") $tlDenMan_8 = GUICtrlCreateRadio("1.275 a 1.300", 168, 288, 117, 17) GUICtrlSetFont(-1, 12, 800, 0, "Arial") $tlDenMan_6 = GUICtrlCreateRadio("1.225 a 1.250", 168, 215, 117, 17) GUICtrlSetFont(-1, 12, 800, 0, "Arial") $tlDenMan_7 = GUICtrlCreateRadio("1.250 a 1.275", 168, 256, 117, 17) GUICtrlSetFont(-1, 12, 800, 0, "Arial") $tlDenMan_9 = GUICtrlCreateRadio("1.300 e acima", 168, 323, 121, 17) GUICtrlSetFont(-1, 12, 800, 0, "Arial") GUICtrlCreateGroup("", -99, -99, 1, 1) $tlNivMan_motivo = GUICtrlCreateCombo("rotina", 4, 180, 73, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL)) GUICtrlSetData(-1, "+solução|+agua|carga|descarga") GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif") $Label3 = GUICtrlCreateLabel("motivo", 4, 156, 50, 24) GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif") GUICtrlSetTip(-1, "motivo para a medida manual") GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### Else $msgCTRL= @GUI_CtrlId $msgTela= @GUI_WinHandle EndIf ;###Momento2: usuario clicou num dos botões da tela ; GUICtrlSetData( $tlNivMan_endEL, $endELNiv) ;mantem o ultimo endEL digitado ; $nomELNiv= $Els[$endELNiv][$EL_Nom] ; GUICtrlSetData($tlNivMan_nomEL, $nomELNiv) GUICtrlSetState($tlNivMan_endEL, $GUI_FOCUS) Switch $msgCTRL ;caso rotina tenha sido chamada por click em um de seus botões... Case 0 Case $GUI_EVENT_CLOSE If $msgTela = $tl_NivDenMan Then ;se clicou no "X" desta própria tela, ela deixa de ser vista, porém nao é apagada. GUIDelete($tl_NivDenMan) ;tela é apagada e todos os parametros forçam a criar nova tela se chamar novamente $tl_NivDenMan= 0 ;indica que a tela deve ser criada novamente se clicar no botao $msgCTRL= 0 $msgTela= 0 Return EndIf Case $tlNivMan_btSalvar $endELNiv= GUICtrlRead($tlNivMan_endEL) GUICtrlSetState( $tlNivMan_endEL, $GUI_FOCUS) $nivel=0 $densidade=0 For $K=1 to 11 MsgBox(4096,$K, GUICtrlRead( eval ( "tlNivMan_" & $K) ) &@cr& eval ( "tlNivMan_" & $K) &@cr& "tlNivMan_" & $K ) If GUICtrlRead( eval ( "tlNivMan_" & $K) ) = $GUI_CHECKED Then $nivel= 25 - ($K-1) * 5 EndIf Next For $K=1 to 9 If GUICtrlRead( eval ( "tlDenMan_" & $K) ) = $GUI_CHECKED Then $densidade= 1.101 + (($K-1)* 0.025) EndIf Next $motivo= GUICtrlRead( $tlNivMan_motivo ) TrayTip("Nivel/Densidade EL " &$endELNiv & " salvos" ,"nivel=" & $nivel &@cr& "densidade=" & $densidade &@cr& "motivo=" & $motivo,2) ; FileWriteline($arqLog,"NDM;" & @HOUR &":"& @MIN &":"& @SEC &";"& $endELNiv &";"& $motivo &";"& $nivel &";"& $densidade) $endELNiv +=1 ; $nomELNiv= $Els[$endELNiv][$EL_Nom] GUICtrlSetData($tlNivMan_nomEL, $nomELNiv) GUICtrlSetData($tlNivMan_endEL, $endELNiv) GUICtrlSetState( $tlNivMan_endEL, $GUI_FOCUS) ; GUICtrlSetState($tlNivMan_6, $GUI_CHECKED) Case $tlNivMan_endEL $endELNiv= GUICtrlRead($tlNivMan_endEL) ; $nomELNiv= $Els[$endELNiv][$EL_Nom] GUICtrlSetData($tlNivMan_nomEL, $nomELNiv) GUICtrlSetData($tlNivMan_endEL, $endELNiv) Case Else ;aqui alternativamente pode ser implementado o momento3 (chamada por Func ExecFuncoesAdicionais()) EndSwitch EndFunc NivelDensidadeManual() while 1 sleep(200) WEnd >"C:\Program Files (x86)\AutoIt3\SciTE\..\AutoIt3.exe" "C:\Program Files (x86)\AutoIt3\SciTE\AutoIt3Wrapper\AutoIt3Wrapper.au3" /ShowGui /prod /in "C:\SMB\Central_PC\V6\lixo.au3" +>15:07:28 Starting AutoIt3Wrapper v.19.102.1901.0 SciTE v.4.1.2.0 Keyboard:00000416 OS:WIN_7/Service Pack 1 CPU:X64 OS:X64 Environment(Language:0416) CodePage:0 utf8.auto.check:0 +> SciTEDir => C:\Program Files (x86)\AutoIt3\SciTE UserDir => C:\Users\José\AppData\Local\AutoIt v3\SciTE\AutoIt3Wrapper SCITE_USERHOME => C:\Users\José\AppData\Local\AutoIt v3\SciTE -> No changes made.. >Running AU3Check (3.3.14.5) from:C:\Program Files (x86)\AutoIt3 input:C:\SMB\Central_PC\V6\lixo.au3 +>15:07:31 AU3Check ended.rc:0 >Running Au3Stripper (19.102.1901.0) from:C:\Program Files (x86)\AutoIt3\SciTE\Au3Stripper cmdline: - 3.61 Iteration 1 Strip and Rename Functions result: Output 4232 lines and stripped 16096 lines - 6.80 Iteration 2 Strip Variables result: Output 680 lines and stripped 3552 lines - 6.92 Iteration 3 Strip Variables result: Output 557 lines and stripped 123 lines - 7.03 Iteration 4 Strip Variables result: Output 548 lines and stripped 9 lines - 7.14 Iteration 5 Strip and Rename Variables result: Output 548 lines and stripped 0 lines +> Source 35315 lines 1629211 Characters. +> Stripped 19780 Func/Var lines and 14615 comment lines, Total 1611265 Characters. +> Saved 97% lines 98% Characters. +> Au3Stripper v19.102.1901.0 finished created:C:\SMB\Central_PC\V6\lixo_stripped.au3 +>15:07:38 Au3Stripper ended.rc:0 >Running AU3Check (3.3.14.5) from:C:\Program Files (x86)\AutoIt3 input:C:\SMB\Central_PC\V6\lixo_stripped.au3 +>15:07:38 AU3Check ended.rc:0 >Running:(3.3.14.5):C:\Program Files (x86)\AutoIt3\aut2exe\aut2exe.exe /in "C:\SMB\Central_PC\V6\lixo_stripped.au3" /out "C:\Users\José\AppData\Local\AutoIt v3\Aut2exe\~AU558.tmp.exe" /nopack /comp 2 +>15:07:39 Aut2exe.exe ended.C:\Users\José\AppData\Local\AutoIt v3\Aut2exe\~AU558.tmp.exe. rc:0 +>15:07:39 Created program:C:\SMB\Central_PC\V6\lixo.exe +>15:07:39 AutoIt3Wrapper Finished. >Exit code: 0 Time: 11.88
joseLB Posted August 9, 2019 Posted August 9, 2019 Please notice as it is part of a much longer program, I had to do some "changes" so I could compile/run it. It´s based on events. So, please click at button "Salvar" at the screen (Save) to see the msgbox displayin it´s results.
joseLB Posted August 10, 2019 Posted August 10, 2019 And how I eliminated eval() so I didnt have to use a long case or edit Koda output each change if I use na array? ;### we must assure that fields are in desired order at Koda... ;### group1 -> 11 radio buttons $tlNivMan_1 = GUICtrlCreateRadio("+25", 88, 35, 57, 17) $tlNivMan_2 = GUICtrlCreateRadio("+20", 88, 63, 49, 17) ... $tlNivMan_11 = GUICtrlCreateRadio("+20", 88, 63, 49, 17) ;### group2 -> 9 radio buttons $tlDenMan_1 = GUICtrlCreateRadio("até 1.125", 168, 35, 117, 17) ... $tlDenMan_9 = GUICtrlCreateRadio("1.125 a 1.150", 168, 67, 117, 17) ;### as fields are created sequentialy we can use 1st field ID value and increment for next fields of each group For $K=1 to 11 $idCtrl= $tlNivMan_1 + ($K-1) ;group1: 1st field ID value is incremented sequentially for the next 11 fields If GUICtrlRead( $idCtrl ) = $GUI_CHECKED Then $nivel= 25 - ($K-1) * 5 EndIf If $K > 9 Then ContinueLoop ;as group 2 has only 9 fields, skip 10..11 $idCtrl= $tlDenMan_1 + ($K-1) ;group2: 1st field ID value is incremented sequentially for the next 9 fields If GUICtrlRead( $idCtrl ) = $GUI_CHECKED Then $densidade= 1.101 + (($K-1)* 0.025) EndIf Next
Developers Jos Posted August 11, 2019 Author Developers Posted August 11, 2019 (edited) On 8/9/2019 at 8:35 PM, joseLB said: I think I got the compilation withou the warning arround the same piece of code. While not totaly functional, I think it fullfil your needs. I do not have the SLG.au3 include you use. could you provide that? Thanks Jos Edited August 11, 2019 by Jos SciTE4AutoIt3 Full installer Download page - Beta files Read before posting How to post scriptsource Forum etiquette Forum Rules Live for the present, Dream of the future, Learn from the past.
pseakins Posted September 18, 2019 Posted September 18, 2019 (edited) https://www.autoitscript.com/site/autoit/downloads/ This is the link that is offered to you in the "Check for updates" option in the Windows start menu. I have been checking regularly to see if there have been any updates and it keeps telling me my installed version is 3.3.14.5 dated March 15th, 2018 and the latest public release is 3.3.14.4 dated March 8th 2018. Via the link at the end of this forum article I see there is a new (?) update link, although it still says it is 3.3.14.5 but dated 2/1/19. https://www.autoitscript.com/site/autoit-script-editor/downloads/?new I'm wondering if the obsolete link should be deleted or updated to redirect to the current download page, or is there something I don't understand? Edited September 18, 2019 by pseakins Wording Phil Seakins
Developers Jos Posted September 18, 2019 Author Developers Posted September 18, 2019 This first link provides information about the AutoIt3 installer and the second link about the separate SciTE4AutoIt3 installer updates. Jos SciTE4AutoIt3 Full installer Download page - Beta files Read before posting How to post scriptsource Forum etiquette Forum Rules Live for the present, Dream of the future, Learn from the past.
seadoggie01 Posted October 14, 2019 Posted October 14, 2019 When I'm compiling a script to a3x, it seems that AutoIt3Wrapper doesn't update the file version. Is this intended? (I realize that the a3x file won't have the version in it, I was just attempting to use it for documentation) #AutoIt3Wrapper_Outfile_type=a3x #AutoIt3Wrapper_Res_Fileversion=0.0.0.1 #AutoIt3Wrapper_Res_Fileversion_AutoIncrement=y All my code provided is Public Domain... but it may not work. Use it, change it, break it, whatever you want. Spoiler My Humble Contributions:Personal Function Documentation - A personal HelpFile for your functionsAcro.au3 UDF - Automating Acrobat ProToDo Finder - Find #ToDo: lines in your scriptsUI-SimpleWrappers UDF - Use UI Automation more Simply-erKeePass UDF - Automate KeePass, a password managerInputBoxes - Simple Input boxes for various variable types
Developers Jos Posted October 14, 2019 Author Developers Posted October 14, 2019 24 minutes ago, seadoggie01 said: Is this intended? Not really. Fixed that in the current Beta. Thanks for the report. Jos seadoggie01 and mLipok 1 1 SciTE4AutoIt3 Full installer Download page - Beta files Read before posting How to post scriptsource Forum etiquette Forum Rules Live for the present, Dream of the future, Learn from the past.
Developers Jos Posted November 27, 2019 Author Developers Posted November 27, 2019 Continue here: argumentum 1 SciTE4AutoIt3 Full installer Download page - Beta files Read before posting How to post scriptsource Forum etiquette Forum Rules Live for the present, Dream of the future, Learn from the past.
Recommended Posts