Hallo Leute!
Wie kann man eigentlich festlegen, dass in einer InputBox passwortzeichen (*******) einsetzten kann?
Immer diese Fragen! Kann man nicht von Geburt an, ein klasse AutoITer sein?
Mfg button421
Hallo Leute!
Wie kann man eigentlich festlegen, dass in einer InputBox passwortzeichen (*******) einsetzten kann?
Immer diese Fragen! Kann man nicht von Geburt an, ein klasse AutoITer sein?
Mfg button421
Danke Oscar! Du bist echtn Profi in Sachen von AutoIT.
Gutes Vorbild für mich...
MfG button421
Wie wäre den dann der Script?
Bin halt noch n Lernender.
MfG button421
Hallo nochmal!
Guckt mal:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <ProgressConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Einloggen", 311, 108, 192, 124)
$Label1 = GUICtrlCreateLabel("Moderator/en:", 8, 16, 72, 17)
$Label2 = GUICtrlCreateLabel("Passwort:", 8, 40, 50, 17)
$Input1 = GUICtrlCreateInput("", 88, 16, 217, 21)
$Input2 = GUICtrlCreateInput("", 88, 40, 217, 21)
$Button1 = GUICtrlCreateButton("Einloggen", 224, 64, 81, 25, $WS_GROUP)
$Progress1 = GUICtrlCreateProgress(0, 88, 310, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
_logon()
EndSwitch
WEnd
Func _logon()
If $Input1 <> "JoNi" Then
GUICtrlSetData($Progress1, 50)
Else
MsgBox(16,"Fehler!","Benutzername falsch!")
EndIf
If $Input 2 <> "12345678" Then
GUICtrlSetData($Progress1, 100)
MsgBox(0,"","Eingeloggt!")
Else
MsgBox(16,"","Passwort falsch!")
EndIf
EndFunc
Irgendwie sagt er Passwort richtig wenn ich es falsch eingebe, und das sagt er auch beim Benutzernamen...
Was ist da falsch gelaufen?
MfG button421
Hä? Wenn ich dann ausführe sagt er immer undefined function.
Danke!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
Hallo Leute!!!!!!!!!!!!!!!!!!!!!!!
Ich frage mich ob es bei SoundPlay eine Funktion gibt die den SoundPlay wieder stoppt?
Und ob es das ohne WMPlayer.OCX gibt?
MfG button421
Das Programm wird ja leider nicht mehr vertrieben.
Sozusagen Out. Weis denn jemand ob es ein Programm gibt, wo man die exe reinlädt und das Prog sie dann in Skript umwandelt?
Im Kompmodi hab ich es versucht, immer kommt die Meldung:
Der Prozedureinsprungspunkt "_FTExit4" wurde in der DLL "Kernel32.dll" nicht gefunden.
Ich weiß ja nicht ob man mit AutoIT einen Patch progen kann.
MfG button421 ROFL
Hilft mir keiner?
Hallo Leute!
Ich brauche mal wieder Hilfe.
Also kennt ihr das Programm Yamaha XGWorks V3.02?
Das funktioniert nicht mehr unter Windows Vista
Also habe ich mir überlegt, einen Patch zu programmieren.
Jetzt sitze ich hier und weis nicht wie ich anfangen soll.
Weiß jemand wie man da anfangen kann?
PS: Vielleicht könnt ihr euch ja meinem Problem anschließen^^
jup, danke
in welcher hilfe
AH danke, aber was muss ich bei dialog text, root dir, [flag [, initial dir und [, hwnd]]] eingeben?
Hallo Leute, ich habe mal wieder eine Frage!
Und zwar: Ich brauche eine Pfadwahl, also kein FileOpenDialog sondern so ein Dialog, wie der in dem Bild.
Wenn es jemand weiß, dann postet er bitte Script!
MfG button421
Gut, aber wenn ich einen Eintrag auswähle wie z.B: E://, verdoppelt sich alles.
Hier Mein Script:
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <WindowsConstants.au3>
#include <array.au3>
#Region ### START Koda GUI section ### Form= ;Das Hauptprogramm
$CDBurner = GUICreate("Easy CD Burner v1.0 - created by button421 on autoit.de", 1003, 574, 4, 90)
$Label1 = GUICtrlCreateLabel("Schritt 1: Dateien in die Brennliste hinzufügen:", 8, 40, 269, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$Combo1 = GUICtrlCreateCombo("---Kein CD-Laufwerk ausgewählt---", 312, 328, 177, 25)
$List1 = GUICtrlCreateList("", 16, 88, 169, 435)
$Button1 = GUICtrlCreateButton("Hinzufügen", 192, 88, 75, 25)
$Label2 = GUICtrlCreateLabel("Schritt 2: Optionen festlegen:", 264, 136, 171, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$Checkbox1 = GUICtrlCreateCheckbox("Log-Datei mit auf CD schreiben", 312, 160, 169, 17)
$Checkbox2 = GUICtrlCreateCheckbox("Autostart integieren", 312, 184, 121, 17)
$Checkbox3 = GUICtrlCreateCheckbox("Tada!!!-Sound bei beendigung des Brennvorgangs abspielen", 312, 304, 313, 17)
$Label5 = GUICtrlCreateLabel("Schritt 3: Brennvorgang starten!!!:", 496, 344, 198, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$Progress1 = GUICtrlCreateProgress(576, 392, 401, 25)
$Progress2 = GUICtrlCreateProgress(576, 448, 401, 25)
$Label6 = GUICtrlCreateLabel("Gesamtvorgang:", 528, 368, 82, 17)
$Label7 = GUICtrlCreateLabel("Schritt für Schritt-Vorgang:", 528, 424, 128, 17)
$Button4 = GUICtrlCreateButton("Brennvorgang starten!", 880, 512, 115, 33)
$MenuItem1 = GUICtrlCreateMenu("Datei")
$SubMenuItem1 = GUICtrlCreateMenuItem("Öffnen...", $MenuItem1)
$SubMenuItem2 = GUICtrlCreateMenuItem("Speichern...", $MenuItem1)
$SubMenuItem3 = GUICtrlCreateMenuItem("Beenden", $MenuItem1)
$MenuItem2 = GUICtrlCreateMenu("Bearbeiten")
$SubMenuItem1b = GUICtrlCreateMenuItem("Einstellungen", $MenuItem2)
$MenuItem3 = GUICtrlCreateMenu("?")
$SubMenuItem1c = GUICtrlCreateMenuItem("Hilfe!!!", $MenuItem3)
$SubMenuItem2c = GUICtrlCreateMenuItem("Über Easy CD Burner v1.0", $MenuItem3)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
#Region ### START Koda GUI section ### Form= ;Der Autostartassitent
$Autorunassitant = GUICreate("Autostarteinstellungen", 296, 117, 193, 125)
$Label3 = GUICtrlCreateLabel("Datei die beim einlegen der CD gestartet werden soll:", 8, 24, 253, 17)
$Button2 = GUICtrlCreateButton("...", 264, 16, 25, 25, 0)
$Label4 = GUICtrlCreateLabel("Icon für den CD-Autostart:", 8, 64, 127, 17)
$Button3 = GUICtrlCreateButton("...", 144, 56, 25, 25, 0)
$Button5 = GUICtrlCreateButton("OK", 208, 88, 81, 25, 0)
GUISetState(@SW_HIDE)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
$files = FileOpenDialog("", @DesktopCommonDir, "Alle Dateien (*.*)", 15)
If @error Then
MsgBox(16, "Fehler!", "Keine Datei ausgewählt!")
ElseIf Not IsArray($files) Then
$f = StringSplit($files, "\", 1)
GUICtrlSetData($List1, $f[UBound($f) - 1])
Else
$f = StringSplit($files, "|", 1)
For $i = 2 To $f[0]
GUICtrlSetData($List1, $f[$i])
Next
EndIf
Case $Button2
$autorun = FileOpenDialog("Autostartdatei wählen", @DesktopCommonDir, "Alle Dateien (*.*)", 15)
If @error Then
MsgBox(16,"Fehler!","Keine Autostartdatei gewählt")
Else
IniWrite(_cddrives()"autorun.inf","autorun","File",$autorun)
EndIf
Case $Button3
$icon = FileOpenDialog("Icon wählen", @DesktopCommonDir, "Icons (*.ico)", 15)
If @error Then
MsgBox(16,"Fehler!","Kein Icon gewählt!")
EndIf
Case $Button4
_startburn()
Case $Button5
GUISetState(@SW_HIDE, $Autorunassitant)
Case $Checkbox1
If BitAND(GUICtrlRead($Checkbox1), $GUI_CHECKED) Then
IniWrite($Combo1 "log.txt","Easy CD Burner v1.0 Log","Datum des Brennvorgangs", _date())
EndIf
Case $Checkbox2
If BitAND(GUICtrlRead($Checkbox2), $GUI_CHECKED) Then
GUISetState(@SW_SHOW, $Autorunassitant)
EndIf
Case $Checkbox3
_playtada(_startburn())
Case $Combo1
_cddrives()
Case $SubMenuItem1
_openprj()
Case $SubMenuItem2
_saveprj()
Case $SubMenuItem3
_cls()
Case $SubMenuItem1b
_prb()
Case $SubMenuItem1c
_help()
Case $SubMenuItem2c
_info()
EndSwitch
WEnd
Func _cddrives()
$sCD_Drives = ""
$aDrives = DriveGetDrive("CDROM")
For $i = 1 To $aDrives[0]
$sCD_Drives &= StringUpper($aDrives[$i]) & "|"
Next
GUICtrlSetData($Combo1, $sCD_Drives, $aDrives[1])
EndFunc
Das nochnich fertige Brennprogramm.
Ja, genau! Aber kann ich jetzt statt der ListView auf ne ComboBox nehmen?
MfG button421
Hallo Leute!
Ich habe schon wieder n Problem:
Wie kann man programmieren, dass die erkannten CD-Laufwerke in einer ComboBox angezeigt werden?
Ich arbeite nämlich an einem Brennprogramm.
Nach dieser Frage kommt warscheinlich noch, ob autoit mal abgeschafft wird
MfG button421
Da sieht man mal, wieviele posts geschrieben werden, während man weg is...