Beiträge von vism

vism

Hi,

Ich wollte mal fragen ob es möglich ist, ins' Übergeordnete Verzeichnis zu switchen und dort eine .exe auszuführen?

vism

Ah, danke vielen dank, euch allen =)

Endlich ! XD Oh man, was ne Geburt war ja scho am Ende. XD

vism

Ist doch daoben, das einfach 2 mal^^ also der gleiche Inhalt in Tab A sowie B^^

bsp:

Spoiler anzeigen

[autoit]

#NoTrayIcon
#include <GUIConstantsEx.au3>

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

$ini = @ScriptDir & "\" & "config.ini"

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

GUICreate('Settings', 230, 130)
GUICtrlCreateTab(10, 10, 200, 100)
GUICtrlCreateTabItem("English") ;*****Tab A
$Checkbox1 = GUICtrlCreateCheckbox("AutoUpdate", 20, 40)
$Checkbox2 = GUICtrlCreateCheckbox("AutoLogin", 20, 60)
$Checkbox3 = GUICtrlCreateCheckbox("Newsletter", 20, 80)

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

$ini_autoupdate = IniRead($ini, "Settings", "AutoUpdate", "")
If $ini_autoupdate = "yes" Then GUICtrlSetState($Checkbox1, $GUI_CHECKED)
$ini_autologin = IniRead($ini, "Settings", "AutoLogin", "")
If $ini_autologin = "yes" Then GUICtrlSetState($Checkbox2, $GUI_CHECKED)
$ini_newsletter = IniRead($ini, "Settings", "Newsletter", "")
If $ini_newsletter = "yes" Then GUICtrlSetState($Checkbox3, $GUI_CHECKED)

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

GUISetState(@SW_SHOW)
While 1
$this = GUIGetMsg()
Switch $this
Case $GUI_EVENT_CLOSE
Exit
Case $Checkbox1
$Read = GUICtrlRead($Checkbox1)
If $Read = 1 Then
IniWrite($ini, "Settings", "AutoUpdate", "yes")
ElseIf $Read = 4 Then
IniWrite($ini, "Settings", "AutoUpdate", "no")
EndIf
Case $Checkbox2
$Read = GUICtrlRead($Checkbox2)
If $Read = 1 Then
IniWrite($ini, "Settings", "AutoLogin", "yes")
ElseIf $Read = 4 Then
IniWrite($ini, "Settings", "AutoLogin", "no")
EndIf
Case $Checkbox3
$Read = GUICtrlRead($Checkbox3)
If $Read = 1 Then
IniWrite($ini, "Settings", "Newsletter", "yes")
InputBox("E-Mail:", "Enter E-Mail Adress here")
ElseIf $Read = 4 Then
IniWrite($ini, "Settings", "Newsletter", "no")
EndIf
EndSwitch
WEnd

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

GUICtrlCreateTabItem("Deutsch") ;*****Tab B
$Checkbox1 = GUICtrlCreateCheckbox("AutoUpdate", 20, 40)
$Checkbox2 = GUICtrlCreateCheckbox("AutoLogin", 20, 60)
$Checkbox3 = GUICtrlCreateCheckbox("Newsletter", 20, 80)

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

$ini_autoupdate = IniRead($ini, "Settings", "AutoUpdate", "")
If $ini_autoupdate = "yes" Then GUICtrlSetState($Checkbox1, $GUI_CHECKED)
$ini_autologin = IniRead($ini, "Settings", "AutoLogin", "")
If $ini_autologin = "yes" Then GUICtrlSetState($Checkbox2, $GUI_CHECKED)
$ini_newsletter = IniRead($ini, "Settings", "Newsletter", "")
If $ini_newsletter = "yes" Then GUICtrlSetState($Checkbox3, $GUI_CHECKED)

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

GUISetState(@SW_SHOW)
While 1
$this = GUIGetMsg()
Switch $this
Case $GUI_EVENT_CLOSE
Exit
Case $Checkbox1
$Read = GUICtrlRead($Checkbox1)
If $Read = 1 Then
IniWrite($ini, "Settings", "AutoUpdate", "yes")
ElseIf $Read = 4 Then
IniWrite($ini, "Settings", "AutoUpdate", "no")
EndIf
Case $Checkbox2
$Read = GUICtrlRead($Checkbox2)
If $Read = 1 Then
IniWrite($ini, "Settings", "AutoLogin", "yes")
ElseIf $Read = 4 Then
IniWrite($ini, "Settings", "AutoLogin", "no")
EndIf
Case $Checkbox3
$Read = GUICtrlRead($Checkbox3)
If $Read = 1 Then
IniWrite($ini, "Settings", "Newsletter", "yes")
InputBox("E-Mail:", "Enter E-Mail Adress here")
ElseIf $Read = 4 Then
IniWrite($ini, "Settings", "Newsletter", "no")
EndIf
EndSwitch
WEnd

