Txt inhalt in editbox laden

  • Hey,
    wollte gerne den inhalt einer editbox in eine editbox laden.
    Was mache ich falsch?

    [autoit]

    Func msg()

    [/autoit][autoit][/autoit][autoit]

    $var = FileOpenDialog("", @ScriptDir & "\", "Text (*.txt)", 1 + 4 )

    [/autoit][autoit][/autoit][autoit]

    If @error Then
    MsgBox(4096,"","Keine Datei(en) ausgewählt")
    Else
    While True
    $sItem = FileReadLine($var)
    If @error Then ExitLoop
    WEnd
    GuICtrlSetData($Editbox, $sItem)
    EndIf
    EndFunc

    [/autoit]

    Gruß
    SubZero

    lg SubZero ;)
    ==========================================================================

    "Der Computer ist die logische Weiterentwicklung des Menschen: Intelligenz ohne Moral."

  • Spoiler anzeigen
    [autoit]

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

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    $var = FileOpenDialog("", @ScriptDir & "\", "Text (*.txt)", 1 + 4 ) ; hat schon gestimmt aber :
    $txt = FileRead($var) ; Die Ausgewählte datei mus erst gelesen werden

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    $Form1 = GUICreate("Auslese Beispiel", 616, 430, -1, -1)
    $Edit1 = GUICtrlCreateEdit("", 0, 0, 633, 449)
    GUICtrlSetData(-1, $txt) ; Hier die Variable mit FileRead eintragen
    GUISetState(@SW_SHOW)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit

    [/autoit] [autoit][/autoit] [autoit]

    EndSwitch
    WEnd

    [/autoit]


    So in etwa ^^

    MFG Eistee