Ich hoffe das ich mit der Überschrift richtig liege.
Halle zusammen.
Wie beschränke ich die Eingabelänge eines Inputfeld auf 25?
Ich hoffe das ich mit der Überschrift richtig liege.
Halle zusammen.
Wie beschränke ich die Eingabelänge eines Inputfeld auf 25?
Ja, jetzt kann ich wohl starten.
MERCI und KnuBu,
L I N A.
Okay, das läuft.
Ist doch abgefahren.
Eine letzte Frage diesbezüglich.
Wenn die Datei bereits besteht, schreibt er es jetzt ja hinten ran, wie mache ich es, das er zuvor die ganzen Zeilen in der Datei löscht?
L I N A
Hallo Bernd.
Wieso schreibt er in die Datei denn nur eine 0 (Zahl Null) rein? Mehr nicht.
L I N A ![]()
Ich hatte so gedacht:
Case $speichern
$unter = FileSaveDialog( "Bitte Dateiname auswählen.", "c:\", "Textdatei (*.txt)", 3)
$open = FileOpen($unter, 1)
FileWrite($open,$etext)
FileClose($open)
aber da speichert er es ohne Dateiendung. Wieso das? Bei dem Beispiel von Oscar auch. Aber man kann keine Dateiendung erzwingen oder so?
L I N A
Hallo Bernd.
Ich habe das speichern nun so weit:
Case $speichern
FileSaveDialog( "Bitte Dateiname und Speicherort eingeben.", "c:\", "Textdatei (*.txt)", 3)
FileWrite ????????
Nur ich wähle ja bei FileSaveDialog erst aus wo und unter welchen Namen ich es speichern möchte. Genau hier habe ich das Problem.
LG, Lina.
Hallohofi02.
Tip: Das komplett Script posten.
Du schreibst im Script " wenn gefunden Addiere 1 zu variable $vvss ", nur ist der ja aus dem was Du gepostet hast nicht ersichtlich. Vllt. ist da bereits der Fehler.
Danach sollten auch andere Fragen für die Hilfestellung beantwortet sein, so das man es sich ansehen kann.
Gruß und einen schönen Samstag.
Lina
Hallo Manny89.
Jeder fängt mal klein an und die optische Anpassung ist eine Frage des Geschmacks.
Aber sein WILLKOMMEN.
L I N A
Hallo zusammen.
Ich habe noch paar Fragen.
1.)
Am Ende von $start steht ClipPut($etext). Danach soll er noch die Daten aus Edit1 mir anbieten, das ich diese speichern kann (Datei speichern unter). Ich möchte aber selber entscheiden, wo er es speichert.
2.)
Nach dem Speichern soll er die Daten in die Imputfelder wieder so reinschreiben wie sie beim Scriptstart drinne standen. Also die Vorgaben und das nur bei den Inputfelder !!!
3.)
Habe noch einen weiteren Button erstellt (Case $neustart). Nur weiß ich nicht, wie ich das Script automatisch neu starte
LG, Lina.
Naja, bei Volkswagen ist das meine ich überall bei 20 km /h, Aber darum ging es doch gar nicht. Sollen doch die Automabilhersteller mal etwas genauer arbeiten. ![]()
Ja, so geht das.
Daraus kann man doch nun schöne Tools erstellen. Oder?
Ich probiere jetzt mal.
LG und DANKE !!!
L I N A
Hallo.
Einfrage Frage habe ich doch noch.
Warum funktioniert das nicht?
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $exit
Exit
Case $start
;Also, erstmal den Text holen:
$text = Guictrlread($input1) & @CRLF & Guictrlread($input2)& @CRLF
$2text = Guictrlread($input3)
$etext = StringReplace(GUICtrlRead($Edit1), "Hier soll der ", $text)
$2etext = StringReplace(GUICtrlRead($Edit1), "Text der Label 1 bis 3 untereinander rein !!!!", $2text)
GuictrlsetData($Edit1,$etext)
ClipPut($etext)
EndSwitch
WEnd
Falls mal die Felder nicht zusammen ein Text "austauschen sollen, sondern wie hier im Beispiel $input zwei an eine andere Stelle. Okay, hier ist es direkt dahinter, aber eingebaut, aber die Funktionsweise bei verschiedenen Positionen bekomme ich nicht hin.
LG, Lina.
Ja, so geht es perfekt.
Und weißt Du was. Damit finde ich gleich die Lsg. für drei andere Script, wo ich nie weiter gemacht habe, weil ich nie wusste wie ich sie beende. Zahlreiche Entwürfe sind in einer kleinen Mappe. Ich schreibe mir Ideen auf dem Sofa auf, die man mal versuchen könnte zu erstellen. Dann geht es meistens gut voran, aber irgendwie kommt dann oft was wichtigeres dazwischen. Aber ich erstelle oft kleine Scripte mit Sachen wo ich am besten lerne. Kurzfassung: Ich kann wieder drei Ideen kommpletttttttttt umsetzen.
Oh man. Wenn ich daran denke, was ich vor der Zeit am PC gemacht habe? Meine die Zeit, bevor diese Technik mich begeisterte.
Gruß und HERZLICHEN DANK !!!
L I N A
FileCopy(@ScriptDir & "\beispiel.exe","C:\","\*.*") erlaubt oderwas ist davon verboten.
Oscar , habe gerade "Lernlust"
So weit, so gut.
Jetzt fügt er die Input Daten nur einmal ein. So soll es auch sein. Aber die erste Zeile aus Edit1 (Hier steht schon ein Text !!!!) soll in der ersten Reihe stehen bleiben, genauso wie in der dritten Zeile der Text "Hier steht auch wieder etwas !!!!". Ausgabe sollte so sein:
Hier steht schon ein Text !!!!
Inhalt aus Input1
Inhalt aus Input2
Inhalt aus Input3
Hier steht auch wieder etwas !!!!
Habe ich das nun besser erklärt?
Aktueller Quelltext:
#include <GUIConstants.au3>
#Region ### START Koda GUI section ### Form=d:\autoit\metatag_maker.kxf
$Form1_1 = GUICreate("ZA & E1", 394, 569, 200, 134)
$Label1 = GUICtrlCreateLabel("Label1", 8, 8, 36, 17)
$Input1 = GUICtrlCreateInput("Input1", 56, 8, 329, 21)
$Label2 = GUICtrlCreateLabel("Label2", 8, 32, 36, 17)
$Input2 = GUICtrlCreateInput("Input2", 56, 32, 329, 21)
$Label3 = GUICtrlCreateLabel("Label3", 8, 56, 36, 17)
$Input3 = GUICtrlCreateInput("Input3", 56, 56, 329, 21)
$start = GUICtrlCreateButton("In die Zwischenablage und unten ins Feld einfügen", 8, 88, 377, 33, 0)
$exit = GUICtrlCreateButton("Exit", 8, 128, 377, 33, 0)
$Edit1 = GUICtrlCreateEdit("", 8, 168, 377, 393)
GUICtrlSetData(-1, StringFormat("Hier steht schon ein Text !!!!\r\n\r\nHier soll der Text der Label 1 bis 3 untereinander rein !!!!\r\n\r\nHier steht auch wieder etwas !!!!"))
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $exit
Exit
Case $start
;Also, ertmal den Text holen:
$text = Guictrlread($input1) & @CRLF & Guictrlread($input2) & @CRLF & Guictrlread($input3)
GuictrlsetData($Edit1,$text)
ClipPut($text)
; oder soll es an die zwischenablage angefügt werden? ANTWORT: Ja, auch in die Zwischenablage. AUCH !!!
$clip = ClipGet()
ClipPut($clip & @CRLF & $text)
;Bei Textfeld:
;$etext = GuictrlRead($Edit1)
;GuictrlsetData($Edit1,$etext&@CRLF&$text)
EndSwitch
WEnd
L I N A
Fast2: ich weiß es war SPASS !
@ Oscar
Erst einmal habe ich ![]()
![]()
![]()
![]()
![]()
![]()
![]()
FileCopy(@ScriptDir ... erlaubt !
FileInstall("\test.exe", @ScriptDir) erlaubt !
FileInstall(@ScriptDir, "\7z.exe") verboten und falsche Reihenfolge!
Habe ich das richtig verstanden?
![]()
![]()
LINA ![]()
![]()
![]()
Eigentlich muß aus wissenschaftlicher und medizinischer Sicht die "Schrittgeschwindigkeit" genau bei 4,75 km /h liegen.
Es ist erforscht und erwiesen, das ein durchschnittlicher Mensch 4,75 Kilometer in einer Stunde läuft und in dieser Zeit am besten Informationen aufnimmt und verarbeitet. Daraus haben Wissenschaftler abgeleitet, das jeder Verkehrsteilnehmer bei dieser Geschwindigkeit für die höchste Verkehrssicherheit sorgen kann. Und sollte es nicht jedem sein Wunsch sein höchste Verkehrssicherheit genießen zu können? Sollte die Sicherheit der Kinder nicht die höchste Verkehrssicherheit fordern?
Ach was, darüber könnte man Stunden, nein tagelang reden.
Fast2, Du bringst mich um meinen Ver....
Hallo.
Soweit schaut es bis jetzt aus:
#include <GUIConstants.au3>
[/autoit] [autoit][/autoit] [autoit]#Region ### START Koda GUI section ### Form=d:\autoit\metatag_maker.kxf
$Form1_1 = GUICreate("ZA & E1", 394, 569, 200, 134)
$Label1 = GUICtrlCreateLabel("Label1", 8, 8, 36, 17)
$Input1 = GUICtrlCreateInput("Input1", 56, 8, 329, 21)
$Label2 = GUICtrlCreateLabel("Label2", 8, 32, 36, 17)
$Input2 = GUICtrlCreateInput("Input2", 56, 32, 329, 21)
$Label3 = GUICtrlCreateLabel("Label3", 8, 56, 36, 17)
$Input3 = GUICtrlCreateInput("Input3", 56, 56, 329, 21)
$start = GUICtrlCreateButton("In die Zwischenablage und unten ins Feld einfügen", 8, 88, 377, 33, 0)
$exit = GUICtrlCreateButton("Exit", 8, 128, 377, 33, 0)
$Edit1 = GUICtrlCreateEdit("", 8, 168, 377, 393)
GUICtrlSetData(-1, StringFormat("Hier steht schon ein Text !!!!\r\n\r\nHier soll der Text der Label 1 bis 3 untereinander rein !!!!\r\n\r\nHier steht auch wieder etwas !!!!"))
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $exit
Exit
Case $start
;Also, ertmal den Text holen:
$text = Guictrlread($input1) & @CRLF & Guictrlread($input2) & @CRLF & Guictrlread($input3)
GuictrlsetData($Edit1,$text)
ClipPut($text)
; oder soll es an die zwischenablage angefügt werden? ANTWORT: Ja, auch in die Zwischenablage. AUCH !!!
$clip = ClipGet()
ClipPut($clip & @CRLF & $text)
;Bei Textfeld:
$etext = GuictrlRead($Edit1)
GuictrlsetData($Edit1,$etext&@CRLF&$text)
EndSwitch
WEnd
Er kopiert aus den Feldern den Text ins richtige Feld und gleichzeitig in die Zwischenablage. Aber ein Fehler ist da. In dem Feld stand vorher ein Text. der soll aber nicht gelöscht werden, sondern es soll die Zweite Textzeile ersetzt werden.
Aber den Quelltext habe ich schon fast verstanden. Meine die Hilfe von "progandy" in Zusammenhang mit den anderen beiden. ![]()
Aber wie bekommt man nun den Fehler weg?
LG And Happy Weekend,
L I N A.
Okay, anders gefragt. Vielleicht ist mein Problem noch nicht erkannt.
wann schreibt man: FileInstall("\test.exe", @ScriptDir)
und wann schreibt man: FileInstall("test.exe", @ScriptDir)?
Oder ist es vllt. egal bei einer Angabe einer Constanten wie man es schreibt?
Also egal ob:
Const $a1 = "\test.exe"
oder
Const $a1 = "test.exe"
Egal ob es eine Exe-Datei ist oder eine ZIP-Datei, ich weiß nicht wann ich welche Version einsetze.
Okay, vielleicht kann ich das Problem heute einfach nicht richtig beschreiben. Aber evtl. weiß ja nun jemand wo das Problem ist.
L I N A