[/autoit]

vism

Omg *_* Das tut doch scho weh. XD Das erste mal das ich das ÜBERHAUPTNET nachvollziehn kann. Ich hab überhauptkA was ich machen soll. xD Ich kann machen wat ich will er will net. Ob es daher kommt das ich noch nie mit Tabs gearbeitet hab oder ich einfach zu doof bin kA wahrscheinlich letzteres.*>OMG<*

vism

Das kapier ich jetz net.

Also Die Tabs, sind jetz mit

[autoit]

GUICtrlCreateTabItem("")

[/autoit]

geschlossen, aber er zeigt mir den 2ten Tab trotzdem net an? Öö>

vism

Hi, also

Ich Brauche einen 2ten Tab mit dem gleichen Inhalt, wie im Ersten Tab aber sobald ich einen Zweiten Tab erstelle wird dieser mir nicht angezeigt:

Spoiler anzeigen

[autoit]

#NoTrayIcon
#include <GUIConstantsEx.au3>

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

$ini = @ScriptDir & "\" & "config.ini"

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

GUICreate('Settings', 230, 130)
GUICtrlCreateTab(10, 10, 200, 100)
GUICtrlCreateTabItem("English")
$Checkbox1 = GUICtrlCreateCheckbox("AutoUpdate", 20, 40)
$Checkbox2 = GUICtrlCreateCheckbox("AutoLogin", 20, 60)
$Checkbox3 = GUICtrlCreateCheckbox("Newsletter", 20, 80)

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

$ini_autoupdate = IniRead($ini, "Settings", "AutoUpdate", "")
If $ini_autoupdate = "yes" Then GUICtrlSetState($Checkbox1, $GUI_CHECKED)
$ini_autologin = IniRead($ini, "Settings", "AutoLogin", "")
If $ini_autologin = "yes" Then GUICtrlSetState($Checkbox2, $GUI_CHECKED)
$ini_newsletter = IniRead($ini, "Settings", "Newsletter", "")
If $ini_newsletter = "yes" Then GUICtrlSetState($Checkbox3, $GUI_CHECKED)

GUISetState(@SW_SHOW)
While 1
$this = GUIGetMsg()
Switch $this
Case $GUI_EVENT_CLOSE
Exit
Case $Checkbox1
$Read = GUICtrlRead($Checkbox1)
If $Read = 1 Then
IniWrite($ini, "Settings", "AutoUpdate", "yes")
ElseIf $Read = 4 Then
IniWrite($ini, "Settings", "AutoUpdate", "no")
EndIf
Case $Checkbox2
$Read = GUICtrlRead($Checkbox2)
If $Read = 1 Then
IniWrite($ini, "Settings", "AutoLogin", "yes")
ElseIf $Read = 4 Then
IniWrite($ini, "Settings", "AutoLogin", "no")
EndIf
Case $Checkbox3
$Read = GUICtrlRead($Checkbox3)
If $Read = 1 Then
IniWrite($ini, "Settings", "Newsletter", "yes")
InputBox("E-Mail:", "Enter E-Mail Adress here")
ElseIf $Read = 4 Then
IniWrite($ini, "Settings", "Newsletter", "no")
EndIf
EndSwitch
WEnd

[/autoit]

vism

Thx euch beiden, beides funzt wunderbar =)>

vism

Hi also ich komm direkt zur Sache.

Wie krieg ich die .ini ausgelesen so das beim Start die Checkbox markiert ist?

Spoiler anzeigen

[autoit]

#NoTrayIcon
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

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

GuiCreate('Settings', 230, 130)
GUICtrlCreateTab(10, 10, 200, 100)
GUICtrlCreateTabItem("English")

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

$Checkbox1 = GuiCtrlCreateCheckBox("AutoUpdate",20,40)
$Checkbox2 = GuiCtrlCreateCheckBox("AutoLogin",20,60)
$Checkbox3 = GuiCtrlCreateCheckBox("Newsletter",20,80)
GUISetState(@SW_SHOW)
While 1
$this = GUIGetMsg()
Switch $this
Case $GUI_EVENT_CLOSE
Exit
Case $Checkbox1
$Read = GUICtrlRead ($Checkbox1)
If $Read = "1" Then
iniwrite("config.ini","Settings","AutoUpdate","yes")
ElseIf $Read = "4" Then
iniwrite("config.ini","Settings","AutoUpdate","no")
EndIf
Case $Checkbox2
$Read = GUICtrlRead ($Checkbox2)
If $Read = "1" Then
iniwrite("config.ini","Settings","AutoLogin","yes")
ElseIf $Read = "4" Then
iniwrite("config.ini","Settings","AutoLogin","no")
EndIf
Case $Checkbox3
$Read = GUICtrlRead ($Checkbox3)
If $Read = "1" Then
iniwrite("config.ini","Settings","Newsletter","yes")
inputbox("E-Mail:","Enter E-Mail Adress here")
ElseIf $Read = "4" Then
iniwrite("config.ini","Settings","Newsletter","no")
EndIf
EndSwitch
WEnd

[/autoit]

vism

Viele Dank.

Das Problem ist nicht das ich den Kopf voll hätte mit sowas wie "Bot-Coding" o.ä. manchmal gibts halt Verständigungsprobleme. Sry >_>

vism

Also heißt das jetz ich hab keine Chance Menu und die Action-Momente zu nutzen? Oder muss ich da irgendwas so umschreiben, das es funktioniert. Wie in der Schleife abfragen? Da bräucht ich mal kurz Nachhilfe.

vism

Najoa also wenigstens schmierts jetzt nichtmehr ab, allerdings lässt sich kein Prozess über das Menu starten, selbst die Messagebox net. *~mhhh

Edit: Also, wenn ich

[autoit]

Opt('GUIOnEventMode', 1)

[/autoit]

von 1, auf 0 setz. Geht das Menu. Allerdings funzen dann die Action-Momente nicht. (Icon-switch usw.)

vism

Hi, also ich hab ein Problem wenn ich zB "While 1" benutze, was ich aber muss, da ich ein Menu erstellen muss/will.

Ich denke das hängt mit den Arrays zusammen aber ich zeig euch einfach mal das Script.

Was passiert ist entweder, das TrayIcon wird gestartet, aber das Fenster nicht ODER er macht 300+ Prozesse von zB Settings.exe (Die in der While Schleife ist.)

Spoiler anzeigen

[autoit]

#include <GuiConstantsEx.au3>

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

Opt('GUIOnEventMode', 1); Den OnEvent-Mode benutzen

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

Global $iCount = 4 ; Anzahl der Buttons
Global $ahButton[$iCount], $abOnOff[$iCount], $aPID[$iCount], $aProg[$iCount], $aProgName[$iCount], $ahIcon[$iCount]

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

$aProg[0] = 'farm\job.exe'
$aProg[1] = 'beta\Alert_HP.exe'
$aProg[2] = 'beta\Alert_MP.exe'
$aProg[3] = 'beta\Alert_SP.exe'

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

$aProgName[0] = '[*~JobLevel~*]'
$aProgName[1] = '[~*Alarm.HP*~]'
$aProgName[2] = '[~*Alarm.MP*~]'
$aProgName[3] = '[~*Alarm.SP*~]'

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

Global $aPos[$iCount][4] = [ _
[002, 040, 080, 020], _
[490, 220, 080, 025], _
[490, 250, 080, 025], _
[490, 280, 080, 025] _
]
Global $aIconPath[2] = [@ScriptDir & '\mats\off.ico', @ScriptDir & '\mats\on.ico']

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

GUICreate('PC_Crapper', 640, 422)
GUISetOnEvent($GUI_EVENT_CLOSE, '_End')

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

GUICtrlCreateLabel("*~Crappy~*", 260, 10)
GUICtrlCreateLabel("<=200 Targets p.sec.", 115, 45)
GUICtrlCreateLabel("(Close / return ", 215, 255)
GUICtrlCreateLabel("(Close / return", 215, 290)
GUICtrlCreateLabel("<BETA", 600, 223.5)
GUICtrlCreateLabel("<BETA", 600, 253.5)
GUICtrlCreateLabel("<BETA", 600, 283.5)

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

For $i = 0 To $iCount - 1
$ahButton[$i] = GUICtrlCreateButton($aProgName[$i], $aPos[$i][0], $aPos[$i][1], 80, 20)
GUICtrlSetOnEvent(-1, '_Switch')
$abOnOff[$i] = False
$ahIcon[$i] = GUICtrlCreateIcon($aIconPath[0], -1, $aPos[$i][0] + 85, $aPos[$i][1] - 2, 24, 24)
Next
GUICtrlCreateButton('[~*new choise*~]', 505, 10, 120, 20)
GUICtrlSetOnEvent(-1, '_StopAll2')
GUICtrlCreateButton('[~*restart*~]', 505, 30, 120, 20)
GUICtrlSetOnEvent(-1, '_restart')
GUICtrlCreateButton('[~*Standart*~]', 20, 10, 120, 20)
GUICtrlSetOnEvent(-1, '_Main')
GUICtrlCreateButton('[~*Exit VisiBot*~]', 240, 270, 120, 20)
GUICtrlSetOnEvent(-1, '_StopAll')
;***************HIERUM GEHT ES*******************
$MainMenu = GUICtrlCreateMenu("Main")
$MainMenuSettings = GUICtrlCreateMenuItem("Options", $MainMenu)
$MainMenuUpdate = GUICtrlCreateMenuItem("Update", $MainMenu)
GUICtrlCreateMenuItem("", $MainMenu)
$MainMenuQuit = GuiCtrlCreateMenuItem("Quit", $MainMenu)
$helpmenu = GuiCtrlCreateMenu ("?")
$aboutitem = GuiCtrlCreateMenuitem ("About",$helpmenu)

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

While 1
select
Case $MainMenuSettings
run("settings.exe")
Case $MainMenuUpdate
run("updater.exe")
Case $MainMenuQuit
ExitLoop
Exit
Case $aboutitem
msgbox (0,"About","?")
EndSelect
WEnd
;***************************************************************************
GUISetState()

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

While True
Sleep(20)
WEnd

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

Func _Main()
_StopAll2()
run("overlay_int.exe")
exit
EndFunc

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

Func _restart()
_StopAll2()
run("farm_int.exe")
Exit
EndFunc

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

Func _StartAll()
For $i = 0 To $iCount - 1
If Not $aPID[$i] Then $aPID[$i] = Run($aProg[$i])
$abOnOff[$i] = True
GUICtrlSetImage($ahIcon[$i], $aIconPath[1])
soundplay("sound\ac.wav")
Next
EndFunc

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

Func _StopAll()
For $i = 0 To $iCount - 1
If $aPID[$i] Then
ProcessClose($aPID[$i])
$aPID[$i] = 0
EndIf
If $abOnOff[$i] Then
$abOnOff[$i] = False
GUICtrlSetImage($ahIcon[$i], $aIconPath[0])
soundplay("sound\de_ac.wav")
EndIf
Next
exit
EndFunc

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

Func _StopAll2()
For $i = 0 To $iCount - 1
If $aPID[$i] Then
ProcessClose($aPID[$i])
$aPID[$i] = 0
EndIf
If $abOnOff[$i] Then
$abOnOff[$i] = False
GUICtrlSetImage($ahIcon[$i], $aIconPath[0])
soundplay("sound\de_ac.wav")
EndIf
Next
EndFunc

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

Func _Switch()
Local $i = (@GUI_CtrlId - $ahButton[0]) / 2
$abOnOff[$i] = Not $abOnOff[$i]
Switch $abOnOff[$i]
Case True
GUICtrlSetImage($ahIcon[$i], $aIconPath[1])
$aPID[$i] = Run($aProg[$i])
soundplay("sound\ac.wav")
Case False
GUICtrlSetImage($ahIcon[$i], $aIconPath[0])
ProcessClose($aPID[$i])
$aPID[$i] = 0
soundplay("sound\de_ac.wav")
EndSwitch
EndFunc

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

Func _End()
Exit
EndFunc

[/autoit]

vism

Zitat von L3viathan2142

Zu 2.)
[autoit]

Hotkeyset("+{TAB}","_ingamegui")
while true
sleep(100)
wend
func _ingamegui()
If WinGetHandle("[ACTIVE]") = WinGetHandle("Titel des Spiels in Taskleiste") Then
;Hauptteil
Endif
endfunc
[/autoit]

Nicht in der Taskleiste?: Weiß ich nicht auswendig, aber: GUICreate()-Hilfe: Styles angucken...

Alles anzeigen

Mhhh....Also wenn ich das mach dann öffnet sich zwar das GUI net sofort, aber mit welchen Tasten rufe ich es ingame auf?

