Jump to content
Sign in to follow this  
AlexChernavsky

Problem with selecting a file through FileOpenDialog

Recommended Posts

AlexChernavsky

I'm having a strange issue with using FileOpenDialog to select a file. Everything works fine the first time you select a file. But if you change your mind (while the program is still running) and want to select a different file, nothing changes. The program is "stuck" with the first selection you made, and nothing you do will change that selection in the input box.

I pulled the function below out of my program, and I had to modify it a bit to make it run on its own. But it's basically the same as the original.

To see the problem in action, click on either of the two buttons that say, "Choose other file...". Select any file from the list. Click on the "Open" button. So far, so good. Now, repeat the process again. See? The original file you selected is still listed in the input box.

I'm stumped by this one.

Thanks in advance.

-- Alex Chernavsky in Rochester, NY

#include <GUIConstantsEx.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>

_ConfirmParametersWithUser("test.txt", "test2.txt", 16, 1000, 3000, "InputFile", "WriteToFile", "Testing")

Func _ConfirmParametersWithUser($sInputFileName, $sOutputFileName, $iNumberOfProblems, $iMinTime, $iMaxTime, $sSourceOfProblems, $sOutputType, $sCondition)
Local $hSetParametersForm ; Handle to GUI
Local $hRadio1
Local $hRadio2
Local $hRadio3
Local $hRadio4
Local $hInputFileName
Local $hChooseInputFile
Local $hOutputFileName
Local $hChooseOutputFile
Local $hTrialsPerSession
Local $hTime1
Local $hTime2
Local $hCondition
Local $hExitButton
Local $hHelpButton
Local $hContinueButton
Local $nMsg
Local $sTemp

$sInputFileName = @ScriptDir & "\" & $sInputFileName
$sOutputFileName = @ScriptDir & "\" & $sOutputFileName
$hSetParametersForm = GUICreate("Reaction Time Program: Set Parameters", 580, 578, -1, -1)
GUICtrlCreateLabel("Reaction Time Program", 175, 3, 205, 23)
GUICtrlSetFont(-1, 14, 400, 0, "MS Sans Serif")

