Jump to content
Sign in to follow this  

StringStripWS() not working?

Recommended Posts

I am utterly confused on this. I am attempting to eliminate any @CRLF (Chr(13)) from a string, but after stripping it away using StringStripWS(), the @CRLF is still there. Can someone shed some light on this? Thanks

#Include <Array.au3>
#Include <File.au3>
#include <IE.au3>
#include <ExcelCOM_UDF.au3>
#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

Global $avDestination[1]=[""]
Global $avCategory[1]=[""]

;Make .ini file
Global $iniPath = @ScriptDir & "\SaveData.ini"
If NOT FileExists($iniPath) Then
    _FileCreate ( $iniPath )
    IniWriteSection ($iniPath, "Destinations", "")
    IniWrite ( $iniPath, "Destinations", "1", "Africa" )
    IniWriteSection ($iniPath, "Categories", "")
    IniWrite ( $iniPath, "Categories", "1", "Safaris" )
    IniWrite ( $iniPath, "Categories", "2", "Cultural Tours" )

$Edit1_Text_Array = IniReadSection ( $iniPath, "Categories")
$Edit2_Text_Array = IniReadSection ( $iniPath, "Destinations")

;Loop to get just the Destinations
For $iCC = 1 To (UBound ($Edit1_Text_Array)-1)
    If $iCC=1 Then
        _ArrayPush($avDestination, $Edit1_Text_Array[$iCC][1])
        _ArrayAdd ($avDestination , $Edit1_Text_Array[$iCC][1])

;Loop to get just the Categories
For $iCC = 1 To (UBound ($Edit2_Text_Array)-1)
    If $iCC=1 Then
        _ArrayPush($avCategory, $Edit2_Text_Array[$iCC][1])
        _ArrayAdd ($avCategory, $Edit2_Text_Array[$iCC][1])

$Edit1_Text =_ArrayToString($avCategory, @CRLF)
$Edit2_Text =_ArrayToString($avDestination, @CRLF)
;Make GUI
#Region ### START Koda GUI section ### Form=...
$Form1 = GUICreate("", 600, 550, 0, 0)
$Edit2 = GUICtrlCreateEdit("", 31, 60, 500, 100)
    GUICtrlSetData (-1, $Edit2_Text)
$Edit1 = GUICtrlCreateEdit($Edit1_Text, 31, 180, 500, 100)
    GUICtrlSetData (-1, $Edit1_Text)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button1 = GUICtrlCreateButton("OK",    256,    315,    75, 25, 0)
$CheckboxSaveIni = GUICtrlCreateCheckbox("Save Search", 25, 425, 97, 17)
GUICtrlSetState(-1, $GUI_CHECKED)
GUICtrlCreateGroup("", -99, -99, 1, 1)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
        Case $Button1
            SaveSearch2ini ()

Func SaveSearch2ini ()
    $CurrentSearchCategories = GUICtrlRead ($Edit2)
    $CurrentSearchCategories = StringStripWS ( $CurrentSearchCategories,3)
    ConsoleWrite (StringInStr ($CurrentSearchCategories, Chr(13)) & @CRLF)

Share this post

Link to post
Share on other sites

Well this did work, though it requires another step in the end, but that is okay. Any idea why my original attempt did not work? Should I report this is a possible bug?

In the help file under StringStripWS, you originally had the flag 3 -a combination of flags 1 and 2.

I suggested flag 8 whick stripped all white spaces.

weaponx suggested flag 4. This works.

Depending on what you want , changing the flag to 4 may be easier.

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  

  • Create New...