zusammen kleben

1. offizieller Beitrag

    Hallo zusammen.

    Ich habe 5 lange Texte, die über mehrere Zeilen gehen.
    Nach jedem Text soll aus dem Imputfelder der GUI etwas eingefügt werden und dann unter dem Namen zusammen.txt als eine Datei gespeichert werden.

    Damit es evtl. auch eine Person hier versteht, hier mal eine Erklärung.

    Text1 (textdatei1.txt)
    +
    Imput 1 (Inhalt des Imput 1 Feldes Teil 2)
    +
    Text2
    +
    Imput 2
    +
    usw.

    = zusammen.txt

    Hier mal das Gui:

    Spoiler anzeigen
    [autoit][/autoit] [autoit][/autoit] [autoit]

    #include <GUIConstants.au3>

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

    $Form1 = GUICreate("Form1", 289, 216, 193, 125)
    $Label1 = GUICtrlCreateLabel("Teil 2", 8, 32, 41, 24)
    GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
    $Input1 = GUICtrlCreateInput("Input1", 64, 32, 209, 21)
    $Label2 = GUICtrlCreateLabel("Teil 4", 8, 64, 41, 24)
    GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
    $Label3 = GUICtrlCreateLabel("Teil 6", 8, 96, 41, 24)
    GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
    $Label4 = GUICtrlCreateLabel("Teil 8", 8, 128, 41, 24)
    GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
    $Input2 = GUICtrlCreateInput("Input2", 64, 64, 209, 21)
    $Input3 = GUICtrlCreateInput("Input3", 64, 96, 209, 21)
    $Input4 = GUICtrlCreateInput("Input4", 64, 128, 209, 21)
    $Zusammen = GUICtrlCreateButton("Zusammen", 64, 160, 209, 33, 0)
    GUISetState(@SW_SHOW)

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

    Eigentlich könnte man es ja via Copybefehl machen, aber das ist nicht möglich, da man beim "batchen" keine Eingaben via Imputfeld machen kann und wenn dann nur durch Aufforderung einer Eingabe. Ich möchte das ganze via AutoIt machen und wenn es möglich ist, später sogar ohne die Extratextdateien, sondern das man eine Exe-Datei hat, wo die Texte bereits alle drinne sind. Aber erst einmal reicht es, wenn es mit den Texten geht.

    Okay, ob mein Problem eine Person hier verstanden hat und ob das so mit AutoIt möglich ist, sehe ich, wenn das Licht an geht.

    Okay, ich bin gespannt.

    LG und eine ruhige Woche.

    Lina.

    Lieben Gruß,
    Alina

    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

    Geheime Information: ;)
    OuBVU5ebLhHu5QvlnAyQB4A7SzBrvWulwL7RLl2BdH5tI6sIYspeMKeXMSXl

    Einmal editiert, zuletzt von Alina (1. April 2008 um 15:47)

    So, hier jetzt das kl. Bsp.

    Dick ist das was der Text ist, nicht dick, das was durch die Imput eingefügt werden soll.

    Ein kleiner Fisch, der hatte eine ganz große Flosse.
    Diese Flosse hatte folgende Maße und Farben:

    Länge = 21 mm (Imput 1 alles was nach dem Gleichheitszeichen steht)
    Breite = 7mm (Imput 2 alles was nach dem Gleichheitszeichen steht)

    Seine Zahnreihen hatten folgende Zähne:
    und die sind gefährlich

    Oben = „ 2 Schneidezähne und 50 sonstige Zähne“ (Imput 3 alles was nach dem Gleichheitszeichen steht incl. „“)
    Unten = " 52 sonstige Zähne" (Imput 4 alles was nach dem Gleichheitszeichen steht incl. „“)

    usw.

    Ich glaube ich versuche das alles in das Script mit rein zu packen, dann habe ich nur eine Date später.

    Aber die Frage ist hat wie?

    Evtl. hilfe diese sinnlose Geschichte.

    LOL


    LG, Lina.

    Lieben Gruß,
    Alina

    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

    Geheime Information: ;)
    OuBVU5ebLhHu5QvlnAyQB4A7SzBrvWulwL7RLl2BdH5tI6sIYspeMKeXMSXl

    [autoit]

    $txt = "Ein kleiner Fisch, der hatte eine ganz große Flosse." & @crlf & "Diese Flosse hatte folgende Maße und Farben:" & @crlf & @crlf & "Länge =" & @crlf & "Breite ="
    $txt = StringReplace($txt, "Länge =", "Länge = " & GUICtrlRead($Input1))
    $txt = StringReplace($txt, "Breite =", "Breite = " & GUICtrlRead($Input2))
    MsgBox(0, "", $txt)

    [/autoit]

    Edit: Ist halt etwas verändert, aber hoffe du verstehst was ich meine ;).

    Da kann ich gleich mal schauen, ob das so in mein Kopf geht.
    Aber ich meine das ich es evtl. jetzt hin bekomme.

    Sonst melde ich mich nochmals, wenn die Geldud noch da ist.

    LG, Lina.

    Lieben Gruß,
    Alina

    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

    Geheime Information: ;)
    OuBVU5ebLhHu5QvlnAyQB4A7SzBrvWulwL7RLl2BdH5tI6sIYspeMKeXMSXl

    Okay, und für das 2te Beispiel dann so:

    [autoit]

    $txt2 = "Seine Zahnreihen hatten folgende Zähne:" & @crlf & "und die sind gefährlich" & @crlf & @crlf & "Oben =" & @crlf & "Unten ="
    $txt2 = StringReplace($txt2, "Oben =", "Oben = " & '„ 2 Schneidezähne und 50 sonstige Zähne“ ' & GUICtrlRead($Input3))
    $txt2 = StringReplace($txt2, "Unten =", "Unten = " & '„ 52 sonstige Zähne" ' & GUICtrlRead($Input4))
    MsgBox(0, "", $txt2)

    [/autoit]

    Also mit den "