microbious Posted June 18, 2009 Share Posted June 18, 2009 (edited) I got this INI clean up thing going that removes INI sections. Problem is that once section is removed, it leaves empty line behind because each section is separated from another by an empty line. I could not find anything that would remove an empty line from INI or TXT document anywhere so i ask you. If you could please post an example All i could think of is $emptyline = "?" $replaceline = "" $replace = _ReplaceStringInFile ($filename,$emptyline,$replaceline) but that returns with 0 instead of a number of found empty lines. What does Empty line stand for in here ? $emptyline = "?" Edited June 18, 2009 by lessstoopid Link to comment Share on other sites More sharing options...
MrCreatoR Posted June 18, 2009 Share Posted June 18, 2009 Try this: _IniDeleteSection("File.ini", "Sect") Func _IniDeleteSection($sIni_File, $sSect_Name) Local $aRead_IniFile = StringSplit(StringStripCR(StringStripWS(FileRead($sIni_File), 3)), @LF) Local $sIniFile_Content = "" For $i = 1 To $aRead_IniFile[0] If $aRead_IniFile[$i] = "[" & $sSect_Name & "]" Then For $j = $i+1 To $aRead_IniFile[0] If StringRegExp($aRead_IniFile[$j], "\A(\[|;\[)") Then ExitLoop Next $i = $j-1 Else $sIniFile_Content &= $aRead_IniFile[$i] & @CRLF EndIf Next Local $hFOpen = FileOpen($sIni_File, 2) FileWrite($hFOpen, StringStripWS($sIniFile_Content, 3)) FileClose($hFOpen) EndFunc Or more simple way: _IniDeleteSection("File.ini", "Sect") Func _IniDeleteSection($sIni_File, $sSect_Name) IniDelete($sIni_File, $sSect_Name) Local $sIniFile_Content = StringRegExpReplace(FileRead($sIni_File), "(\r\n){1,}", "\1") Local $hFOpen = FileOpen($sIni_File, 2) FileWrite($hFOpen, StringStripWS($sIniFile_Content, 3)) FileClose($hFOpen) EndFunc Spoiler Using OS: Win 7 Professional, Using AutoIt Ver(s): 3.3.6.1 / 3.3.8.1 AutoIt Russian Community My Work... Spoiler Projects: ATT - Application Translate Tool {new}| BlockIt - Block files & folders {new}| SIP - Selected Image Preview {new}| SISCABMAN - SciTE Abbreviations Manager {new}| AutoIt Path Switcher | AutoIt Menu for Opera! | YouTube Download Center! | Desktop Icons Restorator | Math Tasks | KeyBoard & Mouse Cleaner | CaptureIt - Capture Images Utility | CheckFileSize ProgramUDFs: OnAutoItErrorRegister - Handle AutoIt critical errors {new}| AutoIt Syntax Highlight {new}| Opera Library! | Winamp Library | GetFolderToMenu | Custom_InputBox()! | _FileRun UDF | _CheckInput() UDF | _GUIInputSetOnlyNumbers() UDF | _FileGetValidName() UDF | _GUICtrlCreateRadioCBox UDF | _GuiCreateGrid() | _PathSplitByRegExp() | _GUICtrlListView_MoveItems - UDF | GUICtrlSetOnHover_UDF! | _ControlTab UDF! | _MouseSetOnEvent() UDF! | _ProcessListEx - UDF | GUICtrl_SetResizing - UDF! | Mod. for _IniString UDFs | _StringStripChars UDF | _ColorIsDarkShade UDF | _ColorConvertValue UDF | _GUICtrlTab_CoverBackground | CUI_App_UDF | _IncludeScripts UDF | _AutoIt3ExecuteCode | _DragList UDF | Mod. for _ListView_Progress | _ListView_SysLink | _GenerateRandomNumbers | _BlockInputEx | _IsPressedEx | OnAutoItExit Handler | _GUICtrlCreateTFLabel UDF | WinControlSetEvent UDF | Mod. for _DirGetSizeEx UDF Examples: ScreenSaver Demo - Matrix included | Gui Drag Without pause the script | _WinAttach()! | Turn Off/On Monitor | ComboBox Handler Example | Mod. for "Thinking Box" | Cool "About" Box | TasksBar Imitation Demo Like the Projects/UDFs/Examples? Please rate the topic (up-right corner of the post header: Rating ) * === My topics === * ================================================== ================================================== AutoIt is simple, subtle, elegant. © AutoIt Team Link to comment Share on other sites More sharing options...
microbious Posted June 18, 2009 Author Share Posted June 18, 2009 (edited) ok then how can i create Func in my GUI if there is no Func at all ? All i have is the Case for button as While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $button Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd Sorry i am still learning and your example is difficult to digest at this point and only one thing i can think of is: Case $button $Filename = "file.txt" $Emptyline = "" lineremove ($filename,$emptyline) Thanks Edited June 18, 2009 by lessstoopid Link to comment Share on other sites More sharing options...
MrCreatoR Posted June 18, 2009 Share Posted June 18, 2009 While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $button _FileDeleteEmptyLines("File.txt") Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd Func _FileDeleteEmptyLines($sFile) Local $sFileContent = StringRegExpReplace(FileRead($sFile), "(\r\n){1,}", "\1") Local $hFOpen = FileOpen($sFile, 2) FileWrite($hFOpen, StringStripWS($sFileContent, 3)) FileClose($hFOpen) EndFunc Spoiler Using OS: Win 7 Professional, Using AutoIt Ver(s): 3.3.6.1 / 3.3.8.1 AutoIt Russian Community My Work... Spoiler Projects: ATT - Application Translate Tool {new}| BlockIt - Block files & folders {new}| SIP - Selected Image Preview {new}| SISCABMAN - SciTE Abbreviations Manager {new}| AutoIt Path Switcher | AutoIt Menu for Opera! | YouTube Download Center! | Desktop Icons Restorator | Math Tasks | KeyBoard & Mouse Cleaner | CaptureIt - Capture Images Utility | CheckFileSize ProgramUDFs: OnAutoItErrorRegister - Handle AutoIt critical errors {new}| AutoIt Syntax Highlight {new}| Opera Library! | Winamp Library | GetFolderToMenu | Custom_InputBox()! | _FileRun UDF | _CheckInput() UDF | _GUIInputSetOnlyNumbers() UDF | _FileGetValidName() UDF | _GUICtrlCreateRadioCBox UDF | _GuiCreateGrid() | _PathSplitByRegExp() | _GUICtrlListView_MoveItems - UDF | GUICtrlSetOnHover_UDF! | _ControlTab UDF! | _MouseSetOnEvent() UDF! | _ProcessListEx - UDF | GUICtrl_SetResizing - UDF! | Mod. for _IniString UDFs | _StringStripChars UDF | _ColorIsDarkShade UDF | _ColorConvertValue UDF | _GUICtrlTab_CoverBackground | CUI_App_UDF | _IncludeScripts UDF | _AutoIt3ExecuteCode | _DragList UDF | Mod. for _ListView_Progress | _ListView_SysLink | _GenerateRandomNumbers | _BlockInputEx | _IsPressedEx | OnAutoItExit Handler | _GUICtrlCreateTFLabel UDF | WinControlSetEvent UDF | Mod. for _DirGetSizeEx UDF Examples: ScreenSaver Demo - Matrix included | Gui Drag Without pause the script | _WinAttach()! | Turn Off/On Monitor | ComboBox Handler Example | Mod. for "Thinking Box" | Cool "About" Box | TasksBar Imitation Demo Like the Projects/UDFs/Examples? Please rate the topic (up-right corner of the post header: Rating ) * === My topics === * ================================================== ================================================== AutoIt is simple, subtle, elegant. © AutoIt Team Link to comment Share on other sites More sharing options...
microbious Posted June 18, 2009 Author Share Posted June 18, 2009 HOLLY Cr@p it worked !!! WOw with your example i learned that if afre Case i type something as Case example($var) Then i can use this Func later on as long as i create Func example($var) Very helpful thank allot Link to comment Share on other sites More sharing options...
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now