Zitat

[autoit]
$WS_EX_TOOLWINDOW
[/autoit]

Da weis ich jetz net wo ichs einfügen soll. =/
Beim

[autoit]

GuiCreate=()

[/autoit]

? Oder wo muss ich damit hin?

vism

Zitat von r1fLeX

Ja , das ist möglich , weiß aber grad nicht mehr wie :P.

xD Ja, das is doch schonmal was.

vism

Hi gibt es eine Möglichkeit, das man das GUI Fenster nicht in der Task-Leiste sieht?

Ich würde gerne per Tastenkombination das Fenster aufrufen lassen wenn man sich im Spiel befindet.
Wenn man zB. im Spiel ist und dann Shift+TAB drückt, soll sich das GUI Fenster öffnen, außerhalb des Spiels nicht. Ich meine dies schonmal gesehen zu haben, kann mich aber nicht erinnern wo.

Danke schonmal im Vorraus.

vism

Danke, das wars schon.

vism

Hi,

Ich brauche letztendlich noch 3 Checkboxen die in eine .ini schreiben sollen.

Checkbox markiert = 1 / unmarkiert = 0
Standart halt so:
iniwrite("config.ini", "main", "cbrH", "0")
iniwrite("config.ini", "main", "cbrU", "0")
iniwrite("config.ini", "main", "cbruL", "0")

Beim nächsten Start soll die .ini ausgelsen werden und die Boxen die in der .ini den Wert 1 haben, sollen bereits markiert sein.

Einstellungen Speichern? - Like

vism

=) Super,

Das wärs dann, vielen Dank nochmal. Jetz muss ich mir nurnoch ansehen wie das mit den CheckBoxen funkt, aba dazu mach ich dann nen neuen_Theard auf.

An dieser Stelle nochmals, >>DANKE<<!:D

*MFG*~VisM*>

vism

Sehr geile Sache. Ich bedanke mich =)>

Ein letztes gäbs da noch gibs auch ne möglichkeit die Buttons von der größe her anzupassen ?> Einzeln<
Muss aber net sein :D> hast mir ja scho so sehr geholfen. xD Das es mich scho im Herz schmerzt weiter Fragen zu stellen. XD

vism

Vielen Dank =)

Hast mir meinen Hintern gerettet ;D

[EDIT:]
Da gäbs noch was Mal angenommen ich bräuchte ne Andere Bezeichnung als ne Zahl von 1 bis 20, wie kann ich das klären?

[EDIT2:]
Nochwas gibts auch ne möglichkeit dann mittels einem weiteren Button alle anderen auszuschalten sprich, alle auf den OFF status zu stellen?
(>Wird ja scho peinlich für mich iwi bin sons net der der gern fragt. XD<)

[EDIT3:]
Naja ich denke mit arays werd ich da net weit komme, da ich die schließlich auch irgendwie hinternander bringen muss =(
In der Sache bin ich total der noob

Da ich die tolle aufgabe hab das in einer bestimmten Reihenfolge aufzubauen, kapier ichs wieder net.
Original Zitat:
Es geht nach wie vor um Buttons >_>
1 Reihe = 2
2+3Reihe = 5
4 Reihe = 3
5 Reihe = 2
6 Reihe = 1
Zitat_Ende:>
Schule SuxXT!

Wären arrays da eigendlich sinnvoll? Oder wäre standartmäßiges zuweisen da die bessere Lösung?^^ Hab da echt kA

Beiträge von vism

Übergeordnetes Verzeichnis...

GUICtrlCreateTabItem Problem...

GUICtrlCreateTabItem Problem...

GUICtrlCreateTabItem Problem...

GUICtrlCreateTabItem Problem...

GUICtrlCreateTabItem Problem...

Checkbox soll markiert werden durch iniread...

Checkbox soll markiert werden durch iniread...

(Wahrscheinlich) While Problem

(Wahrscheinlich) While Problem

(Wahrscheinlich) While Problem

(Wahrscheinlich) While Problem

Frage zum GUI Fenster...

Frage zum GUI Fenster...

Frage zum GUI Fenster...

Checkbox soll in .ini schreiben und beim nächsten Start ausgelesen werden...

Checkbox soll in .ini schreiben und beim nächsten Start ausgelesen werden...

Pic wechseln und Prozess über einen Button starten/beenden

Pic wechseln und Prozess über einen Button starten/beenden

Pic wechseln und Prozess über einen Button starten/beenden