hast du die ganze rar runtergeladen und entpackt?
da werden blos irgendwelche pfade zu den bilddateien nich passen...
hast du die ganze rar runtergeladen und entpackt?
da werden blos irgendwelche pfade zu den bilddateien nich passen...
hab im englischen forum nen thread gefunden wo sie anscheinend dabei sind ne udf zu erstellen.
oder vllt auch schon fertig ka
musst dir selber ansehn wie gut das funktioniert
Sry hatte das & vergessen aber das ist ja geklärt
hier gibts immer die aktuelle hilfe
http://translation.autoit.de/hilfe.php
wenn das problem gelöst ist kannst du es als gelöst markieren indem du den ersten post bearbeitest, das präfix auf gelöst setzt und sendest (bzw speicherst)
Herzlich willkommen im forum
was du suchst sind die Autoit Makros.
stehen alle in der hilfe.
spezell das problem:
[autoit]ShellExecute(@Desktopdir & "\MeinProgramm.exe")
[/autoit]wow respekt.
funktionieren tuts schonmal gut
und minesweeper mochte ich schon immer
wieviel vom dem script ist denn per copy&paste immer wieder eingefügt?^^
reines tippen würd ja bestimmt bisschen dauern
1. ja zum beispiel mit ner bildänderung oder mit ner 2ten gui im vordergrund, oder mit ner avi oder....
da sind dir keine grenzen gesetzt
2. geht genauso. man kann recht viel machen. guictrlcreateavi oder über objekte flash dateien oder ähnliches einfügen oder bilder über bewegungen animieren oder mit gdi+ was hübsches
je nachdem was du kannst und was dir am liebsten is
liefer doch nen ansatz dann helf ich dir bei deinen problemen.
im prinzip brauchste ja nur n paar werte eingeben lassen und die dann in ne excel tabelle eintragen lassen.
und evtl ein paar noch miteinander verrechnen.
achja und jetz bin ich dann gleich off also eher heute früh wo ich helfen werd, wenn bis dahin nich schon geholfen wurde
also so ne excel tab wäre auf max 5 min erstellt. nur leider hab ich hier kein excel
autoit dauert bissl länger aber dürfte genausoleicht sein
vllt hilft
[autoit]#RequireAdmin
[/autoit]am anfang des scriptes.
ansonsten wäre dein quellcode ganz intressant. am besten mit den includes die du verwendest (zumindest die die nicht standard sind so wie die FF.au3)
das war wiedermal ne schwere geburt
hauptsache es funktioniert jetz.
bis zum nächsten update "deines" scriptes
das würde ja ohne autoit sehr viel schneller gehn.
für was gibts die guten alten excel formeln^^
weil genau für sowas wurde excel ja mal geschaffen
oder brauchst dus in autoit???
nimm mal das guisetstate in zeile 39 und 63 raus
da haste irgendwas falsch gemacht^^
poste doch nochmal dein ganzes script
genau das geht doch auch. wenn man mein script nimmt und statt den msgboxen regwrite und regdelete einfügt
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Include <Constants.au3>
Opt("TrayMenuMode", 1)
#Region ### START Koda GUI section ### Form=
TraySetClick("9")
$AutostartButton = TrayCreateItem("MenuItem1")
#EndRegion ### END Koda GUI section ###
While 1
$tmsg = TrayGetMsg()
Switch $tmsg
Case $AutostartButton
If BitAnd(TrayItemGetState($AutostartButton),$TRAY_CHECKED) Then
RegWrite("HKEY_CURRENT_USER\Software\Test", "Test Schlüssel", "REG_SZ", "Hallo dies ist ein Test")
Else
RegDelete ("HKEY_CURRENT_USER\Software\Test", "Test Schlüssel")
EndIf
EndSwitch
WEnd
#cs ----------------------------------------------------------------------------
[/autoit] [autoit][/autoit] [autoit]AutoIt Version: 3.3.4.0
Author: myName
Script Function:
Template AutoIt script.
#ce ----------------------------------------------------------------------------
[/autoit] [autoit][/autoit] [autoit]; Script Start - Add your code below here
[/autoit] [autoit][/autoit] [autoit]#include <GUIConstantsEx.au3>
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUICtrlSetOnHover_UDF.au3>
Global $std_Hover_Image = @ScriptDir & "\rgt.bmp"
Global $sBack_Hover_Image = @ScriptDir & "\rg.bmp"
Global $std_Hover_Image2 = @ScriptDir & "\art.bmp"
Global $sBack_Hover_Image2 = @ScriptDir & "\ar.bmp"
Global $std_Hover_Image3 = @ScriptDir & "\ret.bmp"
Global $sBack_Hover_Image3 = @ScriptDir & "\re.bmp"
Global $std_Hover_Image4 = @ScriptDir & "\cat.bmp"
Global $sBack_Hover_Image4 = @ScriptDir & "\ca.bmp"
Global $std_Hover_Image5 = @ScriptDir & "\wot.bmp"
Global $sBack_Hover_Image5 = @ScriptDir & "\wo.bmp"
Global $std_Hover_Image6 = @ScriptDir & "\bet.bmp"
Global $sBack_Hover_Image6 = @ScriptDir & "\be.bmp"
Global $std_Hover_Image7 = @ScriptDir & "\set.bmp"
Global $sBack_Hover_Image7 = @ScriptDir & "\set.bmp"
GUICreate("Test", 600, 400)
$Flash = ObjCreate("ShockwaveFlash.ShockwaveFlash")
$FlashObj = GUICtrlCreateObj($Flash, 350, 0, 250, 490)
$Flash.Movie = "C:\loader.swf?mainfile=C:\main.swf"
$Flash.loop = true
GUISetState(@SW_SHOW)
$pic = GUICtrlCreatePic("C:\image1.bmp",0,-27,350,530,0)
GUICtrlSetSTate($pic,$GUI_DISABLE)
$button = GUICtrlCreateButton("test", 30, 160, 140, 30, $BS_BITMAP)
GUICtrlSetImage(-1, $std_Hover_Image)
_GUICtrl_SetOnHover(-1, "_Hover_Image_Proc", "_Hover_Image_Proc")
$button2 = GUICtrlCreateButton("test2", 30, 200, 140, 30, $BS_BITMAP)
GUICtrlSetImage(-1, $std_Hover_Image2)
_GUICtrl_SetOnHover(-1, "_Hover_Image_Proc", "_Hover_Image_Proc")
$button3 = GUICtrlCreateButton("test3", 30, 240, 140, 30, $BS_BITMAP)
GUICtrlSetImage(-1, $std_Hover_Image3)
_GUICtrl_SetOnHover(-1, "_Hover_Image_Proc", "_Hover_Image_Proc")
$button4= GUICtrlCreateButton("test4", 30, 280, 140, 30, $BS_BITMAP)
GUICtrlSetImage(-1, $std_Hover_Image4)
_GUICtrl_SetOnHover(-1, "_Hover_Image_Proc", "_Hover_Image_Proc")
$button5= GUICtrlCreateButton("test5", 30, 320, 140, 30, $BS_BITMAP)
GUICtrlSetImage(-1, $std_Hover_Image5)
_GUICtrl_SetOnHover(-1, "_Hover_Image_Proc", "_Hover_Image_Proc")
$button6= GUICtrlCreateButton("test6", 30, 360, 140, 30, $BS_BITMAP)
GUICtrlSetImage(-1, $std_Hover_Image6)
_GUICtrl_SetOnHover(-1, "_Hover_Image_Proc", "_Hover_Image_Proc")
$button7= GUICtrlCreateButton("test7", 180, 220, 140, 30, $BS_BITMAP)
GUICtrlSetImage(-1, $std_Hover_Image7)
_GUICtrl_SetOnHover(-1, "_Hover_Image_Proc", "_Hover_Image_Proc")
If Ping("85.131.2037.229") Then ;
$Pic1 = GUICtrlCreatePic(@Scriptdir & "\up.bmp", 40, 40, 20, 20); positionen und größe anpassen
Else
$Pic1 = GUICtrlCreatePic(@Scriptdir & "\down.bmp", 40, 40, 20, 20); positionen und größe anpassen
EndIf
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
case $button
ShellExecute("http://www.rising-gods.de")
case $button2
ShellExecute("http://arsenal.rising-gods.de")
case $button3
run("notepad.exe " & "" & @scriptdir & "\Data\deDE\realmlist.wtf")
case $button4
DirRemove(@scriptdir & "\Cache\",1)
if True then
msgbox(4096,"Status","Cache erfolgreich gelöscht")
if False then
msgbox(4096,"Status","Error - Falsches Verzeichnis?")
EndIf
EndIf
case $button5
ShellExecute(@ScriptDir & "\wow.exe")
case $Button6
exit
EndSwitch
WEnd
Func _Hover_Image_Proc($iCtrlID, $iParam)
Local $picbutton1 = $sBack_Hover_Image
Local $picbutton2 = $sBack_Hover_Image2
Local $picbutton3 = $sBack_Hover_Image3
Local $picbutton4 = $sBack_Hover_Image4
Local $picbutton5 = $sBack_Hover_Image5
Local $picbutton6 = $sBack_Hover_Image6
Local $picbutton7 = $sBack_Hover_Image7
If $iParam = 2 Then
$picbutton1 = $std_Hover_Image
$picbutton2 = $std_Hover_Image2
$picbutton3 = $std_Hover_Image3
$picbutton4 = $std_Hover_Image4
$picbutton5 = $std_Hover_Image5
$picbutton6 = $std_Hover_Image6
$picbutton7 = $std_Hover_Image7
EndIf
Switch $iCtrlID
Case $button
GUICtrlSetImage($iCtrlID, $picbutton1)
Case $button2
GUICtrlSetImage($iCtrlID, $picbutton2)
Case $button3
GUICtrlSetImage($iCtrlID, $picbutton3)
Case $button4
GUICtrlSetImage($iCtrlID, $picbutton4)
Case $button5
GUICtrlSetImage($iCtrlID, $picbutton5)
Case $button6
GUICtrlSetImage($iCtrlID, $picbutton6)
Case $button7
GUICtrlSetImage($iCtrlID, $picbutton7)
Case $button8
GUICtrlSetImage($iCtrlID, $picbutton8
Case $button9
GUICtrlSetImage($iCtrlID, $picbutton9)
EndSwitch
EndFunc
du gehst aber schon so vor oder?
funktion ausführen , pc ausschalten, funktion nochmal ausführen
bzw so:
#include <Array.au3>
[/autoit] [autoit][/autoit] [autoit]Global Const $SV_TYPE_WORKSTATION = 0x1
Global Const $SV_TYPE_SERVER = 0x2
Global Const $SV_TYPE_SQLSERVER = 0x4
Global Const $SV_TYPE_DOMAIN_CTRL = 0x8
Global Const $SV_TYPE_DOMAIN_BAKCTRL = 0x10
Global Const $SV_TYPE_TIME_SOURCE = 0x20
Global Const $SV_TYPE_AFP = 0x40
Global Const $SV_TYPE_NOVELL = 0x80
Global Const $SV_TYPE_DOMAIN_MEMBER = 0x100
Global Const $SV_TYPE_PRINTQ_SERVER = 0x200
Global Const $SV_TYPE_DIALIN_SERVER = 0x400
Global Const $SV_TYPE_XENIX_SERVER = 0x800
Global Const $SV_TYPE_NT = 0x1000
Global Const $SV_TYPE_WFW = 0x2000
Global Const $SV_TYPE_SERVER_MFPN = 0x4000
Global Const $SV_TYPE_SERVER_NT = 0x8000
Global Const $SV_TYPE_POTENTIAL_BROWSER = 0x10000
Global Const $SV_TYPE_BACKUP_BROWSER = 0x20000
Global Const $SV_TYPE_MASTER_BROWSER = 0x40000
Global Const $SV_TYPE_DOMAIN_MASTER = 0x80000
Global Const $SV_TYPE_WINDOWS = 0x400000
Global Const $SV_TYPE_CLUSTER_NT = 0x1000000
Global Const $SV_TYPE_TERMINALSERVER = 0x2000000
Global Const $SV_TYPE_CLUSTER_VS_NT = 0x4000000
Global Const $SV_TYPE_LOCAL_LIST_ONLY = 0x40000000
Global Const $SV_TYPE_DOMAIN_ENUM = 0x80000000
Global Const $SV_TYPE_ALL = 0xFFFFFFFF
$aCompList = _NetServerEnum($SV_TYPE_ALL)
_ArrayDisplay($aCompList)
msgbox(0,"", "klicke auf ok sobald der pc herruntergefahren ist")
$aCompList = _NetServerEnum($SV_TYPE_ALL)
_ArrayDisplay($aCompList)
Func _NetServerEnum ($iSrvType = -1, $sDomain = '')
Local $uBufPtr = DllStructCreate("ptr;int;int"), $res[1]=[0], $i
Local $uRecord = DllStructCreate("dword;ptr"), $iRecLen = DllStructGetSize($uRecord)
Local $uString = DllStructCreate("char[16]")
Local $uDomain = DllStructCreate("byte[32]"), $pDomain = 0
If Not ($sDomain='' Or $sDomain='*') Then
DllStructSetData($uDomain, 1, StringToBinary($sDomain,2))
$pDomain = DllStructGetPtr($uDomain)
EndIf
Local $ret = DllCall ("netapi32.dll", "int", "NetServerEnum", _
"ptr", 0, "int", 100, _
"ptr", DllStructGetPtr($uBufPtr,1), "int", -1, _
"ptr", DllStructGetPtr($uBufPtr,2), _
"ptr", DllStructGetPtr($uBufPtr,3), _
"int", $iSrvType, "ptr", $pDomain, "int", 0 )
If $ret[0] Then Return SetError(1, $ret[0], '')
Local $res[DllStructGetData($uBufPtr,3)+1]=[DllStructGetData($uBufPtr,3)]
For $i=1 To DllStructGetData($uBufPtr,3)
Local $uRecord = DllStructCreate("dword;ptr", DllStructGetData($uBufPtr,1)+($i-1)*$iRecLen)
Local $sNBName = DllStructCreate("byte[32]", DllStructGetData($uRecord,2))
DllStructSetData($uString,1,BinaryToString(DllStructGetData($sNBName,1),2))
$res[$i] = DllStructGetData($uString,1)
Next
$ret = DllCall ("netapi32.dll", "int", "NetApiBufferFree", "ptr", DllStructGetData($uBufPtr,1))
Return $res
EndFunc
du führst nur das hier aus und hast 2 fenster?
#include <GUIConstantsEx.au3>
[/autoit] [autoit][/autoit] [autoit]$Form1 = GUICreate("", 200, 200)
[/autoit] [autoit][/autoit] [autoit]If Ping("85.131.2037.229") Then ;
$Pic1 = GUICtrlCreatePic(@Scriptdir & "\up.bmp", 40, 40, 20, 20)
Else
$Pic1 = GUICtrlCreatePic(@Scriptdir & "\down.bmp", 40, 40, 20, 20)
EndIf
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
dann würd ich an deiner stelle autoit neu installieren^^
jup du suchst quasi:
[autoit]FileSaveDialog()
[/autoit]ach ich idiot. versuch mal das
#include <GUIConstantsEx.au3>
[/autoit] [autoit][/autoit] [autoit]$Form1 = GUICreate("", 200, 200)
[/autoit] [autoit][/autoit] [autoit]If Ping("85.131.2037.229") Then ;
$Pic1 = GUICtrlCreatePic(@Scriptdir & "\up.bmp", 40, 40, 20, 20)
Else
$Pic1 = GUICtrlCreatePic(@Scriptdir & "\down.bmp", 40, 40, 20, 20)
EndIf
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
so sollts gehn.
[autoit]#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
$Form1 = GUICreate("", 200, 200)
GUISetState(@SW_SHOW)
If Ping("85.131.2037.229") Then
$Pic1 = GUICtrlCreatePic(@Scriptdir & "\up.bmp", 40, 40, 20, 20)
Else
$Pic1 = GUICtrlCreatePic(@Scriptdir & "\down.bmp", 40, 40, 20, 20)
EndIf
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd