Ich hoffe auch, das Französisch nicht sehr wichtig ist, da ich in Französisch wirklich nicht gut bin.
Ach, ich verkneif mir meinen schmutzigen Kommentar dazu einfach mal 
Das einzige wozu französisch wirklich zu gebrauchen ist, ist Fluchen. Man zieht übelst vom Leder und es hört sich trotzdem an als würde man seinem Gegenüber den Arsch pudern.
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
$Form1 = GUICreate("Form1", 272, 47, 254, 124)
$Input1 = GUICtrlCreateInput("", 8, 8, 121, 21)
$Input2 = GUICtrlCreateInput("", 136, 8, 121, 21)
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg#include <EditConstants.au3>
Case $GUI_EVENT_CLOSE
Exit
Case $Input1
GUICtrlSetData($Input2, GUICtrlRead($Input1) * 2)
EndSwitch
WEnd
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Opt("GUIOnEventMode", 1)
$Form1 = GUICreate("Form1", 272, 44, 254, 124)
$Input1 = GUICtrlCreateInput("Input1", 8, 8, 121, 21)
GUICtrlSetOnEvent(-1, "_fuellen")
$Input2 = GUICtrlCreateInput("Input2", 136, 8, 121, 21)
GUISetState(@SW_SHOW)
While 1
Sleep(100)
WEnd
Func _fuellen()
GUICtrlSetData($Input2, GUICtrlRead($Input1) * 2)
EndFunc ;==>_fuellen
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
$Form1 = GUICreate("Form1", 268, 41, 254, 124)
$Input1 = GUICtrlCreateInput("", 8, 8, 121, 21)
$Input2 = GUICtrlCreateInput("", 136, 8, 121, 21)
GUISetState(@SW_SHOW)
AdlibRegister("_fuellen")
[/autoit] [autoit][/autoit] [autoit]While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
AdlibUnRegister("_fuellen")
Exit
EndSwitch
WEnd
Func _fuellen()
GUICtrlSetData($input2, GUICtrlRead($input1)*10)
Sleep(100)
EndFunc
Sowas in die Richtung? Die Eingaben müssten natürlih noch geprüft werden.
@ideas2code
wie machst du diese geilen bilder?!
Ist doch keine grosse Sache. Adobe Illustrator.
Ich weiss nicht ob ich wirklich kapiert habe was du machen willst aber ich versuchs trotzdem mal.
Da dein Source mit { beginnt geh ich hier mal davon aus das er auch auf } endet. Ansonsten müsste man evtl. was an den Trims ändern.
#include <string.au3>
#include <array.au3>
$source = '{"1":{"teil_nr":"1","inhalt":"17","gepflanzt":"1272309247","zeit":"1272310102","wasser":"1272309247","buildingid":"v","x":1,"y":1,"iswater":true,"phase":3},"2":{"teil_nr":"2","inhalt":"17","iswater":true,"gepflanzt":"1272309247","zeit":"1272310102","wasser":"1272309247","buildingid":"v","x":1,"y":1,"iswater":true,"phase":7},"3":{"teil_nr":"3","inhalt":"17","gepflanzt":"1272309247","zeit":"1272310102","wasser":"1272309247","buildingid":"v","x":1,"y":1,"iswater":true,"phase":1},"4":{"teil_nr":"4","inhalt":"17","gepflanzt":"1272309247","zeit":"1272310102","wasser":"1272309247","buildingid":"v","x":1,"y":1,"iswater":true,"phase":1},"5":{"teil_nr":"5","inhalt":"17","gepflanzt":"1272309248","zeit":"1272310103","wasser":"1272309248","buildingid":"v","x":1,"y":1,"iswater":true,"phase":1}'
$array = StringSplit(StringTrimRight(StringTrimLeft($source, 2), 1), '},"', 1) ;abschneiden der überschüssigen zeichen
_ArrayDisplay($array) ; Zwischenergebnis
Local $tresult1[1] ;Array zum Zwischenspeichern der Teilenummer
Local $tresult2[1] ;Array zum Zwischenspeichern der Phasen
For $i = 1 To $array[0]
$f1 = StringLeft($array[$i], 1)
$f2 = StringRight($array[$i], 1)
MsgBox(64, "", "Teil-Nr:" & $f1 & " | " & "Phase:" & $f2)
_ArrayAdd($tresult1, $f1)
_ArrayAdd($tresult2, $f2)
$tresult1[0] += 1
$tresult2[0] += 1
Next
_ArrayDisplay($tresult1)
_ArrayDisplay($tresult2)
;Arrays zusammenfügen
If UBound($tresult2) > UBound($tresult1) Then
Local $results[UBound($tresult2)][2]
Local $size = UBound($tresult2) - 1
Else
Local $results[UBound($tresult1)][2]
Local $size = UBound($tresult1) - 1
EndIf
For $i = 0 To $size
If UBound($tresult1) > $i Then $results[$i][0] = $tresult1[$i]
If UBound($tresult2) > $i Then $results[$i][1] = $tresult2[$i]
Next
_ArrayDisplay($results)
[/autoit]Am Ende solltest du ein 2d Array mit Teilenummer und dazugehöriger Phase haben. Im 0 Element steht die Länge des Arrays. Hoffe ich hab da jetzt keinen Fehler reingehauen und das hilft dir in irgendeiner Form weiter.
Wenn SEuBo mit seiner RegEx Keule hier mal reinschaut geht das auch noch um einiges effektiver. Dazu fehlt mir im Moment aber der Nerv.
Entschuldige, ich hatte nur das "Programmiersprachen" in deiner Eingangsfrage gelesen. Das in der Umfragebox hat mein Kleinhirn dann gekonnt ignoriert. :wacko:
Nur 5 Optionen? Ich brauch 7.
Zum Thema "Was ist eine Programmiersprache und was nicht." schweige ich jetzt mal
ShellExecute("ftp://" & GUICtrlRead($input1) & ":" & GUICtrlRead($input2) & "@" & GUICtrlRead($input3))
[/autoit]edit: zu langsam und GUICtrlRead() vergessen.
edit2: Und weil Schnitzel recht hat, noch schnell das ftp:// eingefügt 
HotKeySet() - mehr sag ich dazu nicht. Der wievielte Thread ist das jetzt? Nummer 4 oder 5?
"Geht nicht" ist keine vernünftige Problembeschreibung.
Hier wurde mehrmals beschrieben was zu tun ist. Links zur Hilfe wurden gepostet.
Zeig doch bitte endlich mal dein Skript und das rätselraten hat ein Ende. Herje, hier hat doch niemand eine Glaskugel.
edit: Ich bin hier durchaus noch beim Thema.
Ich versteh das zwar nicht ganz aber $location wird niemals < 0 sein, höchstens = 0.
Ich würde mit ControlGetPos () die Position und die Grösse des Buttons ermitteln, damit dann den Klickbereich errechnen. Mit _isPressed() auf den Mausklick warten, mit MouseGetPos() die Position ermitteln und mit dem Klickbereich des Buttons vergleichen.
edit: rein präventiv - Die Forenregeln sind dir hoffentlich bekannt.
Die Registry hab ich erfolglos durchsucht. War auch irgendwie klar das dort nichts zu finden sein wird.
Sollte WMI die Infos liefern, bin ich scheinbar zu blöd sie zu finden. Das macht mir Kopfschmerzen. :wacko:
Ich befürchte das wirst du FielMove() direkt nicht beibringen können. Ich geh mal davon aus das die Dateien alle die selbe Endung haben und du sie per *.blub an FileMove() übergibst.
Ich würde das Problem umgehen indem ich zuerst die Dateinamen ermittle und in ein Array schreibe. Danach dann in einer FOR-Schleife für jedes Arrayelement FileMove() ausführen. Mit einer kleinen Abfrage der Rückgabe von FileMove() sollte das Überspringen dann kein Problem mehr sein. Fertige Funktionen zur Dateisuche findest du über die SuFu im Dutzend.
Mit IniReadSection() .!?
Nein!
Zeig mal dein Skript.
[autoit]#include <brain.au3>
[/autoit][autoit][/autoit][autoit]Global $Musik
[/autoit][autoit][/autoit][autoit];Deine GUI
[/autoit][autoit][/autoit][autoit]While 1
.
.
.
Case $irgendwas
$musik = FileOpenDialog( ... )
EndSwitch
WEnd
Global $musik
[/autoit]
oder
Local $Musik
[/autoit]
oder
$Musik = ""
[/autoit]
....
http://www.autoit.de/tutorial/#variablen_deklarieren
http://www.autoit.de/dokumentation_aktuell/keywords/Dim.htm
Hallo,
ich habe vor ein kleines Tool für den Umgang mit VHDs zu basteln. (erstellen, löschen, einbunden, entfernen, automount etc.). Im Prinzip keine grosse Sache.
Bekannte VHDs sollen in einer Liste gesammelt, eingebundene VHDs farblich hervorgehoben und mit dem aktuellen LW Buchstaben versehen werden.
Mein Problem:
Wird eine VHD ausserhalb des Tools oder durch einen automount beim Systemstart eingebunden, muss das Tool diese Laufwerke beim Start als VHDs erkennen. Das wird über den Abgleich der Modellnamen geschehen. Allerdings fehlt mir im Moment ein Ansatz, wie ich den Pfad der .vhd zu den eingebundenen Laufwerken finden kann, um diese dann im Tool als mounted zu markieren. Die Dateien können ja leider überall auf dem Dateisystem liegen.
Evtl. lassen sich diese Infos irgendwo aus der Registry ziehen?
Bin für jeden hilfreichen Tipp dankbar.
edit: erster Ansatz über DISKPART - list vdisk
Etwas umständlich. Wenn also jemand einen praktikableren Weg findet, immer her damit.
edit2: zu unflexibel. Das stört mich zusehr im Programmablauf.
