Listview Editbox

- [ gelöst ]
subzero007
8. Juni 2009 um 21:14
Geschlossen
Erledigt

autoBert

Poweruser

Beiträge

6.141
23. Juni 2009 um 12:31
- #21
Hallo subzero007,
ändere Zeile 70 in
[autoit]
GuICtrlSetData($Edit1, GUICtrlRead($Edit1) &@CRLF & StringTrimLeft($string,1)&@CRLF)
[/autoit]

dadurch wird die neue Ini ans Ende der EditBox angehängt,
mfg (Auto)Bert
subzero007

Beiträge

759
23. Juni 2009 um 15:11
- #22
endlich fertig habe es nun fertig, aber so glücklich bin ich mit der lösung nicht,
hat jemand eine idee wie man das besser lösen könnte??

Spoiler anzeigen

[autoit]
#Include <GuiListBox.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Array.au3>
#include <File.au3>
#include <String.au3>
[/autoit] [autoit][/autoit] [autoit]
Global $folder,$array,$string, $sel, $stringAdd
[/autoit] [autoit][/autoit] [autoit]
Opt("GuiOnEventMode",1)
$Form1 = GUICreate("Form1", 633, 370, -1, -1)
GuiSetOnEvent($GUI_EVENT_CLOSE, "_Exit")
$Edit1 = GUICtrlCreateEdit("", 108, 48, 249, 280)
$hListBox = GUICtrlCreateList("", 370, 48, 250, 280)
$Zeile_x_einfugen = GUICtrlCreateButton("Zeile X einfügen", 10, 128, 91, 25)
GuiCtrlSetOnEvent(-1, "_insline")
$Zeile_yeinfugen = GUICtrlCreateButton("Zeile Y einfügen", 10, 159, 91, 25)
GuiCtrlSetOnEvent(-1, "_insline")
$Zeile_z_einfugen = GUICtrlCreateButton("Zeile Z einfügen", 10, 190, 91, 25)
GuiCtrlSetOnEvent(-1, "_insline")
$InsFol = GUICtrlCreateButton("Ordner einfügen", 440, 338, 91, 25)
GuiCtrlSetOnEvent(-1, "_insFol")
$Ordnerinhalt_Listview = GUICtrlCreateLabel("ORDNER LIST", 372, 24, 178, 20)
$DATEI_EDIT = GUICtrlCreateLabel("DATEI EDIT", 110, 24, 67, 17)
$Speichern = GUICtrlCreateButton("Speichern", 140, 338, 75, 25)
GuiCtrlSetonevent(-1, "_save")
$Edit_loeschen = GUICtrlCreateButton("Edit löschen", 220, 338, 75, 25)
GuiCtrlSetonevent(-1, "_del")
GUISetState(@SW_SHOW)
GUIRegisterMsg($WM_COMMAND, "WM_COMMAND")
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
While 1
sleep(100)
WEnd
[/autoit] [autoit][/autoit] [autoit]
Func _insFol()
_GUICtrlListBox_ResetContent($hListBox)
$folder = FileSelectFolder("Wählen Sie einen Ordner aus:", @DesktopDir)
If $folder <> "" Then
; GuICtrlSetData($Edit1, "")
$array = _FileListToArray($folder, "*.ini",1)
For $i = 1 To Ubound($array)-1
_GUICtrlListBox_AddFile($hListBox, $folder&"/"&$array[$i])
Next
EndIf
EndFunc
[/autoit] [autoit][/autoit] [autoit]
Func WM_COMMAND($hWnd, $iMsg, $iwParam, $ilParam)
Local $hWndFrom, $iIDFrom, $iCode, $hWndListBox
If Not IsHWnd($hListBox) Then $hWndListBox = GUICtrlGetHandle($hListBox)
$hWndFrom = $ilParam
$iIDFrom = BitAND($iwParam, 0xFFFF)
$iCode = BitShift($iwParam, 16)
Switch $hWndFrom
Case $hListBox, $hWndListBox
Switch $iCode
Case $LBN_DBLCLK
$stringAdd = ""
$sel = _GUICtrlListBox_GetCurSel($hListBox)
If $sel <> -1 Then
$read = FileRead($folder&"/"&$array[$sel+1])
$split = StringSplit($read, "")
For $i = 1 To $split[0]
If $split[$i] = "[" Then
$string &= @CRLF
EndIf
$string &= $split[$i]
Next
;GuICtrlSetData($Edit1, StringTrimLeft($string,1)&@CRLF)
GuICtrlSetData($Edit1, GUICtrlRead($Edit1) & @CRLF & StringTrimLeft($string,1)&@CRLF&@CRLF)

