Beiträge von Cartan12

Schau dir mal

[autoit]

FileRead
FileWrite
FileReadLine
FileWriteLine
_FileListToArray ;schaut, welche dateien im ordner sind, und dann mit for schleife alle ändern
_FileReadToArray
_FileWriteFromArray

[/autoit]

an

Ich machs immer so, dass wenn man auf den Ausknopf(am Computer) drückt, der PC automatisch in den Ruhezustand geht, anstatt runterzufahren... Kann man, glaub ich, in den Energieoptionen ändern.

Verdammt, hast recht... da bleibt mir nur noch die möglichkeit, das meins besser werden muss, als die, die es gibt.(Auf jeden fall ist meine jetztige Lösung eleganter/kürzer als die meißten anderen...) Werde noch eine Klavieratur erstellen mit Schwarzen Tasten und eben die Möglichkeit, die Stücke aufzuzeichnen und als .exe auszugeben.

[autoit]

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <misc.au3>

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

$Form1 = GUICreate("Form1", 244, 145, 319, 230,-1,$WS_EX_ACCEPTFILES );,0x00000018)
$Input2 = GUICtrlCreateInput("Input2", 24, 64, 121, 21)
GUICtrlSetState(-1, $GUI_DROPACCEPTED)
$Input1 = GUICtrlCreateInput("Input1", 24, 32, 121, 21)
GUICtrlSetState(-1, $GUI_DROPACCEPTED)
$Label1 = GUICtrlCreateLabel("Dateien bitte per drag and drop reinziehen", 24, 8, 202, 17)
$Label2 = GUICtrlCreateLabel("Datei 1", 160, 32, 38, 17)
$Label3 = GUICtrlCreateLabel("Datei 2", 160, 64, 38, 17)
$Button1 = GUICtrlCreateButton("Vergleichen", 56, 96, 75, 25, $WS_GROUP)
GUISetState(@SW_SHOW)

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

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
$input_data1 = GUICtrlRead($Input2)
$input_data2 = GUICtrlRead($Input1)
$version = _VersionCompare($input_data1,$input_data2)
If $version = -1 Then
$msg = MsgBox(4,"Version","Die 2. Version ist aktueller. Möchten sie jetzt die neue Version installieren?")
If $msg = 6 Then Run($input_data2)
ElseIf $version = 1 Then
$msg = MsgBox(4,"Version","Die 1. Version ist aktueller. Möchten sie jetzt die neue Version installieren?")
If $msg = 6 Then Run($input_data1)
EndIf
EndSwitch
WEnd

[/autoit]

Zitat

Funktion WinSetTitle
...
Rückgabewert
Erfolg: Gibt 1 zurück.
Fehler: Gibt 0 zurück falls das Fenster nicht gefunden wird.

Also z.B.

[autoit]

$err = WinSetTitle("Neuer Ordner","","Ordner 1")
If $err = 0 Then MsgBox(0,"!","Fehler beim umbenennen!")

[/autoit]

Doch, die gibt es, z.B. meine _beepton UDF , die ich gestern gepostet habe... Auf so eine verrückte Idee ist bis jetzt keiner gekommen

Verdammt Ersetz mal die Next durch WEnd... Mein Fehler (man ist das peinlich)

EDIT: So habs geändert...

Ok, hier die Erklärung:

[autoit]

While 1
...
WEnd

[/autoit]

Einfach eine Normale Endlosschleife, da 1 immer Wahr ist

[autoit]

While ProcessExists("Starter.exe")
Sleep(100)
WEnd

[/autoit]

Prüft, ob der Prozess existiert. Du kannst das Sleep auch verändern wenn du möchtest.

[autoit]

Sleep(1000*60*2)
Run( "C:\Programme\artec technologies AG\MULTIEYE-HYBRID\Starter.exe")

[/autoit]

Wenn der Prozess nicht mehr existiert wartet das Script 2 minuten und startet dann neu.

[autoit]

Do
Sleep(100)
Until ProcessExists("Starter.exe")

[/autoit]

Wartet bis der Prozess existiert, da der ja ein bisschen zeit braucht zum neustarten. Auch hier kannst du den Sleep-Wert ändern.

Ich hoffe, das hat dir geholfen

