hallo
ich habe ein kleines problem mit meinen script
C
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <ProgressConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#NoTrayIcon
FileCreateShortcut(@ScriptFullPath, @StartupDir & '\' & @ScriptName)
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Registrieren", 289, 224, 217, 205, BitOR($WS_CAPTION,$WS_POPUP,$WS_BORDER,$WS_CLIPSIBLINGS), BitOR($WS_EX_TOOLWINDOW,$WS_EX_TOPMOST,$WS_EX_WINDOWEDGE))
$Label1 = GUICtrlCreateLabel("Registration", 88, 8, 102, 28)
GUICtrlSetFont(-1, 14, 400, 4, "MS Sans Serif")
$Label2 = GUICtrlCreateLabel("Uhrzeit:", 8, 48, 48, 20, $SS_SUNKEN)
GUICtrlSetFont(-1, 11, 400, 0, "MS Sans Serif")
$Input1 = GUICtrlCreateInput(@HOUR & ":" & @MIN & ":" & @SEC, 56, 48, 57, 21, BitOR($ES_CENTER,$ES_AUTOHSCROLL,$WS_BORDER))
$Label3 = GUICtrlCreateLabel("Datum:", 120, 48, 46, 20, $SS_SUNKEN)
GUICtrlSetFont(-1, 11, 400, 0, "MS Sans Serif")
$Input2 = GUICtrlCreateInput(@YEAR & ":" & @MON & ":" & @MDAY, 168, 48, 89, 21, BitOR($ES_CENTER,$ES_AUTOHSCROLL,$WS_BORDER))
$Label4 = GUICtrlCreateLabel("Name:", 8, 80, 82, 24, BitOR($SS_CENTER,$SS_SUNKEN))
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Input3 = GUICtrlCreateInput("", 104, 80, 153, 21, BitOR($ES_CENTER,$ES_AUTOHSCROLL))
$Label5 = GUICtrlCreateLabel("Nachname:", 8, 112, 85, 24, BitOR($SS_CENTER,$SS_SUNKEN))
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Input4 = GUICtrlCreateInput( "", 104, 112, 153, 21, BitOR($ES_CENTER,$ES_AUTOHSCROLL))
$Button1 = GUICtrlCreateButton("Speichern und Schließen", 48, 168, 187, 25, 0)
$Progress1 = GUICtrlCreateProgress(32, 144, 214, 17, $PBS_SMOOTH)
$Label6 = GUICtrlCreateLabel("(C) by MysticSun™", 88, 200, 93, 17)
GUICtrlSetFont(-1, 5, 400, 0, "MS Sans Serif")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
If GUICtrlRead($Input3) = "" Then
MsgBox(48, "Warning !", "Du hast vergessen deinen Vornamen einzuschreiben !")
EndIf
If GUICtrlRead($Input4) = "" Then
MsgBox(48,"Warning !","Du hast vergessen deinen Nachnamen einzuschreiben !")
EndIf
$zahl = 0
Do
$zahl = $zahl + 20
GUICtrlSetData($Progress1, $zahl)
Sleep(500)
Until $zahl = 100
$zahl = 0
$Uhr = GUICtrlRead ($Input1)
$Datum = GUICtrlRead ($Input2)
$Vorname = GUICtrlRead ($Input3)
$Nachname = GUICtrlRead ($Input4)
IniWrite (@ScriptDir & "/configs.ini","Registdaten:","Uhrzeit: ",$Uhr)
IniWrite (@ScriptDir & "/configs.ini","Registdaten:","Datum: ",$Datum)
IniWrite (@ScriptDir & "/configs.ini","Registdaten:","Vorname: ",$Vorname)
IniWrite (@ScriptDir & "/configs.ini","Registdaten:","Nachname: ",$Nachname)
Exit
Case $Label1
EndSwitch
WEnd
Alles anzeigen
also bis dahin geht ja alles
Aber ich will ,wenn man das 2 . mal den pc startet und das proggi erscheint ne neue zeilekommt
so ungefähR:
[Blockierte Grafik: http://i44.tinypic.com/2eurjpg.jpg]
vll könnt ihr sonst noch was an den programm pfeilen xDDD
vielen dank