Beiträge von autoBert

  • [gelöst] Unerklärliche TXT-Files in C:\Dokumente und Einstellungen\UserName\Lokale Einstellungen\Temp

    Hallo zusammen,

    kennt jemand ein Programm, das für folgende Files verantwortlich sein könnte ????_appcompat.txt.

    Inhalt von d8aa_appcompat.txt

    in den Files sind nach Überfliegen nur AutoIt compilierte EXE-Files aufgelistet und ich kann mir diese beim besten Willen nicht erklären,

    mfg (Auto)Bert

  • GUI Unklarheiten

    Hallo express,

    Zitat von eXpress

    Gibt es dazu irgendwo ein gescheites Tutorial oder könnte mir das jeamand erklären?


    Hier kannst du dir die Hilfe herunterladen.
    Hier gibt es ein AutoIt-Tutorial: http://wiki.autoit.de/wiki/index.php/TutorialSehr hilfreich ist auch das Buch von peethebee

    Hier noch ein Beispiel zu Ckeckboxen:

    Spoiler anzeigen
    [autoit]

    #include <ButtonConstants.au3>
    #include <Constants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>

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

    Opt('MustDeclareVars', 1) ;Variablen müssen vor Benutzung deklariert werden
    Opt("GUIOnEventMode", 1) ;On-Event-Modus ist eingeschaltet

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

    Global $Checkbox1, $Checkbox2, $Checkbox3, $Checkbox4

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

    _main()
    Func _main()

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

    GUICreate("Ckeckbox-Demo OnEvent-Modus", 300, 300)
    GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit")

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

    $Checkbox1 = GUICtrlCreateCheckbox("1. Checkbox", 20, 40, 1250)
    $Checkbox2 = GUICtrlCreateCheckbox("2. Checkbox", 20, 70, 1250)
    $Checkbox3 = GUICtrlCreateCheckbox("3. Checkbox", 20, 100, 1250)
    $Checkbox4 = GUICtrlCreateCheckbox("4. Checkbox", 20, 130, 1250)

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

    GUICtrlCreateButton("Download", 50, 250, 80)
    GUICtrlSetOnEvent(-1, "Download")

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

    GUISetState(@SW_SHOW)
    While 1 ;<wichtig damit Programm am Leben erhalten wird
    Sleep(1000)
    WEnd
    EndFunc ;==>_main

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

    Func Download()
    If BitAND(GUICtrlRead($Checkbox1), $GUI_CHECKED) = $GUI_CHECKED Then
    MsgBox(0, "1. Checkbox", "ist angeCHECKED")
    ;InetGet verwenden zum downloaden
    Else
    MsgBox(0, "1. Checkbox", "ist nicht angeCHECKED")
    EndIf
    If BitAND(GUICtrlRead($Checkbox2), $GUI_CHECKED) = $GUI_CHECKED Then
    MsgBox(0, "2. Checkbox", "ist angeCHECKED")
    Else
    MsgBox(0, "2. Checkbox", "ist nicht angeCHECKED")
    EndIf
    If BitAND(GUICtrlRead($Checkbox3), $GUI_CHECKED) = $GUI_CHECKED Then
    MsgBox(0, "3. Checkbox", "ist angeCHECKED")
    ;InetGet verwenden zum downloaden
    Else
    MsgBox(0, "3. Checkbox", "ist nicht angeCHECKED")
    EndIf
    If BitAND(GUICtrlRead($Checkbox4), $GUI_CHECKED) = $GUI_CHECKED Then
    MsgBox(0, "4. Checkbox", "ist angeCHECKED")
    Else
    MsgBox(0, "4. Checkbox", "ist nicht angeCHECKED")
    EndIf
    EndFunc ;==>Download

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

    Func _exit()
    Exit
    EndFunc ;==>_exit

    [/autoit]

    viel Spass damit

    mfg (Auto)Bert

  • 1-Click-Shutdown

    Hallo MultiToEat,

    wenn du so abänderst läuft dein Original-Skript

    Spoiler anzeigen
    [autoit]

    Func _CalcTime($ZeitInMin) ;< ======= diese Func war fehlerhaft
    $ZeitInSec = Round($ZeitInMin * 60,0)
    $Stunden = Int($ZeitInSec / 3600)
    $Minuten = Int($ZeitInSec / 60) - $Stunden * 60
    If $Minuten < 10 Then $Minuten = "0" & $Minuten
    $Sekunden = ($ZeitInSec - $Minuten * 60 - $Stunden * 3600);/6
    If $Sekunden < 10 Then $Sekunden = "0" & $Sekunden
    Return $Stunden & ":" & $Minuten & ":" & $Sekunden
    EndFunc ;==>_CalcTime

    [/autoit]

    Edit: nach dem ich jetzt auch die mir fehlende func _DelAfterDot hatte, habe ich einfach folgendes Testskript gebastelt und angepasst:

    Spoiler anzeigen
    [autoit]

    _Start()

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

    Func _Start()
    $SECS = 80000
    For $i = $SECS To 0 Step -1
    ;$Noch = _CalcTime(Int($i / 60))
    $Noch = _CalcTime($i / 60)
    Consolewrite($Noch & @CRLF)
    ;Sleep(1000) ;sonst dauert das Testen zu lange
    Next
    EndFunc ;==>_Start

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

    Func _CalcTime($ZeitInMin) ;< ======= diese Func war fehlerhaft
    $ZeitInSec = Round($ZeitInMin * 60,0)
    $Stunden = Int($ZeitInSec / 3600)
    $Minuten = Int($ZeitInSec / 60) - $Stunden * 60
    If $Minuten < 10 Then $Minuten = "0" & $Minuten
    $Sekunden = ($ZeitInSec - $Minuten * 60 - $Stunden * 3600);/6
    If $Sekunden < 10 Then $Sekunden = "0" & $Sekunden
    Return $Stunden & ":" & $Minuten & ":" & $Sekunden
    EndFunc ;==>_CalcTime

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

    #cs Ergebnis ohne Round und Int
    0:08:32
    0:08:310000000000001
    0:08:30
    #ce

    [/autoit]

    dass es jetzt funktioniert beweist die Ausgabe in der Scit-Console

    Edit2: da durch Int jetzt nur noch ganze Stunden und Minuten herauskommen habe ich die func _CalcTime noch einmal geändert, den _DelAfterDot ist dadurch überflüssig, also auch das includen von time.au3

    mfg (Auto)Bert

  • 1-Click-Shutdown

    Zitat von multitoeat

    Die time.au3 istganz eindeutig drin:

    In deinem Skript schon, aber mir liegt sie nicht vor :!:

    Zitat von AutoBert

    nein diese Datei ist kein Standard-Include und sie fehlt in deinem Post. Wenn ich #include <time.au3> auskommentiere (da ich diese Datei ja nicht habe) wird ERROR: _DelAfterDot(): undefined function angemeckert, sie wird also benötigt,

    das heisst du musst sie auch mit posten bzw. einen Link wo man sich diese Datei herunterladen kann, damit man helfen kann,

    mfg (Auto)Bert

  • GUI Status Bar Bug?!?

    Zitat von Raupi

    ja es funzt bei einem 32 Bit BS. Das Problem scheint nur beim compilieren als 32 Bit Exe unter einem 64 Bit BS zu bestehen. 8|


    Das Original führt bei mir sowohl in Scite als auch kompiliert zu einem Absturz (Problembericht an MS senden Bildschirm) beim Versuch es zu beenden,

    mfg (Auto)Bert

  • 1-Click-Shutdown

    Zitat von Jam00

    Die Time.au3 fehlt

    Zitat von multitoeat

    Time.au3 is drin ;)

    nein diese Datei ist kein Standard-Include und sie fehlt in deinem Post. Wenn ich #include <time.au3> auskommentiere (da ich diese Datei ja nicht habe) wird ERROR: _DelAfterDot(): undefined function angemeckert, sie wird also benötigt,

    im übrigen muss das

    [autoit]

    $Noch = _CalcTime(Round($i / 60,0))

    [/autoit]

    ebenso wie

    [autoit]

    $Noch = _CalcTime(Int($i / 60))

    [/autoit]

    funktionieren,

    mfg (Auto)Bert

  • Bildfehler mit Kodaform

    Hallo Various5,

    dein Skript lässt sich nicht starten, AUsgabe Scite-Console:

    wenn du Hilfe erwartest solltest du zumindest ein lauffähiges Beispiel einstellen, an dem man den Fehler nachvollziehen kann.
    Dein Problem wird vermutlich an den erweiterten Stilen liegen, ändere so ab und es läuft (warscheins):

    [autoit]

    $Form1_1_1 = GUICreate("Tool", 520, 492, 207, 207, -1);, BitOR($WS_EX_TRANSPARENT,$WS_EX_WINDOWEDGE))

    [/autoit]

    danach kannst du ja verschiedene Stile durchtesten, bis du das gewünschte Ergebnis hast,

    mfg (Auto)Bert

  • alternative aktuallisierungsschleife zu while

    Zitat von Sprenger120

    Macht unnötig CPU Last besser ist

    [autoit]

    While Sleep(50)
    WEnd

    [/autoit]

    Falsch,

    Zitat von Hilfe zu GiGetMsg

    Bemerkungen

    Diese Funktion gibt die CPU automatisch wieder frei, wenn es erforderlich ist, so dass sie ruhig in Dauerschleifen benutzt werden kann, ohne die CPU vollständig auszulasten

    @Inferior, das ganze geht auch im Msg-Loop Modus, du darfst die Controls nur aktalisieren wenn nötig ;

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEX.au3>
    #include <EditConstants.au3>

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

    $main = GUICreate("Test", 150, 100)
    $checkbox = GUICtrlCreateCheckbox("test", 20, 30)
    $input = GUICtrlCreateInput("0", 80, 30, 40, 20, $ES_NUMBER)
    GUICtrlSetState(-1, $GUI_DISABLE)
    $updown1 = GUICtrlCreateUpdown($input)
    GUICtrlSetLimit(-1, 100, 0)

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

    GUISetState()

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

    While 1

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

    $main = GUIGetMsg()
    Switch $main
    Case $checkbox
    If GUICtrlRead($checkbox) = $GUI_CHECKED Then
    GUICtrlSetState($input, $GUI_ENABLE)
    Else
    GUICtrlSetData($input, "")
    GUICtrlSetState($input, $GUI_DISABLE)
    EndIf
    Case $GUI_EVENT_CLOSE
    Exit
    EndSwitch
    WEnd

    [/autoit]

    bei grösseren Skripten rate ich dir allerdings auch zum On-Event Modus

    Ps.: In diesem Thread sind viele falsche (bzw. sehr leicht falsch auszulegende) Posts, ich möchte nicht korrigieren aber vielleicht editiert ja der ein(e) oder andere (Power)-User seinen Beitrag oder ein Mod ( Oscar ) KORRIGIERT alles (Mir ist nach einer anstrengenden Woche nd er dazugehörigen Absch(l)ussfeier nicht danach

    mfg (Auto)Bert

  • Arbeiten mit PING

    Hallo Nighty,

    du musst nur Zeile 10 ändern zu:

    [autoit]

    $aNLabels[$i] = GUICtrlCreateLabel("Name" & $i+1 & "Vorname" & $i+1, 100, 10+$i*20)

    [/autoit]

    wobei ich davon ausgehe, dass du in deiner endgültigen Version die Daten aus einer INI oder TXT-Datei holst,

    mfg (Auto)Bert

  • prozessnamen aus PID und dann die fenster zum zugehörigen prozess...

    Hallo WhiteLion,

    mit

    [autoit]

    _ProcessGetName

    [/autoit]

    kannst du den Prozessnamen zu einer PID ermitteln. Um das dazugehörige Fenster heruaszufinden kannst du ja mit

    [autoit]

    WinList

    [/autoit]

    alle Fenster in ein Array speichern lassen. Dieses Array musst du dann in einer Schleife durchgehen und mit WinGetProcess (anhand der zurückgegeben FensterID) prüfen ob es sich um ein zu der PID gehöriges Fenster handelt, Ansatz:

    Spoiler anzeigen
    [autoit]

    #include<Array.au3>
    #include<WinAPI.au3>
    #include<Process.au3>
    $Fenster = WinList()
    $size = $Fenster[0][0]+1
    ReDim $Fenster[$size][6]
    $Pid = InputBox("PID","gesuchte PID")
    For $i = 1 To $Fenster[0][0]
    $Fenster[$i][2] = _WinAPI_GetClassName($Fenster[$i][1])
    $Fenster[$i][3] = WinGetText($Fenster[$i][1])
    $Fenster[$i][4] = WinGetProcess($Fenster[$i][1])
    $Fenster[$i][5] = _ProcessGetName($Fenster[$i][4])
    if $Fenster[$i][4] = $Pid Then MsgBox(0,"Fenster-Handle zu Pid "& $Pid,$Fenster[$i][1])
    Next
    $Fenster[0][0] = "[Fenstertitel (Zahl: " & $Fenster[0][0] & ")]"
    $Fenster[0][1] = "[HWND]"
    $Fenster[0][2] = "[Fensterklasse]"
    $Fenster[0][3] = "[Fenstertext]"
    $Fenster[0][4] = "[PID]"
    $Fenster[0][4] = "[Prozessname]"
    _ArrayDisplay($Fenster)

    [/autoit]

    die Ausgabe in der MsgBox solltest du in separates Array schreiben,

    mfg (Auto)Bert

  • frage zu pixelsearch

    Hallo nilsheigener,

    Pixelsearch-Fragen sind immer BOT verdächtig und bei deiner Auskunbftsfreude:

    Zitat von nilsheigener

    Das ist schwierig zu sagen ;). (Kleines geheimnis, ees kann auch sein das ich es nicht brauche ist noch nicht 100% aber egal)^^
    Ich möchte einfach nur gerne wissen wie der script aussehen müsste das er auf das gefunde pixel klickt.

    tippe ich auch bei dir darauf.
    Deshalb zur Erinnerung:

    Zitat von Sprenger120

    Solange nicht geklärt ist wofür das gebraucht wird, wird hier nicht weiter Supported !

    MoD, bitte closen,

    mfg (Auto)Bert

  • Arbeiten mit PING

    Hallo Nighty,

    das kannst du dann ja so machen:

    Spoiler anzeigen
    [autoit]

    Global $aIpAdressen[3]
    $aIpAdressen[0] = "172.21.122.2"
    $aIpAdressen[1] = "172.21.122.3"
    $aIpAdressen[2] = "172.21.122.23"

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

    GUICreate("Empfängerliste")
    Global $aNLabels[3],$aIPLabels[3]

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

    For $i = 0 To UBound($aIpAdressen) - 1
    $aNLabels[$i] = GUICtrlCreateLabel("Name1, Vorname1", 100, 10+$i*20)
    GUICtrlSetColor(-1, 0x0000FF)
    $aIPLabels[$i] = GUICtrlCreateLabel($aIpAdressen[$i], 10, 10+$i*20)
    GUICtrlSetColor(-1, 0x0000FF)
    Next
    GUISetState()

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

    _ping()

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

    while GUIGetMsg() <> -3

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

    WEnd

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

    Func _ping()
    #cs ;unnötig, da gleicher Inhalt wie $aIpAdressen
    Local $ping[3]
    $ping[0] = "172.21.122.2"
    $ping[1] = "172.21.122.3"
    $ping[2] = "172.21.122.23"
    #ce
    For $i = 0 To UBound($aIpAdressen) - 1
    $result = Ping($aIpAdressen[$i])

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

    If $result = 0 Then
    GUICtrlSetColor($aIPLabels[$i], 0xFF0000)
    Else
    GUICtrlSetColor($aIPLabels[$i], 0x00FF00)
    Senden($aIpAdressen[$i],$i)
    EndIf
    Next
    EndFunc ;==>_ping

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

    Func Senden($sIP, $iIndex)
    Local $iSocket, $iSendedBytes, $result
    TCPStartup()
    $iSocket = TCPConnect($sIP, 4321)

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

    If @error Or $result = 1 Then
    GUICtrlSetColor($aNLabels[$iIndex], 0xFF0000)

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

    Else
    $iSendedBytes = TCPSend($iSocket, "das hier ist die Nachricht")
    if $iSendedBytes <> 0 Then
    GUICtrlSetColor($aNLabels[$iIndex], 0x00FF00)
    Else
    GUICtrlSetColor($aNLabels[$iIndex], 0xFF000F)
    EndIf
    TCPCloseSocket($iSocket)
    EndIf

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

    TCPShutdown()
    EndFunc ;==>Senden

    [/autoit]

    mfg (Auto)Bert

  • Hintergrund farbe ändern oder bild einbinden!

    Zitat von alexanderschill

    versuchs mal mit guiCTRLsetbkcolor damit müsste es gehen guisetbkcolor ist nur fürs fenster nicht fürs controll

    @alexanderschill,

    Zitat von Hilfe zu Guictrlsetbkcolor

    Bemerkungen

    Derzeit können nur Button, Label, Checkbox, Group, Radio, Edit, Input, List, Listview, ListviewItem, Treeview, TreeviewItem, Graphic, Progress, Slider und Combo Controls eingefärbt werden.

    das Tab-Control ist nicht aufgeführt geht also nicht!

    @Secret1994 du solltest dir Eigenes Tab-Register (OwnTab-UDF) von funkey anschauen,

    mfg (Auto)Bert

  • [Hilfe] Silkroad Taxi Tool

    Hallo Bangsta,

    Zitat von http://www.autoit.de/index.php?page=Thread&amp;postID=179062#post179062

    das ist ein Taxi tool sollte das werden d.h du gibst sein name ein den du z.b lvlst und dann die zeit wie lange er drinne bleibt drückst auf start und dann läuft die zeit einfach ab

    Dein Vorhaben widerspricht den Forenregeln.

    MoD bitte closen

    danke (Auto)Bert