Hilfe bei Fileprint bitte

1. offizieller Beitrag

    wie kann man das machen das ich im formular die anzahl der zu druckende datein funktioniert

    [autoit]

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

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

    Example1()

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

    Func Example1()
    Local $msg

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

    GUICreate("Meine GUI")
    GUISetState(@SW_SHOW)
    $druck = GuiCtrlCreateInput("", 200, 120, 110, 20)
    GUICtrlCreateButton("Start", 60, 128, 75, 25, 0)
    While 1
    $msg = GUIGetMsg()

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

    If $msg = $GUI_EVENT_CLOSE Then ExitLoop
    WEnd
    GUIDelete()
    EndFunc

    [/autoit]

    ich weis nur das ,das irgendwie so geht

    [autoit]

    For $i = 1 To $druck[0][0]
    _FilePrint($druck[$i][1])
    Next

    [/autoit]

    bitte um hilfe

    Hallo bh-systems,

    du solltest schon etwas mehr als 2 Codeschnipsel die nicht zusammenpassen posten, also biite etwas näher beschreiben oder vollständiges (bisher erstelltes) Skript posten.

    mfg autoBert

    Ich hab mal versucht n möglichst einfaches Beispiel zu basteln:

    Spoiler anzeigen
    [autoit]

    #include <File.au3>
    #include <GUIConstantsEx.au3>

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

    GUICreate("Meine GUI")
    $druck = GuiCtrlCreateInput("5", 200, 120, 110, 20)
    $Button1 = GUICtrlCreateButton("Start", 60, 128, 75, 25, 0)
    GUISetState(@SW_SHOW)

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

    While 1
    Switch GUIGetMsg()
    Case $GUI_EVENT_CLOSE
    ExitLoop
    Case $Button1
    $datei = FileOpenDialog("Wähle die zu druckende Datei", @ScriptDir, "Alle Dateien (*.*)")
    If FileExists($datei) Then
    For $i = 1 To GUICtrlRead($druck)
    _FilePrint($datei)
    Next
    EndIf
    EndSwitch
    WEnd

    [/autoit]
    • Offizieller Beitrag

    Theoretisch geht es so:

    Spoiler anzeigen
    [autoit]


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

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

    $hGui = GUICreate('MultiPrint', 600, 120)
    GUICtrlCreateLabel('Datei:', 10, 10, 50, 20)
    $hPath = GUICtrlCreateInput('', 60, 10, 480, 20)
    $hSelect = GUICtrlCreateButton('...', 550, 10, 40, 20)
    GUICtrlCreateLabel('Anzahl:', 10, 40, 50, 20)
    $hCount = GUICtrlCreateInput('1', 60, 40, 50, 20, $ES_NUMBER)
    $hPrint = GUICtrlCreateButton('Drucken', 120, 40, 80, 20)
    GUISetState()
    While True
    Switch GUIGetMsg()
    Case $GUI_EVENT_CLOSE
    Exit
    Case $hSelect
    $sPath = FileOpenDialog('Bitte Datei auswählen die gedruckt werden soll.', '', 'Textdateien (*.txt)', 3, '', $hGui)
    If FileExists($sPath) Then GUICtrlSetData($hPath, $sPath)
    Case $hPrint
    $iCount = GUICtrlRead($hCount)
    $sFile = GUICtrlRead($hPath)
    If $sFile <> '' And $iCount > 0 Then
    For $i = 1 To $iCount
    _FilePrint($sFile)
    ConsoleWrite($sFile & ' ERROR = ' & @error & @CR)
    Next
    EndIf
    EndSwitch
    WEnd

    [/autoit]


    Aber _FilePrint() funktioniert bei mir (Windows7, 64 Bit) nicht. ?(

    Edit: Mist, Schnitzel war schneller. :rolleyes: