Jump to content

January 2, 2019: New SciTE4AutoIt3 available with the updated SciTE v4.1.2 release


Jos
 Share

Recommended Posts

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 by joseLB
Link to comment
Share on other sites

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

Link to comment
Share on other sites

  • Developers

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.
  :)

Link to comment
Share on other sites

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.

Link to comment
Share on other sites

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.

#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

Link to comment
Share on other sites

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.

Link to comment
Share on other sites

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

 

Link to comment
Share on other sites

  • Developers
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 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.
  :)

Link to comment
Share on other sites

  • 1 month later...

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 by pseakins
Wording

Phil Seakins

Link to comment
Share on other sites

  • Developers

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.
  :)

Link to comment
Share on other sites

  • 4 weeks later...

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 functions
Acro.au3 UDF - Automating Acrobat Pro
ToDo Finder - Find #ToDo: lines in your scripts
UI-SimpleWrappers UDF - Use UI Automation more Simply-er
KeePass UDF - Automate KeePass, a password manager
InputBoxes - Simple Input boxes for various variable types

Link to comment
Share on other sites

  • Developers
24 minutes ago, seadoggie01 said:

Is this intended?

Not really. Fixed that in the current Beta. :) 

Thanks for the report.
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.
  :)

Link to comment
Share on other sites

  • Jos locked this topic
  • Jos unpinned this topic
Guest
This topic is now closed to further replies.
 Share

×
×
  • Create New...