Custom Query (3910 matches)

For testing I put several MsgBox(0,@ScriptLineNumber , "error x") in my script. But in the compiled file the ScriptLineNumber is always -1. I know here did not exist a linenumber, but for better find the error the compiled-script should also show the linenumber of the source-script.

local $aa    ; this variable is empty
local $bb="" ; this variable is empty
local $cc=1  ; this variable is not empty
local $dd=0  ; this variable is not empty, is the same like $cc

if $aa="" Then MsgBox(0, @ScriptLineNumber , "OK aa = is empty has len=0" & @CRLF & "len=" & StringLen($aa))
if $bb="" Then MsgBox(0, @ScriptLineNumber , "OK bb = is empty has len=0" & @CRLF & "len=" & StringLen($bb))
if $cc="" Then MsgBox(0, @ScriptLineNumber , "OK cc = is not empty has len=1" & @CRLF & "len=" & StringLen($cc))

if $dd="" Then
  MsgBox(0, @ScriptLineNumber , "ERROR dd = is not empty has len=1 " & @CRLF & "len=" & @CRLF & StringLen($dd))
Else
  MsgBox(0, @ScriptLineNumber , "OK dd = is empty has len=0" & @CRLF & "len=" & @CRLF & StringLen($dd))
EndIf

;start file1.au3 ------------------------------------------------
;file1.au3



#include "file3.au3"
#include "file2.au3"
local $a=1
local $b=1
MsgBox(0,@ScriptName & ", " & @ScriptLineNumber,"a = b")



#cs
this program shows 3 times always the SAME message

--------------
File1.au3, 10       <== always file one and always line 10, but the message are from different sourcefiles
a=b
OK
--------------

I cannot recognize where is the message from


My Wish:
========
a new macro: @SourceName


for purpose
MsgBox(0,@SourceName & ", " & @ScriptLineNumber,"a = b")

this should show 3 different messages
--------------
File3.au3, 10       <== file three and line 10
a=b
OK
--------------
--------------
File2.au3, 10       <== file two and line 10
a=b
OK
--------------
--------------
File1.au3, 10       <== file one and line 10
a=b
OK
--------------
#ce
;end file1.au3 ==================================================




;start file2.au3 --------------------------------------------------
;file2.au3





local $a=1
local $b=1
MsgBox(0,@ScriptName & ", " & @ScriptLineNumber,"a = b")

;end file2.au3 ====================================================




;start file3.au3 --------------------------------------------------
;file3.au3





local $a=1
local $b=1
MsgBox(0,@ScriptName & ", " & @ScriptLineNumber,"a = b")

;end file3.au3 ====================================================