1. Dashboard
  2. Mitglieder
    1. Letzte Aktivitäten
    2. Benutzer online
    3. Team
    4. Mitgliedersuche
  3. Forenregeln
  4. Forum
    1. Unerledigte Themen
  • Anmelden
  • Registrieren
  • Suche
Alles
  • Alles
  • Artikel
  • Seiten
  • Forum
  • Erweiterte Suche
  1. AutoIt.de - Das deutschsprachige Forum.
  2. Mitglieder
  3. Greek

Beiträge von Greek

  • Happy Burtstag Der_Doc und BugFix

    • Greek
    • 28. November 2013 um 18:28

    Alles gute ihr beiden ;)

  • Objekt-Problem: Kann ich einer Property den Aufruf einer Methode dieses Objektes zuweisen?

    • Greek
    • 16. Oktober 2013 um 17:16

    Ich glaub nicht das dies geht, es gibt Funktionspointer, aber selbst die ruft man wieder mit () auf und in einer struct funktionieren sie so auch nicht.

    Aber du könntest im Konstruktor die value mitgeben, dann kann man es als Property machen:

    Spoiler anzeigen
    Code
    #include <iostream>
    
    
    double half(double a) { return a/2; };
    
    
    int main()
    {
    	// Funktionspointer
    	double value = 12;
    	double (*HALF)(double) = &half;
    	std::cout << HALF(value) << std::endl;
    
    
    	// So:
    	struct Calculator {
    		double HALF;
    		double DOUBLE;
    		Calculator(double value) : HALF(value / 2), DOUBLE(value * 2) {};
    	};
    
    
    	Calculator myCalculator(12);
    	std::cout << myCalculator.HALF << " " << myCalculator.DOUBLE << std::endl;
    
    
    	system("pause");
    
    
    	return 0;
    }
    Alles anzeigen

    ( Ist C++, kann kein Lua )

    Gruß Greek

  • Happy Birthday water

    • Greek
    • 8. Oktober 2013 um 13:39

    Alles gute water :)

  • NomadMemory & getbaseaddress

    • Greek
    • 1. Oktober 2013 um 17:21

    Die Funktion hat bei mir auch nie funktioniert, hab immer falsche Werte bekommen.

    Probier es mal damit, die Funktion hat zumindest bei mir jedes mal die richtigen Werte zurückgeliefert:

    Edit BugFix: Code entfernt -- Don't feed the troll!
    [CLOSED]

  • [PROJEKT] Automatisierter Download und Verarbeitung von Audiodateien

    • Greek
    • 27. September 2013 um 19:40

    Kaspersky Ausnahme hinzufügen ^^

  • Exe unter Win NT4

    • Greek
    • 27. September 2013 um 18:10

    Weis nicht ob i2c das mit dem Link zeigen wollte, aber kann ja sein das du es übersiehst:

    Zitat

    AutoIt Previous Versions – v3.2.12.1 was the last version that was compatible with Windows 95 and Windows NT 4.0.

    Gruß Greek

  • XML auslesen

    • Greek
    • 27. September 2013 um 18:02

    Hier ein Beispiel noch mit xPath:

    Spoiler anzeigen
    [autoit]

    ; create object
    $xml = ObjCreate("Msxml2.DOMDocument")

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

    If IsObj($xml) Then
    $xml.load('C:\Users\Norman\Desktop\text.xml')
    $xml.setProperty("SelectionLanguage","XPath")

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

    $path="//data/video";
    $nodes = $xml.selectNodes($path)

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

    Local $i=0
    While $i<$nodes.length

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

    Local $j=0
    While $j<$nodes($i).childNodes.length
    ConsoleWrite($nodes($i).childNodes($j).childNodes(0).nodeValue & @CRLF)
    $j += 1
    WEnd

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

    $i += 1
    WEnd

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

    Else
    MsgBox(0,"","error")
    EndIf

    [/autoit]

    Aufbau meiner XML Datei ( ungefähr so wie deine :(

    Spoiler anzeigen
    XML
    <?xml version="1.0" encoding="ISO-8859-1"?>
    <data>
    	<video>
    		<Kunde>Klaus</Kunde>
    		<Objektnummer>12345</Objektnummer>
    		<Objektnummer>54815</Objektnummer>
    	</video>
    	<video>
    		<Kunde>Peter</Kunde>
    		<Objektnummer>45678</Objektnummer>
    	</video>
    	<video>
    		<Kunde>Hans</Kunde>
    		<Objektnummer>35653</Objektnummer>
    		<Objektnummer>78987</Objektnummer>
    	</video>
    	<video>
    		<Kunde>Paul</Kunde>
    		<Objektnummer>83534</Objektnummer>
    		<Objektnummer>63455</Objektnummer>
    		<Objektnummer>28563</Objektnummer>
    	</video>
    </data>
    Alles anzeigen

    Der Link zu dem XML Parser ist leider nicht mehr verwendbar, da fehlt irgendwie die hälfte, also einfach das benutzen was ich benutz hab.

    Gruß Greek

  • XML auslesen

    • Greek
    • 25. September 2013 um 16:46

    Wie ließt du bis jetzt aus?

    Hab das Problem nicht genau verstanden, hier schau dir mal den XML Parser an:

    https://raw.github.com/Silvernine0S/F…LDomWrapper.au3

    [autoit]

    #include "_XMLDomWrapper.au3"

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

    _XMLFileOpen("deineDatei.xml")

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

    ...

    [/autoit]
  • [PROJEKT] Automatisierter Download und Verarbeitung von Audiodateien

    • Greek
    • 25. September 2013 um 16:32
    Zitat

    Dazu habe ich eine Funktion geschrieben die die Verbindung zum Server überprüft und die ich gern alle X Minuten aufrufen möchte

    Glaub du suchst das:

    [autoit]

    AdlibRegister("_test",250)

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

    while 1

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

    Sleep(10)
    WEnd

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

    Func _test()
    ConsoleWrite("test");
    EndFunc

    [/autoit]

    Unterbricht die While Schleife alle 250ms und führt die Funktion aus

  • AutoIt hört mittendrin auf

    • Greek
    • 24. September 2013 um 14:39

    Send kann man schon benutzen, ist zwar sch*** aber egal ^^

    Du hast bei WinWaitActive kein Timeout angegeben, vielleicht wartet er da ewig. Allgemein kannst du in dein Script Msgbox(0,"","Line: etc") machen um zu sehen wie weit er kommt.

    Das hier:

    [autoit]

    WinActivate($Titel)
    If Not (WinWaitActive($Titel)) Then
    $vError=1
    Else

    [/autoit]

    Brauchst du auch denk ich nicht jedesmal machen, einmal am Anfang reicht.

    Ansonsten noch zu den Operatoren:

    Zitat

    = Tests if two values are equal. e.g. If $var= 5 Then (true if $var equals 5). Case insensitive when used with strings.

    Zitat

    == Tests if two strings are equal. Case sensitive. The left and right values are converted to strings if they are not strings already. This operator should only be used for string comparisons that need to be case sensitive

    Also in AutoIt kannst du auch = verwenden.

  • [PROJEKT] Automatisierter Download und Verarbeitung von Audiodateien

    • Greek
    • 20. September 2013 um 01:37

    Das kann man doch bestimmt escapen?

    Im Internet das hier gefunden:

    Zitat

    All you have to do to escape special characters in your ftp password is find the hexidecimal value of the value to be escaped, and prefix it with a %

    hence the password b@ner would now be b%40ner

  • [PROJEKT] Automatisierter Download und Verarbeitung von Audiodateien

    • Greek
    • 16. September 2013 um 14:06

    Du hast die $ vergessen, bei i in der if

  • Mac Auslesen und Rechnername anpassen

    • Greek
    • 8. September 2013 um 15:21

    Bei mir matcht das _StringBetween garnicht ?

    Man sollte vl. noch die Beschreibung mit speichern, ich hab 3 Stück drin. Wär vl. mit RegEx einfacher:

    [autoit]

    #include <Constants.au3>
    #include <array.au3>
    #include <string.au3>

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

    Dim $cmd = 'ipconfig /all'
    Dim $pid = Run(@ComSpec & " /c " & $cmd, "", @SW_HIDE,$STDOUT_CHILD)
    Dim $output = ""

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

    While ProcessExists($pid)
    $output &= StdoutRead($pid)
    WEnd

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

    ConsoleWrite($output & @CRLF)

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

    $aResult = StringRegExp($output,"Beschreibung.*?:\s(.+?)\r\n.+?:\s(.+?)\s",3)
    _ArrayDisplay($aResult)

    [/autoit]
  • Mac Auslesen und Rechnername anpassen

    • Greek
    • 7. September 2013 um 23:07
    Zitat

    Hab ich das so weit richtig verstanden?

    Nein,

    der 1. Parameter ist dein Kompletter Text.

    das Ergebnis steht dann zwischen dem Text von Parameter 3 und Parameter 4.

    In der Hilfe ist ein Beispiel:

    [autoit]

    #include <String.au3>
    #include <Array.au3>

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

    _Main()

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

    Func _Main()
    Local $aArray1 = _StringBetween('[18][20][3][5][500][60]', '[', ']')
    _ArrayDisplay($aArray1, 'Default Search')
    EndFunc ;==>_Main

    [/autoit]

    Gibt also alles zwischen [ und ] aus.

  • Log auslesen

    • Greek
    • 7. September 2013 um 22:30

    Hier:

    [autoit]

    #include <Array.au3>

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

    $sLog = FileRead("deinLog.txt")

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

    $aRegEx1 = StringRegExp($sLog,"(?s)(?<=\[).+?(?=End)",3)

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

    _ArrayDisplay($aRegEx1)

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

    $aRegEx2 = StringRegExp($sLog,"(?s)\^\d+\s(.*?)\s.*?\s.*?\s.*?\s(.*?)\s",3)

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

    _ArrayDisplay($aRegEx2)

    [/autoit]

    Noch nen hübsches Schleifchen drum machen und fertig.

    Datum hab ich weg gelassen, das ist ja trivial.

    Edit:

    Sehe gerade das du RegEx noch nicht so kannst, also hier nochmal gleich mit Datum:

    [autoit]

    (?s)(?<=\[)(.+?)\s(.+?)\s(.+?)(?=End)

    [/autoit]

    ( Datum und Uhrzeit hab ich mal getrennt, je nach dem wie du es willst )

  • Geschriebenes mit _WinAPI_DrawText wieder löschen um etwas neues zu schreiben.

    • Greek
    • 7. September 2013 um 20:17
    Zitat von BinäryChief

    Dann habe ich noch eine Frage. Wo bestimmst du in deinem Bespiel mit der Uhr die Position der Uhr auf dem Desktop?

    [autoit]


    $hGui=GUICreate("Uhr", $GUIBreite, $GUIHoehe, Default, Default, $WS_POPUP, BitOR($WS_EX_LAYERED,$WS_EX_TOOLWINDOW,$WS_EX_TOPMOST))
    GUISetBkColor(0x000000)

    [/autoit]

    Sind das hier die Default Einträge?

    Steht in der Hilfe bei GUICreate

    Zitat

    left [optional] The left side of the dialog box. By default (-1), the window is centered. If defined, top must also be defined.
    top [optional] The top of the dialog box. Default (-1) is centered

    -1 kann man auch statt Default schreiben.

  • Regulärer Ausdruck

    • Greek
    • 7. September 2013 um 20:06

    Gelöst:

    [autoit]

    (?:startString|\G)[^<>]*+\K(?:<a>([^<>]++)</a>)(?=(?:(?!startString).)*?endString)

    [/autoit]

    Modifier: s und i


    Gruß Greek

  • Geschriebenes mit _WinAPI_DrawText wieder löschen um etwas neues zu schreiben.

    • Greek
    • 7. September 2013 um 19:09

    Wie name22 schon sagt, mach es mit GDIp

    "Löschen" kann man das alte gezeichnet übrigens nicht, man muss einfach nochmal ( in deinem Beispiel jedenfalls ) mit schwarz drüber zeichnen.

    Hab noch was gefunden, was ich vor 3-4 Jahren mal gemacht hab, zur Veranschaulichung:

    Spoiler anzeigen
    [autoit]

    ;Author: Greek
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #Include <GDIPlus.au3>

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

    HotKeySet ("{ESC}","_CleanEnd")

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

    Global $GUIBreite=400
    Global $GUIHoehe=150

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

    $hGui=GUICreate("Uhr", $GUIBreite, $GUIHoehe, Default, Default, $WS_POPUP, BitOR($WS_EX_LAYERED,$WS_EX_TOOLWINDOW,$WS_EX_TOPMOST))
    GUISetBkColor(0x000000)
    GUICtrlCreateLabel("", 0, 0, $GUIBreite, $GUIHoehe, -1, $GUI_WS_EX_PARENTDRAG)
    GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
    _WinAPI_SetLayeredWindowAttributes($hGui, 0x000000, 0,0x01)
    _GuiRoundCorners($hGui,0,0,400,150)
    GUISetState()

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

    _GDIPlus_Startup()

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

    $hGraphic=_GDIPlus_GraphicsCreateFromHWND($hGui)
    $hBrush = _GDIPlus_BrushCreateSolid (0xFF00FF00)
    $hFormat = _GDIPlus_StringFormatCreate ()
    $hFamily = _GDIPlus_FontFamilyCreate ("Arial")
    $hFont = _GDIPlus_FontCreate ($hFamily, 40, 2)
    $tLayout = _GDIPlus_RectFCreate (85, 40, 300, 100)
    _GDIPlus_GraphicsDrawStringEx ($hGraphic, @HOUR&":"&@MIN&":"&@SEC, $hFont, $tLayout, $hFormat, $hBrush)

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

    AdlibRegister("_Update",1000)

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

    While 1
    Sleep ( 200 )
    WEnd

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

    Func _Update()
    _GDIPlus_GraphicsClear($hGraphic,0xFF000000)
    _GDIPlus_GraphicsDrawStringEx ($hGraphic, @HOUR&":"&@MIN&":"&@SEC, $hFont, $tLayout, $hFormat, $hBrush)
    EndFunc

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

    Func _CleanEnd()
    _GDIPlus_FontDispose ($hFont)
    _GDIPlus_FontFamilyDispose ($hFamily)
    _GDIPlus_StringFormatDispose ($hFormat)
    _GDIPlus_BrushDispose ($hBrush)
    _GDIPlus_GraphicsDispose ($hGraphic)
    _GDIPlus_Shutdown ()
    Exit
    EndFunc

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

    Func _GuiRoundCorners($hWnd, $x1, $y1, $x3, $y3)
    Local $pos, $ret, $ret2
    $pos = WinGetPos($hWnd)
    $ret = DllCall('gdi32.dll', 'long', 'CreateRoundRectRgn', 'long', $x1, 'long', $y1, 'long', $pos[2], 'long', $pos[3], 'long', $x3, 'long', $y3)
    If $ret[0] Then
    $ret2 = DllCall('user32.dll', 'long', 'SetWindowRgn', 'hwnd', $hWnd, 'long', $ret[0], 'int', 1)
    If $ret2[0] Then
    Return 1
    Else
    Return 0
    EndIf
    Else
    Return 0
    EndIf
    EndFunc

    [/autoit]
    [autoit]

    _GDIPlus_GraphicsClear($hGraphic,0xFF000000)

    [/autoit]

    Der Befehl zeichnet nochmal über alles drüber mit schwarz, dadurch verschwindet die alte Zeit immer.

    [autoit]

    _WinAPI_SetLayeredWindowAttributes($hGui, 0x000000, 0,0x01)

    [/autoit]


    Hier sag ich noch das die Farbe Schwarz transparent sein soll.

    Gruß Greek

  • Regulärer Ausdruck

    • Greek
    • 7. September 2013 um 18:46

    Hiho,

    lern gerade ein wenig RegExp und habe folgenden Text :

    Spoiler anzeigen

    <a>willichnicht</a>
    startString
    testyo
    <a>willichhaben1</a>
    mehr tests
    <a>willichhaben2</a>
    endString
    stblub
    <a>willichnicht</a>
    startString
    testyo
    <a>willichhaben3</a>
    mehr tests
    <a>willichhaben4</a>
    endString
    stblub
    <a>willichnicht</a>

    So könnte man es machen:

    [autoit]

    $aExp1 = StringRegExp($file,"(?s)(?<=startString).+?(?=endString)",3);
    $aExp2 = StringRegExp($aExp1[0],"<a>(.+?)</a>",3); // und noch für $aExp1[1]

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

    _ArrayDisplay($aExp2)

    [/autoit]

    Ich frag mich ob man das auch in einem Ausdruck machen kann?

    Meine Ansätze:

    [autoit]

    StringRegExp($file,"(?s)(?<=startString).+?<a>(.+?)</a>.+?(?=endString)",3);
    StringRegExp($file,"(?s)(?<=startString).+?(<a>(.+?)</a>.+?)+(?=endString)",3);

    [/autoit]

    Das erste gibt aber nur den 1. und das 2. gibt nur den 2. . Gibts auch einen der alle matcht?

    Gruß Greek

  • GDI+ negative Koordinaten

    • Greek
    • 5. August 2013 um 16:23

    Hi,

    du kannst auch einfach auf ein transparentes Fenster zeichnen.

    Beispiel:

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #include <GDIPlus.au3>
    #include <timers.au3>
    #include <Misc.au3>

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

    $dll = DllOpen("user32.dll")

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

    Global $ballpos1=@DesktopWidth/2
    Global $ballpos2=@DesktopHeight/2
    Global $BewegungSenkrecht=Random(5, 7, 1)
    Global $BewegungWagrecht=Random(5, 7, 1)
    Global $Speed=10

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

    _GDIPlus_Startup()

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

    Global $hGui = GUICreate("Rahmen", @DesktopWidth, @DesktopHeight, -1, -1, $WS_POPUP, $WS_EX_LAYERED)
    GUISetBkColor(0xABCDEF)
    _WinAPI_SetLayeredWindowAttributes($hGui, 0xABCDEF, 255)
    GUISetState()
    Global $hGraphic = _GDIPlus_GraphicsCreateFromHWND($hGui)
    $Pinsel = _GDIPlus_PenCreate(0xFF0000FF, 20)
    Global $vanish = _GDIPlus_PenCreate(0xFF000000, 20)
    $t1 = _Timer_SetTimer(0, 10, "move")
    $begin=TimerInit()

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

    AdlibRegister ( "_check", 50 )

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

    While 1
    $nmsg=GUIGetMsg()
    Switch $nmsg
    Case $gui_event_close
    Exit
    EndSwitch
    WEnd

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

    Func _ende()
    _GDIPlus_GraphicsClear ( $hGraphic, 0xFFABCDEF )
    _GDIPlus_PenDispose($Pinsel)
    _GDIPlus_PenDispose($vanish)
    _GDIPlus_GraphicsDispose($hGraphic)
    _GDIPlus_Shutdown()
    Exit
    EndFunc ;==>_ende

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

    Func move($a, $b, $c, $d)
    _GDIPlus_GraphicsDrawLine ( $hGraphic, $ballpos1, $ballpos2, $ballpos1+50, $ballpos2+50, $vanish )
    $ballpos1+=$BewegungWagrecht * $Speed
    $ballpos2+=$BewegungSenkrecht * $Speed
    _GDIPlus_GraphicsDrawLine ( $hGraphic, $ballpos1, $ballpos2, $ballpos1+50, $ballpos2+50, $Pinsel )
    If $ballpos1 >= @DesktopWidth - 80 And $BewegungWagrecht > 0 Then $BewegungWagrecht = Random(-7, -5, 1)
    If $ballpos1 < 10 And $BewegungWagrecht < 0 Then $BewegungWagrecht = Random(5, 7, 1)
    If $ballpos2 >= @DesktopHeight - 95 And $BewegungSenkrecht > 0 Then $BewegungSenkrecht = Random(-7, -5, 1)
    If $ballpos2 < 30 And $BewegungSenkrecht < 0 Then $BewegungSenkrecht = Random(5, 7, 1)
    If _GDIPlus_PenGetColor ( $vanish )=0xFF000000 Then
    _GDIPlus_PenSetColor ( $vanish, 0xFFFFFF00 )
    ElseIf _GDIPlus_PenGetColor ( $vanish )=0xFFFFFF00 Then
    _GDIPlus_PenSetColor ( $vanish, 0xFFFF0000 )
    ElseIf _GDIPlus_PenGetColor ( $vanish )=0xFFFF0000 Then
    _GDIPlus_PenSetColor ( $vanish, 0xFF00FF00 )
    ElseIf _GDIPlus_PenGetColor ( $vanish )=0xFF00FF00 Then
    _GDIPlus_PenSetColor ( $vanish, 0xFF000000 )
    EndIf
    ;~ $dif=TimerDiff( $begin )
    ;~ If $dif>12000 Then
    ;~ _GDIPlus_GraphicsClear ( $hGraphic, 0xFFABCDEF )
    ;~ $begin=TimerInit()
    ;~ EndIf
    EndFunc ;==>move

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

    Func _check()
    If _IsPressed ( "1B", $dll ) Then
    _ende()
    EndIf
    EndFunc

    [/autoit]

    Gruß Greek

    Edit:

    Ah hab was vergessen, man kann nicht mehr hindurch drücken, dafür gibts aber eine Lösung - moment.

    Edit2:

    Spoiler anzeigen
    [autoit]

    ;### UDF Start
    #Include <WinAPI.au3>
    #include <WindowsConstants.au3>

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

    Global Const $GWL_EXSTYLE = -20

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

    ;===============================================================================
    ;
    ; Function Name: _Win_SetClickThrough($hWnd,$noclic = True)
    ; Description:: Makes a window to not receive mouse input
    ; Parameter(s): $title -> Title or hWnd of Window
    ; $text [Optional] -> Text in Window
    ; $noclic [Optional] -> If False, the window regains MouseInput otherwise it will loose it, defalut: True
    ; Requirement(s): <WINApi.au3>
    ; Return Value(s): Success: 1, Error0 and @error
    ; @error Values: 1 -> Window does not exist
    ; 2 -> Error in Setting the Styles
    ; Author(s): Prog@ndy
    ;
    ;===============================================================================
    ;
    Func _Win_SetClickThrough($title,$text = "",$noclic = True)
    Local $hWnd = WinGetHandle($title,$text)
    If @error Then Return SetError(1,0,0)
    If $noclic Then
    _WinAPI_SetWindowLong($hWnd,$GWL_EXSTYLE,BitOR(_WinAPI_GetWindowLong($hWnd,$GWL_EXSTYLE),$WS_EX_TRANSPARENT))
    If @error Then Return SetError(2,0,0)
    WinSetTrans($hWnd,"",255) ; Sets the Layered Attribute, but still shows the window :)
    If @error Then Return SetError(2,0,0)
    Else
    _WinAPI_SetWindowLong($hWnd,$GWL_EXSTYLE,BitAND(_WinAPI_GetWindowLong($hWnd,$GWL_EXSTYLE),BitNOT($WS_EX_TRANSPARENT)))
    If @error Then Return SetError(2,0,0)
    EndIf
    Return 1
    EndFunc
    ;### UDF END

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

    ;Example:
    $win = WinGetHandle("Unbenannt")

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

    If @error = 1 Then
    Run("notepad.exe")
    WinWait("Unbenannt")
    $win = WinGetHandle("Unbenannt")
    EndIf

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

    WinActivate($win)
    _Win_SetClickThrough($win)
    MsgBox(0, '', "Notepad receives no Mouse Clicks anymore, Click OK to Restore")
    _Win_SetClickThrough($win,"",0)

    [/autoit]

Spenden

Jeder Euro hilft uns, Euch zu helfen.

Download

AutoIt Tutorial
AutoIt Buch
Onlinehilfe
AutoIt Entwickler
  1. Datenschutzerklärung
  2. Impressum
  3. Shoutbox-Archiv
Community-Software: WoltLab Suite™