EndIf
EndSwitch
$string = ""
EndSwitch
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_COMMAND
[/autoit] [autoit][/autoit] [autoit]
Func _insLine()
Switch @GUI_CtrlId
Case 5

$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)

$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)

$stringAdd = @crlf & "Satz 1" & @CRLF & @CRLF

Case 6
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)

$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$stringAdd = @crlf & "Satz 2" & @CRLF & @CRLF
Case 7
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)

$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf&@CRLF , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF&@crlf , @CRLF&@CRLF)
GuICtrlSetData($Edit1, $string)
$stringAdd = @crlf & "Satz 3" & @CRLF & @CRLF
EndSwitch

$string = StringReplace(GuiCtrlRead($Edit1), @crlf&@CRLF ,$stringAdd)
GuICtrlSetData($Edit1, $string)

EndFunc
[/autoit] [autoit][/autoit] [autoit]
Func _save()
$saveFile = FileSaveDialog("Wählen Sie einen Ordner aus:", @DesktopDir,"Files(*.*)")
If $saveFile <> "" Then
FileWrite($saveFile, GuiCtrlRead($Edit1))
EndIf
EndFunc
[/autoit] [autoit][/autoit] [autoit]
Func _del()
GuICtrlSetData($Edit1, "")
EndFunc
[/autoit] [autoit][/autoit] [autoit]
Func _Exit()
Exit
EndFunc
[/autoit]
lg SubZero
==========================================================================
"Der Computer ist die logische Weiterentwicklung des Menschen: Intelligenz ohne Moral."

Einmal editiert, zuletzt von subzero007 (23. Juni 2009 um 16:37)
subzero007

Beiträge

759
23. Juni 2009 um 16:39
- #23
Jemand ein vorschlag??
lg SubZero
==========================================================================
"Der Computer ist die logische Weiterentwicklung des Menschen: Intelligenz ohne Moral."
BugFix

aka McBarby

Reaktionen

8

Beiträge

11.010
23. Juni 2009 um 22:44

Offizieller Beitrag
- #24
Stimmt, ist wirklich nicht die Offenbarung
Probier mal folgendes:
Ändere deine Funktion _insLine() so ab:
[autoit]
Func _insLine()
For $i = 27 To 3 Step -1
$string = StringReplace(GuiCtrlRead($Edit1), _multiLine($i) , @CRLF & @CRLF)
GuICtrlSetData($Edit1, $string)
Next
Switch @GUI_CtrlId
Case 5
$stringAdd = @crlf & "Satz 1" & @CRLF & @CRLF
Case 6
$stringAdd = @crlf & "Satz 2" & @CRLF & @CRLF
Case 7
$stringAdd = @crlf & "Satz 3" & @CRLF & @CRLF
EndSwitch
$string = StringReplace(GuiCtrlRead($Edit1), @crlf & @CRLF ,$stringAdd)
GuICtrlSetData($Edit1, $string)
EndFunc
[/autoit][autoit][/autoit][autoit]
Func _multiLine($count)
Local $ret = ''
For $i = 1 To $count
$ret &= @CRLF
Next
Return $ret
EndFunc
[/autoit]
Ungetestet, aber sollte laufen.
MfG BugFix
Mein Git | Meine UDF | Array-Tutorial | Bit-Tutorial | Dll-Tutorial | RegExp-Beispiel

Einmal editiert, zuletzt von BugFix (23. Juni 2009 um 22:50)
subzero007

Beiträge

759
24. Juni 2009 um 09:38
- #25
Danke,
das sieht sauber aus
lg SubZero
==========================================================================
"Der Computer ist die logische Weiterentwicklung des Menschen: Intelligenz ohne Moral."

In deinem Webbrowser ist JavaScript deaktiviert. Um alle Funktionen dieser Website nutzen zu können, muss JavaScript aktiviert sein.