Mfg Cartan12

Meinst du sowas wie

[autoit]

WinSetTitle

[/autoit]

?

 200 Post

[autoit]

While 1
While ProcessExists("Starter.exe")
Sleep(100)
WEnd
Sleep(1000*60*2)
Run( "C:\Programme\artec technologies AG\MULTIEYE-HYBRID\Starter.exe")
Do
Sleep(100)
Until ProcessExists("Starter.exe")
WEnd

[/autoit]

UPDATE siehe POST#1

Hab eure Tipps berücksichtigt, danke Leute

[autoit]

$Titel = "Test"
$Text = 0
$Get = ControlGetText($Titel,$Text,24)

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

#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 633, 448, 192, 124)
$Label1 = GUICtrlCreateLabel("Lvl: " & $Get, 50, 20, 50, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

While 1
$Titel = "Test"
$Text = 0
$Get = ControlGetText($Titel,$Text,24)
GUICtrlSetData($Label1,"Lv1: " & $Get)
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

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

EndSwitch
WEnd

[/autoit]

Genau. Wenn du z.B. was neues in der nächsten Zeile hinzufügen möchtest, kannst du das so machen:

[autoit]

#include <EditConstants.au3>
#include <GUIConstants.au3>

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

GUICreate("MeineGUI",718,308)
GUISetState(@sw_show)

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

$input=GUICtrlCreateInput("",17,280,486,18,-1,-1)
$ok=GUICtrlCreateButton("OK",506,275,95,24,-1,-1)
$bla=GUICtrlCreateButton("Bla",610,276,100,23,-1,-1)
$output=GUICtrlCreateInput("",17,29,692,241,$ES_MULTILINE)
While 1
$msg=GUIGetMsg()
If $msg=$GUI_EVENT_CLOSE Then ExitLoop
Select
case $msg = $ok
If GUICtrlRead($output) = "" Then
GUICtrlSetData($output,GUICtrlRead($input))
Else
GUICtrlSetData($output,GUICtrlRead($output) & @CRLF & GUICtrlRead($input))
EndIf
EndSelect
WEnd

[/autoit]

Es ist jedoch geschickter das mit einem Edit Feld zu machen.

Der gibt dir die Contol ID aus. Du kannst das so lösen:

[autoit]

#include <GUIConstants.au3>

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

GUICreate("MeineGUI",718,308)
GUISetState(@sw_show)

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

$input=GUICtrlCreateInput("",17,280,486,18,-1,-1)
$ok=GUICtrlCreateButton("OK",506,275,95,24,-1,-1)
$bla=GUICtrlCreateButton("Bla",610,276,100,23,-1,-1)
$output=GUICtrlCreateInput("",17,29,692,241,-1,-1)
While 1
$msg=GUIGetMsg()
If $msg=$GUI_EVENT_CLOSE Then ExitLoop
Select
case $msg = $ok
$output = GUICtrlCreateInput(GUICtrlRead($input),17,29,692,241,-1,-1)
EndSelect
WEnd

[/autoit]

Außerdem würde ich

[autoit]

GUICTRLSetData

[/autoit]

anstatt dem 2. mal GUICTRLCreateInput nehmen

Ich glaube nicht, denn er möchte ja bestimmt danach noch weitermachen. Außerdem hat er ja schon eine Lösung, und möchte nur wissen, warum GUISwitch nicht funzt...

Wahrscheinlich soll es die Fehler in irgend einer Form automatisch berichtigen. Dann dauert das sogar noch länger zum entwickeln.

Update post#1

Mach doch einfach so was:

[autoit]

While 1
Send("{ENTER}")
WEnd

[/autoit]

Oder besser noch mit

[autoit]

ControlSend

[/autoit]

Edit: Hätte mir mal durchlesen sollen, was du schreibst. Du kannst mehrere Tasten senden, indem du z.B.

[autoit]

Send("^!r");sendet Strg + Alt + r
Send("troll");sendet den String "troll"

[/autoit]

benutzt

Nein, die Funktion hieß früher AdlibEnable und jetzt AdLibRegister

Tut mir leid, aber das entspricht nicht unseren Forenregeln http://www.autoit.de/index.php?page=Forumrules