@all: Danke für eure Hilfe ich bin begeistert. Ihr habt mir sehr weiter geholfen.
Die Lösung von RR04 hat für mich am besten gepasst.
Gruß
0cool
@all: Danke für eure Hilfe ich bin begeistert. Ihr habt mir sehr weiter geholfen.
Die Lösung von RR04 hat für mich am besten gepasst.
Gruß
0cool
Hey Leute,
ich bin gerade dabei eine Sache auszuprobieren und komme nicht weiter.
Mein vorhaben ist es in einer Gui einen Tab über das Drücken eines Button zu öffnen.
Ich komme leider nicht weiter.
Mein Code sieht bisher so aus (Alles nur zum Testen):
[autoit]
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
$Form1 = GUICreate("Form1", 623, 449, 192, 114)
$button =GUICtrlCreateButton("Tab aktivieren", 10,10, 100, 20)
$Tab1 = GUICtrlCreateTab(16, 48, 569, 353)
$TabSheet1 = GUICtrlCreateTabItem("TabSheet1")
$Button1 = GUICtrlCreateButton("Button1", 72, 168, 121, 25)
$TabSheet2 = GUICtrlCreateTabItem("TabSheet2")
$Label1 = GUICtrlCreateLabel("Label1", 72, 8, 36, 17)
$Label2 = GUICtrlCreateLabel("Label2", 40, 88, 36, 17)
$Input1 = GUICtrlCreateInput("Input1", 96, 80, 73, 21)
$Label3 = GUICtrlCreateLabel("Label3", 40, 112, 36, 17)
$Input2 = GUICtrlCreateInput("Input2", 96, 112, 73, 21)
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $button
Send("^{TAB}")
Send("^{TAB}")
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Danke schon mal für eure Hilfe!
Gruß
0cool
Raupi : Danke für deine Hilfe, ich mein Code sieht jetzt so aus.
[autoit]
; Skrit-Name: Haushaltsbuch.exe
; Ersteller: Thorsten Zelt
; Erstellt am: 22.06.2012
; Fuunktion: Erfassung der Einahmen und Ausgabe im Haushalt
; #########################################################
; Bibliotheken einbinden
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <GUIEdit.au3>
#include <string.au3>
; Variable werden definiert
$abbuchung = "Monatlich"
$abbuchung1 = "jeden 2. Monat|jeden 3. Monat|jeden halbe Jahr|jährlich"
$versicherung = ""
$versicherung1 = "VDVA|BKK Pfalz|inter|Volkswohlbund|LV|DEVK"
$add = "Hinzufügen"
$Eur = " €"
$font = "Arial"
$ver = "1.0"
; Anfang der GUI
$Form1 = GUICreate("Haushaltsbuch" & " " & $ver, 770, 559, 192, 114)
GUISetFont(16, 400 , 4, $font)
$Ueberschrift = GUICtrlCreateLabel("Haushaltsbuch" & " " & $ver, 256, 24, 1700, 25)
GUISetFont(10, 400, $font)
$Ausgaben = GUICtrlCreateButton("Ausgaben", 16, 112, 89, 25)
$Einnahmen = GUICtrlCreateButton("Einnahmen", 16, 144, 89, 25)
$Statistik = GUICtrlCreateButton("Statistik", 16, 176, 89, 25)
$Body = GUICtrlCreateGroup("Body", 120, 64, 640, 450)
GUICtrlCreateLabel("Name",270, 85, 100, 25)
GUICtrlCreateLabel("Versicherungs-NR", 360, 85, 115, 25)
GUICtrlCreateLabel("Betrag", 490, 85, 100, 25)
$Versichungen = GUICtrlCreateLabel("Versicherungen:", 128, 107, 100, 17)
$VersicherungenInput = GUICtrlCreateCombo($versicherung, 225, 105, 121, 21)
GUICtrlSetData(-1, $versicherung1, $versicherung)
$VersicherungsNR = GUICtrlCreateInput("", 353, 105, 121, 24)
$VersichunergenBetrag = GUICtrlCreateInput("00,00", 480, 105, 55, 24)
GUICtrlSetLimit($VersichunergenBetrag, 6, 4)
GUICtrlCreateLabel("€", 540, 107, 7, 21)
$VersicherungenAbbuchung = GUICtrlCreateCombo($abbuchung, 555, 105, 100, 21)
GUICtrlSetData(-1, $abbuchung1, $abbuchung)
$VHinzufuegen = GUICtrlCreateButton($add, 662, 105, 90, 24)
$VersichungenEdit = GUICtrlCreateEdit("", 128,135, 527,100)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateButton("Speichern", 690, 525, 70, 25)
GUISetState(@SW_SHOW)
; Ende der GUI
; In der While Schleife werden Aktionen ausgeführt
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $VHinzufuegen
Local $VEdit = GUICtrlRead($VersicherungenInput)
Local $VNR = GUICtrlRead($VersicherungsNR)
Local $VBetrag = GUICtrlRead($VersichunergenBetrag)
Local $VAbbuchung = GUICtrlRead($VersicherungenAbbuchung)
; Es wird geprüft ob in das Input Feld $VBetrag wirklich ein Betrag eingetragen wurde
[/autoit][autoit][/autoit][autoit]$VHEdit = GUICtrlGetHandle($VersichungenEdit)
_GUICtrlEdit_AppendText($VHEdit, $VEdit & " " & $VNR & " " & $VBetrag & $Eur & " " & $VAbbuchung & @CRLF)
EndSwitch
WEnd
Ich hab schon weiter geschrieben aber so funktionierts.
Gruß und danke
0cool
Hey Leute,
ich bin neu im Forum und ein Frischling was AutoIt betrifft.
mein Vorhaben ist Werte die in zwei Input Felderder, einem Label und einem Droptdown Menü und ein stehen in eine Edit Box zu schreiben.
Wenn die Werte eingetragen sind, klicke ich auf den Hinzufügen Button. In dem Edit Feld wirden andere Werte reingeschrieben.
Ich vermute das ich die Eingetragenden Werte noch formatieren muss. Hab aber noch nicht rausgefunden wie das funktiniert.
Die Eingabe erfolg in den Codezeilen 37 - 41.
Eingabe Zeile 37: Hallo
Eingabe Zeile 38: 30,00
Label Zeile 39: €
Dopwdown Feld Zeile 40: Monatlich
Ausgabe:
1112 €14
Wie bekomme ich es hin, das alle Werte so in die Edit Box geschrieben werden wie sie eingetragen sind?
Hier kommt der Code:
; Bibliotheken einbinden
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <GUIEdit.au3>
#include <string.au3>
; Variable werden definiert
$abbuchung = "Monatlich"
$abbuchung1 = "jeden 2. Monat|jeden 3. Monat|jeden halbe Jahr|jährlich"
$add = "Hinzufügen"
$Eur = " €"
$font = "Arial"
$ver = "1.0"
$Form1 = GUICreate("Haushaltsbuch" & " " & $ver, 757, 559, 192, 114)
GUISetFont(16, 400 , 4, $font)
$Ueberschrift = GUICtrlCreateLabel("Haushaltsbuch" & " " & $ver, 256, 24, 1700, 25)
GUISetFont(10, 400, $font)
$Ausgaben = GUICtrlCreateButton("Ausgaben", 16, 112, 89, 25)
$Einnahmen = GUICtrlCreateButton("Einnahmen", 16, 144, 89, 25)
$Statistik = GUICtrlCreateButton("Statistik", 16, 176, 89, 25)
$Body = GUICtrlCreateGroup("Body", 120, 64, 625, 450)
GUICtrlCreateLabel("Name",275, 85, 100, 25)
GUICtrlCreateLabel("Betrag", 365, 85, 100, 25)
$Versichungen = GUICtrlCreateLabel("Versicherungen:", 128, 110, 100, 17)
$VersicherungenInput = GUICtrlCreateInput("", 230, 110, 121, 21)
$VersichunergenBetrag = GUICtrlCreateInput("", 360, 110, 45, 21)
GUICtrlCreateLabel("€", 410, 110, 25, 21)
$VersicherungenAbbuchung = GUICtrlCreateCombo($abbuchung, 430, 110, 100, 21)
GUICtrlSetData(-1, $abbuchung1, $abbuchung)
$VHinzufuegen = GUICtrlCreateButton($add, 540, 110, 90, 21)
$VersichungenEdit = GUICtrlCreateEdit("", 128,150, 500,100)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateButton("Speichern", 675, 525, 70, 25)
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $VHinzufuegen
$VEdit = StringFormat($VersicherungenInput & $VersichunergenBetrag & $Eur & $VersicherungenAbbuchung)
$VHEdit = GUICtrlGetHandle($VersichungenEdit)
_GUICtrlEdit_AppendText($VHEdit, $VEdit & @CRLF)
EndSwitch
WEnd
Danke schon mal für eure Hilfe
Gruß
0cool