GUICtrlCreateLabel("Based on work by Seth Roberts", 200, 29, 155, 15)
GUICtrlSetFont(-1, 8, 400, 0, "MS Sans Serif")
;GUICtrlSetBkColor(-1, 0xCCFFCC) ; Give it a green background to make it easier to position it (it's a temporary thing to help design the GUI)

GUICtrlCreateGroup("Source of arithmetic problems: ", 40, 50, 528, 105)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
GUIStartGroup()
$hRadio1 = GUICtrlCreateRadio("Use problems included with source code", 64, 80, 257, 17)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
If $sSourceOfProblems = "SourceCode" Then
GUICtrlSetState(-1, $GUI_CHECKED)
EndIf
$hRadio2 = GUICtrlCreateRadio("Read problems from input file: ", 64, 104, 280, 17)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
If $sSourceOfProblems = "InputFile" Then
GUICtrlSetState(-1, $GUI_CHECKED)
EndIf
$hInputFileName = GUICtrlCreateInput($sInputFileName & " ", 81, 124, 380, 20)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
GUICtrlSetState($hInputFileName, $GUI_FOCUS)
Send("{end}") ; This line and the one before it are necessary to right-align the text (useful in case of long path names, so that the left part gets cut off, not the right part)
$hChooseInputFile = GUICtrlCreateButton("Choose other file...", 465, 121)
If $sSourceOfProblems = "InputFile" Then
GUICtrlSetState($hChooseInputFile, $GUI_ENABLE)
Else
GUICtrlSetState($hChooseInputFile, $GUI_DISABLE)
EndIf

GUICtrlCreateLabel("Number of trials (problems) presented per testing session:", 48, 167, 345, 20)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$hTrialsPerSession = GUICtrlCreateInput($iNumberOfProblems, 397, 165, 30, 22, BitOR($GUI_SS_DEFAULT_INPUT, $ES_NUMBER))
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")

GUICtrlCreateGroup("Random delay between trials (in milliseconds): ", 40, 198, 349, 89)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")

GUICtrlCreateLabel("Minimum delay:", 64, 224, 97, 20)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
GUICtrlCreateLabel("Maximum delay :", 64, 256, 104, 20)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$hTime1 = GUICtrlCreateInput($iMinTime, 176, 224, 41, 21, BitOR($GUI_SS_DEFAULT_INPUT, $ES_NUMBER))
$hTime2 = GUICtrlCreateInput($iMaxTime, 176, 256, 41, 21, BitOR($GUI_SS_DEFAULT_INPUT, $ES_NUMBER))

GUICtrlCreateGroup("Upon completion of the testing session: ", 40, 296, 528, 110)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$hRadio3 = GUICtrlCreateRadio("Display summary and append data to output file: ", 64, 325, 422, 17)
If $sOutputType = "WriteToFile" Then GUICtrlSetState(-1, $GUI_CHECKED)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$hOutputFileName = GUICtrlCreateInput($sOutputFileName & " ", 81, 350, 380, 20)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
GUICtrlSetState($hOutputFileName, $GUI_FOCUS)
Send("{end}") ; This line and the one before it are necessary to right-align the text (useful in case of long path names, so that the left part gets cut off, not the right part)
$hChooseOutputFile = GUICtrlCreateButton("Choose other file...", 465, 347)
If $sOutputType = "WriteToFile" Then
GUICtrlSetState($hChooseOutputFile, $GUI_ENABLE)
Else
GUICtrlSetState($hChooseOutputFile, $GUI_DISABLE)
EndIf
$hRadio4 = GUICtrlCreateRadio("Display summary but do not write data to output file", 64, 379, 320, 17)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
If $sOutputType = "DisplayOnly" Then GUICtrlSetState(-1, $GUI_CHECKED)
GUICtrlCreateGroup("Please describe the condition for this test:", 40, 417, 520, 90)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$hCondition = GUICtrlCreateInput("", 54, 447, 500, 20)
GUICtrlCreateLabel("Example: ""45 mins. after taking 3 tablespoons of flaxseed oil""", 56, 477, 550, 28)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")

$hHelpButton = GUICtrlCreateButton("Help", 272, 534, 75, 25)
$hContinueButton = GUICtrlCreateButton("Continue", 382, 534, 75, 25, $BS_DEFPUSHBUTTON)
$hExitButton = GUICtrlCreateButton("Exit Program", 488, 534, 75, 25)
GUICtrlSetState($hCondition, $GUI_FOCUS) ; Set the focus to the "Condition" input box
GUISetState(@SW_SHOW)

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $hRadio1
GUICtrlSetState($hChooseInputFile, $GUI_DISABLE)
Case $hRadio2
GUICtrlSetState($hChooseInputFile, $GUI_ENABLE)
Case $hRadio3
GUICtrlSetState($hChooseOutputFile, $GUI_ENABLE)
Case $hRadio4
GUICtrlSetState($hChooseOutputFile, $GUI_DISABLE)
Case $hChooseInputFile
$sTemp = FileOpenDialog("Choose input file", @ScriptDir & "\", "All files (*.*)", 1 + 2)
If $sTemp Then
$sInputFileName = $sTemp
$hInputFileName = GUICtrlSetData($hInputFileName, $sInputFileName & " ")
EndIf
GUICtrlSetState($hCondition, $GUI_FOCUS) ; Return focus to the "Continue" button
Case $hChooseOutputFile
$sTemp = FileOpenDialog("Choose output file", @ScriptDir & "\", "All files (*.*)", 2 + 8)
If $sTemp Then
$sOutputFileName = $sTemp
$hOutputFileName = GUICtrlSetData($hOutputFileName, $sOutputFileName & " ")
EndIf
GUICtrlSetState($hCondition, $GUI_FOCUS) ; Return focus to the "Continue" button
Case $hHelpButton
ShellExecute("http://www.astrocyte-design.com/reaction-time/index.html")
Case $hContinueButton
ExitLoop
Case $hExitButton
Exit
EndSwitch
WEnd
If (BitAND(GUICtrlRead($hRadio1), $GUI_CHECKED) = $GUI_CHECKED) Then
$sSourceOfProblems = "SourceCode"
Else
$sSourceOfProblems = "InputFile"
EndIf
$iNumberOfProblems = GUICtrlRead($hTrialsPerSession)
$iMinTime = GUICtrlRead($hTime1)
$iMaxTime = GUICtrlRead($hTime2)
If (BitAND(GUICtrlRead($hRadio3), $GUI_CHECKED) = $GUI_CHECKED) Then
$sOutputType = "WriteToFile"
Else
$sOutputType = "DisplayOnly"
EndIf
$sCondition = GUICtrlRead($hCondition)
$sCondition = StringReplace($sCondition, ",", "") ; Remove any commas that the user happens to enter (they interfere with the CSV file format)
GUIDelete($hSetParametersForm)
EndFunc ;==>_ConfirmParametersWithUser

Share this post


Link to post
Share on other sites
JLogan3o13

The problem is due to you redefining your variable. In this section:

Case $hChooseInputFile
$sTemp = FileOpenDialog("Choose input file", @ScriptDir & "", "All files (*.*)", 1 + 2)
If $sTemp Then
$sInputFileName = $sTemp
$hInputFileName = GUICtrlSetData($hInputFileName, $sInputFileName & " ")
EndIf
GUICtrlSetState($hCondition, $GUI_FOCUS) ; Return focus to the "Continue" button

you don't need to say $hInputFileName = GUICtrlSetData($hInputFileName, $sInputFileName & " "). Instead, just set the data:

Case $hChooseInputFile
$sTemp = FileOpenDialog("Choose input file", @ScriptDir & "", "All files (*.*)", 1 + 2)
 If $sTemp Then
  $sInputFileName = $sTemp
  GUICtrlSetData($hInputFileName, $sInputFileName & " ")
 EndIf
GUICtrlSetState($hCondition, $GUI_FOCUS) ; Return focus to the "Continue" button
  • Like 1

√-1 2^3 ∑ π, and it was delicious!

Share this post


Link to post
Share on other sites
AlexChernavsky

Thank you, JLogan3o13. I think that did the trick. I appreciate your help.

Share this post


Link to post
Share on other sites
JLogan3o13

Glad to be of service :)


√-1 2^3 ∑ π, and it was delicious!

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

  • Similar Content

    • WoodGrain
      By WoodGrain
      Hi guys,
      I'm learning about GUI's, I'm trying the below code, the idea being if I press the letter "e" while I have the GUI open I want the label color to change to green (I'm using a UDF for label colors). But every time I press "e" on my keyboard I just get a "ding" sound from my speakers and nothing changes with the label.
      I've looked at using something like "While GUIGetMsg() <> $GUI_EVENT_CLOSE" as I've seen it in other code instead of "While 1", but I don't think it's relevant.
      #include <GUIConstantsEx.au3>; for GUI... #include <GUIRichLabel.au3>; UDF for rich text label fonts #include <Misc.au3>; for _IsPressed $myLetter = "e" $hGUI = GUICreate("test", 700, 60) $lbl2 = _GUICtrlRichLabel_Create($hGUI, '<font color="purple">' & $myLetter & '</font>', 10, 10); , 260, 25 GUISetState(@SW_SHOW) Local $hDLL = DllOpen("user32.dll") While 1 if _IsPressed(Hex($myLetter), $hDLL) Then While _IsPressed(Hex($myLetter), $hDLL) Sleep(250) WEnd _GUICtrlRichLabel_SetData($lbl2, '<font color="green">' & $myLetter & '</font>') Sleep(2000) DllClose($hDLL) Exit EndIf Sleep(50) WEnd DllClose($hDLL) I am using an array of letters that I'm wanting to do this for, but as I can't get it to work I've stripped it down to the simplest code I can think of to try and get this working first. Appreciate any help.
      Thanks!
    • nacerbaaziz
      By nacerbaaziz
      hi dears, i have an question please if you can help me.
      i maked an program to do some functions
      and this program works with the global hot keys
      i added an option to the users to change the hot keys
      when i searched about how to do that i found this UDF
      GUIHotkey.au3
      http://www.autoitscript.com/forum/index.php?showtopic=107965
      but the problem here that this UDF cant be detect the win key.
      can you help me to add it, or if there are any others UDFSS wich do that work please give me some.
      i hope that my question is clear for you.
      thanks in advance
    • Silas
      By Silas
      Hello everyone,
      I have a radio button ($Radio1), which I want to disable as soon as another one get's checked (Radio5). (The system fails if the radio button i'm troubling with also gets checked).
      I know how to disable him:
      If GUICtrlRead($Radio1)=1 And Not BitAND(GUICtrlGetState($Radio5), $GUI_DISABLE) Then GUICtrlSetState($Radio5, 128) But if i try to enable $Radio5 again, after $Radio1 isn't checked anymore, it fails:
      If GUICtrlRead($Radio1)=Not 1 And Not BitAND(GUICtrlGetState($Radio5), $GUI_ENABLE) Then GUICtrlSetState($Radio5, 64)  
      Anyone knows why?
    • Bllee
      By Bllee
      every time i press "delete button" delete a line, but i can't add new line with info. the id line write normally but i can't change or add new info
      obs: looking at the "includes" one realizes that already tried of everything that knew
      my code
      #include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <GUIListBox.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #include <GUIConstantsEx.au3> #include <GuiImageList.au3> #include <GuiListView.au3> #include <GUIConstantsEx.au3> #include <GuiListView.au3> #include <MsgBoxConstants.au3> #include <WinAPI.au3> #include <StringConstants.au3> #include <Array.au3> #include <GuiListBox.au3> #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Form1", 612, 480, 192, 154) $MenuItem1 = GUICtrlCreateMenu("&Arquivo") $MenuItem2 = GUICtrlCreateMenuItem("Salvar Ctrl+S", $MenuItem1, $SS_CENTER) $MenuItem4 = GUICtrlCreateMenuItem("Carregar Ctrl+O", $MenuItem1, $SS_CENTER) $MenuItem3 = GUICtrlCreateMenuItem("Salvar Como Shitft+Ctrl+S", $MenuItem1, $SS_CENTER) $Group1 = GUICtrlCreateGroup("", 21, 8, 569, 97, $SS_CENTER) $Input1 = GUICtrlCreateInput("ID COR", 122, 32, 97, 21, $SS_CENTER) $Input2 = GUICtrlCreateInput("REGIÃO", 138, 64, 249, 21, $SS_CENTER) $Input3 = GUICtrlCreateInput("Label", 264, 30, 121, 21, $SS_CENTER) $Label1 = GUICtrlCreateLabel("Label", 232, 32, 30, 17, $SS_CENTER) $Button1 = GUICtrlCreateButton("Capturar Cor", 42, 30, 75, 25, $SS_CENTER) $Button2 = GUICtrlCreateButton("Capturar Região", 42, 62, 91, 25, $SS_CENTER) $Button3 = GUICtrlCreateButton("ADD", 442, 24, 113, 33) $Button5 = GUICtrlCreateButton("Delet", 442, 64, 113, 33) $Group2 = GUICtrlCreateGroup("Editar ID selecionado", 8, 384, 601, 57, $SS_CENTER) $Input7 = GUICtrlCreateInput("ID", 10, 402, 40,21, $SS_CENTER) $Input4 = GUICtrlCreateInput("COR", 51, 402, 121, 21, $SS_CENTER) $Input5 = GUICtrlCreateInput("REGIÃO", 173, 402, 249, 21, $SS_CENTER) $Input6 = GUICtrlCreateInput("LABEL", 423, 402, 121, 21, $SS_CENTER) $Button4 = GUICtrlCreateButton("\/", 544, 400, 30, 25, $SS_CENTER) $Button6 = GUICtrlCreateButton("/\", 574, 400, 30, 25, $SS_CENTER) ; Add column Global $id = Int(0) $List1 = GUICtrlCreateListView("",5, 120, 601, 253, $SS_CENTER) _GUICtrlListView_AddColumn($List1, "ID",40) _GUICtrlListView_AddColumn($List1, "COR",100) _GUICtrlListView_AddColumn($List1, "COORDENADA",305) _GUICtrlListView_AddColumn($List1, "LABEL",150) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $MenuItem2 MsgBox($MB_SYSTEMMODAL, "ctrl + s", "Nothing Here",1) Case $MenuItem3 MsgBox($MB_SYSTEMMODAL, "shift+ctrl s", "Nothing Here",1) Case $MenuItem4 MsgBox($MB_SYSTEMMODAL, "ctrl + o", "Nothing Here",1) Case $Button1 MsgBox($MB_SYSTEMMODAL, "Capturar cor", "Aperte espaço para capturar a cor") GUICtrlSetData($Input1,MouseColor()) Case $Button2 MsgBox($MB_SYSTEMMODAL, "capturar região", "Aperte espaço para capturar a posição inicial") local $mouse = MouseGetPos() $x_init = $mouse[0] $y_init = $mouse[1] MsgBox($MB_SYSTEMMODAL, "capturar região", "Aperte espaço para capturar a posição final") local $mouse = MouseGetPos() $x_end = $mouse[0] $y_end = $mouse[1] GUICtrlSetData($Input2,$x_init&','&$y_init&' ; '&$x_end&','&$y_end) Case $Button3 _GUICtrlListView_AddItem($List1, $id, 1) ; id _GUICtrlListView_AddSubItem($List1, $id, GUICtrlRead($Input1), 1, 1) ;cor _GUICtrlListView_AddSubItem($List1, $id, GUICtrlRead($Input2), 2, 1) ;coordenada _GUICtrlListView_AddSubItem($List1, $id, GUICtrlRead($Input3), 3, 1) ;label $id= $id + 1 Case $Button4 $Item = _GUICtrlListView_GetSelectedIndices($List1) $Sid = _GUICtrlListView_GetItem($List1, Number($Item),0) $Scor = _GUICtrlListView_GetItem($List1, Number($Item),1) $Scord = _GUICtrlListView_GetItem($List1, Number($Item),2) $Slabel = _GUICtrlListView_GetItem($List1, Number($Item),3) ; get info GUICtrlSetData($Input7,$Sid[3]) GUICtrlSetData($Input4,$Scor[3]) GUICtrlSetData($Input5,$Scord[3]) GUICtrlSetData($Input6,$Slabel[3]) Case $Button5 _GUICtrlListView_DeleteItemsSelected($List1) Case $Button6 ; give back inf if GUICtrlRead($Input7) <> "ID" Then _GUICtrlListView_SetItem($List1, GUICtrlRead($Input4), GUICtrlRead($Input7),1) ;cor _GUICtrlListView_SetItem($List1, GUICtrlRead($Input5), GUICtrlRead($Input7),2) ;coordenada _GUICtrlListView_SetItem($List1, GUICtrlRead($Input6), GUICtrlRead($Input7),3) ;coordenada EndIf EndSwitch WEnd Func MouseColor() local $mouse = MouseGetPos() Return Hex(PixelGetColor($mouse[0],$mouse[1]), 6) EndFunc  
    • FrancescoDiMuro
      By FrancescoDiMuro
      Good evening everyone
      First, I want to apologize with you for the title not very clear, but I thought a little bit on which title to set at the thread, and this is the one that came in mind.
      Now, let me explain what I'm trying to understand.

      I am making an application ( with n clients ), with an SQLite Database, which has a Main form, and n sub-forms... 
      Since these sub-forms are called several times, because they are used to add or update records to the Database, I put the code that generates the GUI of these sub-forms in Functions.
      There are two sub-forms which are "treated" as two main forms, since even them have n sub-forms, which perform various tasks.
      Where am I stucked?

      For the Main form I created a Status Bar, in order to display messages ( add/delete/update/search results ), and it works perfectly with all the forms which don't have other sub-forms.
      For the two forms, which indeed have n sub-forms, I created two separated Status Bars, which are (re)created everytime I call the function that then displays the form.
      Practically, I can't set icons to these two Status Bars, and I don't know why.
      I'm really sorry that I don't feel clear enough, so, here you are an example of what I am saying.
      I recreated exactly what my script does:
      #include <GuiButton.au3> #include <GUIConstantsEx.au3> #include <GuiStatusBar.au3> #include <WindowsConstants.au3> Opt("GUIOnEventMode", 1) Global $frmSubForm, _ $txtSubFormField, _ $sbSubFormStatusBar, _ $objSB_IconError = _WinAPI_LoadShell32Icon(109), _ $objSB_IconInformation = _WinAPI_LoadShell32Icon(277) #Region ### START Koda GUI section ### Form= $frmMainForm = GUICreate("Main Form", 300, 300, -1, -1) GUISetOnEvent($GUI_EVENT_CLOSE, "ExitApplication") $sbMainStatusBar = _GUICtrlStatusBar_Create($frmMainForm) $btnCreateSubForm = GUICtrlCreateButton("Create Sub Form", 105, 110, 75, 41, BitOR($BS_CENTER,$BS_VCENTER,$BS_MULTILINE)) GUICtrlSetOnEvent(-1, "GenerateSubForm") GUICtrlSetFont(-1, 10, 400, 0, "Arial") _GUICtrlStatusBar_SetSimple($sbMainStatusBar) _GUICtrlStatusBar_SetText($sbMainStatusBar, "") GUISetState(@SW_SHOW, $frmMainForm) #EndRegion ### END Koda GUI section ### While 1 Sleep(100) WEnd Func ExitApplication() Exit EndFunc Func GenerateSubForm() #Region ### START Koda GUI section ### Form= $frmSubForm = GUICreate("Sub-Form", 300, 300, -1, -1, -1, -1, $frmMainForm) GUISetOnEvent($GUI_EVENT_CLOSE, "DeleteSubForm") $txtSubFormField = GUICtrlCreateInput("", 0, 0, 100, 20) $btnCheckSubFormField = GUICtrlCreateButton("Check Field", 105, 110, 75, 41, BitOR($BS_CENTER,$BS_VCENTER,$BS_MULTILINE)) GUICtrlSetOnEvent(-1, "CheckSubFormField") GUICtrlSetFont(-1, 10, 400, 0, "Arial") $sbSubFormStatusBar = _GUICtrlStatusBar_Create($frmSubForm) _GUICtrlStatusBar_SetSimple($sbSubFormStatusBar) _GUICtrlStatusBar_SetText($sbSubFormStatusBar, "") GUISetState(@SW_SHOW, $frmSubForm) GUISetState(@SW_DISABLE, $frmMainForm) #EndRegion ### END Koda GUI section ### EndFunc Func DeleteSubForm() ; Declared Globally => $frmSubForm GUIDelete($frmSubForm) GUISetState(@SW_ENABLE, $frmMainForm) EndFunc Func WriteToStatusBar($sbStatusBar, $objSB_Icon, $strText) _GUICtrlStatusBar_SetIcon($sbStatusBar, 0, $objSB_Icon) _GUICtrlStatusBar_SetText($sbStatusBar, $strText) ConsoleWrite("Icon Handle: " & $objSB_Icon & @CRLF) EndFunc Func CheckSubFormField() ; Declared Globally => $txtSubFormField If GUICtrlRead($txtSubFormField) = "" Then ; Declared Globally => $sbStatusBar WriteToStatusBar($sbSubFormStatusBar, $objSB_IconError, "Field NOK.") Else WriteToStatusBar($sbSubFormStatusBar, $objSB_IconInformation, "Field OK.") EndIf EndFunc The text is set, but icon is not.
      Could someone please tell me why?
      Thanks everyone in advance  

      Best Regards.
×