Beiträge von Greenhorn

  • Kernel32.dll - GetProcessId

    Moin,

    http://msdn.microsoft.com/en-us/library/ms682629(VS.85).aspx
    http://msdn.microsoft.com/en-us/library/ms684320.aspx

    s. Beispiele !

    EDIT:

    [autoit]


    $aProcesses = EnumProcesses ()

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

    _ArrayDisplay ($aProcesses)

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

    Func EnumProcesses ()

    Local $aReturn[512], $aProcessIds, $pProcessIds, $cb, $pBytesReturned, $aRes

    $cbNeeded = DllStructCreate ('dword')
    $aProcessIds = DllStructCreate ('dword[511]')

    $aRes = DllCall ('Psapi.dll', 'int', 'EnumProcesses', _
    'dword', DllStructGetPtr ($aProcessIds), _
    'dword', DllStructGetSize ($aProcessIds), _
    'dword', DllStructGetPtr ($cbNeeded))
    If $aRes[0] <> 0 Then
    $aReturn[0] = DllStructGetData ($cbNeeded, 1) / 4 ; enthält Anzahl der Elemente
    For $i = 0 To $aReturn[0]
    $aReturn[$i + 1] = DllStructGetData ($aProcessIds, 1, $i)
    Next
    ReDim $aReturn[$aReturn[0] + 1]
    EndIf

    Return $aReturn

    EndFunc

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


    Gruß
    Greenhorn

  • genaue position eines control's im gui

    Zitat von FirePanther

    hallo leutz,
    mit wingetpos kann ich die position des blauen kreuzes herausfinden (wo sich das fenster oben links befindet)
    aber ich möchte die position herausfinden, wohin das rote pfeil hinzeigt (wo die weisse fläche des gui's beginnt, wo z.B. bei guictrlcreatepic(...) posx=0 und posy=0 sind -.-)


    Ja, dafür gibt es eine Funktion ...

    [autoit]

    $hWnd = GUICreate ('foo')

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

    GUISetState ()

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

    $aCoords = GetClientRect ($hWnd)

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

    MsgBox (266304, 'Info', 'left:'&@TAB&$aCoords[0] &@CRLF& _
    'top:'&@TAB&$aCoords[1] &@CRLF& _
    'right:'&@TAB&$aCoords[2] &@CRLF& _
    'bottom:'&@TAB&$aCoords[3] &@CRLF &@TAB)

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

    Func GetClientRect ($hWnd)

    Local $aRes, $stRECT, $lpRect, $aRect[4]
    $stRECT = DllStructCreate ('long left; long top; long right; long bottom;')
    $lpRect = DllStructGetPtr ($stRECT)
    Local $aRes = DllCall ('user32.dll', 'int', 'GetClientRect', _
    'hwnd', $hWnd, _
    'ptr', $lpRect)
    If $aRes[0] <> 0 Then
    $aRect[0] = DllStructGetData ($stRECT, 'left')
    $aRect[1] = DllStructGetData ($stRECT, 'top')
    $aRect[2] = DllStructGetData ($stRECT, 'right')
    $aRect[3] = DllStructGetData ($stRECT, 'bottom')
    EndIf

    Return $aRect

    EndFunc

    [/autoit]


    http://msdn.microsoft.com/en-us/library/ms633503(VS.85).aspx

    Greetz

  • Fehlerrückgabe von Dos-Prog

    Probiere es mal so ...

    [autoit]


    $exitCode = RunWait(@SystemDir & '\net.exe time \\server /set /yes')
    ; 0 = OK (logisch); ungleich 0 = nicht OK (auch logisch)
    MsgBox(266304, '...', 'Der Returncode ist: ' & $exitCode)

    [/autoit]


    Gruß
    Greenhorn

  • Welches CD-Rom LW ?

    Hmmm, also ungefähr so wie PC-Games ... :D

    Vorschlag:
    - Textdatei erstellen
    - Netzwerkadressen der zugel. PCs (encrypted) speichern, oder ganze Datei verschlüsseln
    - Script sucht alle vorhandenen CD Laufwerke nach dieser Datei ab
    - Datei mit Schlüssel öffnen Netzaddi vergleichen und ab geht die Post ...

    Irgenwie so etwas musst dir basteln.


    Gruß
    Greenhorn

  • Inhalt eines ListViewItems editieren??

    Zitat

    To update a specific column just forget about the others ie "||update" to update 3rd column.

    [autoit]

    $l1 = GUICtrlCreateListView("1|2|3|4", 0, 20, 500, 250)
    GUICtrlSetData($l1, 'Das|ist|der|Inhalt')

    [/autoit]

    Das funktioniert nicht ?
    Was meinst Du mit manuell ? Markieren und bearbeiten wie beim Umbenennen im Explorer ?
    Das sollte eigentlich mit $LVS_EDITLABELS möglich sein, so wie Du es schon hast ...

    Ich habe noch nicht mit ListView gearbeitet, von daher auch keine praktische Erfahrung damit ...


    Gruß

  • Inhalt eines ListViewItems editieren??

    Moin,

    aus der Hilfe:

    GUICtrlCreateListViewItem

    Zitat

    Remarks

    This function creates the individual ListView items that can be selected. The items function as normal controls and can be set with GUICtrlSetData.
    Items can be deleted as with any other control by using GUICtrlDelete.
    ListView items can be dragged and drop into an Edit or Input control with a $GUI_DROPACCEPTED state.
    See GUICtrlCreateListView about resizing of the column.


    GUICtrlSetData

    Zitat

    Remarks

    For Combo or List control :
    If the "data" corresponds to an already existing entry it is set as the default.
    If the "data" starts with GUIDataSeparatorChar or is an empty string "" the previous list is destroyed.

    For ListView, ListViewItem controls :
    To update a specific column just forget about the others ie "||update" to update 3rd column.
    If "update" is empty the column/subitem will be erased. For example "|" will erase the second column/subitem, "" will erase the first.


    Gruß
    Greenhorn

  • Kleines problem mit Transparenz ?

    Moinsen,

    Spoiler anzeigen
    [autoit]

    #include-once
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #include <StaticConstants.au3>

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

    $hWnd = GUICreate('Window', 800, 600, -1, -1, $WS_POPUP)

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

    $Backgrnd = GUICtrlCreatePic(@SystemDir & '\oobe\images\wpaback.jpg', _
    0, 0, 800, 600, $SS_NOTIFY, $GUI_WS_EX_PARENTDRAG)
    _GuiRoundCorners($hWnd, 0, 0, 60, 60)

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

    GUISetState()

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

    While True

    Switch GUIGetMsg()

    Case -3
    Exit
    EndSwitch
    WEnd

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

    Func _GuiRoundCorners($hWnd, $x1, $y1, $x3, $y3)

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

    Dim $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

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

    EndFunc
    ;

    [/autoit]


    Gruetzi

  • Speed-It (Firefox Quickstarter)

    Zitat von Darknoop

    Nice ;) Also das Programm funktioniert bei mir aber den Quellcode kann ich nich compilieren :/
    Kommt folgender Fehler:
    ...
    Würde mich mal interessieren was das bedeutet.

    Moin Darknoop,

    Opt("RunErrorsFatal", 0) gibt es nicht mehr -> Zeile löschen.

    #include <GUIConstants.au3> tauschen gegen

    #include-once
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #include <StaticConstants.au3>


    Gruß
    Greenhorn

  • Plattform-Entwicklung

    Sorry, habe die Übersetzung in den letzen "Wochen" :whistling: etwas vernachlässigt, gelobe aber Besserung.

    Schliesslich können wir das nicht dem guten Tweaky allein zumuten ...

    Aber wenn man bedenkt, dass gerade mal die Hälfte fertig übersetzt ist ... :pinch: :wacko:
    Trotzdem, müssen wir jetzt wohl durch.


    Gruß
    Greenhorn

  • Windows Produkt Key auslesen

    Zitat von .::Mignon::.

    das mit 95, 98 hab ich schon gewusst, aber anscheinend weißt du auch nicht wie der bei ME 2000 ist. ich hab aber gelesen das es bei ME genau so sein soll wie bei 98. hatte aber noch keine möglichkeit dies zu testen. nur bei 2000 weiß ich gar nichts.

    Code
    // Don't change Registry.Access method if Win2k


    Also so wie bei XP ! ;)