Beiträge von autoBert

  • GUI - Textfeld & Checkbox

    Hallo freakisch,

    Zitat

    Also im ersten Fenster (GUI) werden Komponenten ausgewählt, die dann Installiert werden!

    Du meintest wohl Installiert werden sollen. Dazu musst du aber den Status der Checkboxen abfragen, um dies zu können solltest du beim anlegen der auch die controlID's der Checkboxen in Variablen speichern. Wenn du es in Arrays machst, hast du weniger Tipparbeit. Mit GuiCtrlRead kannst du dann den Status abfragen und danach mit anhand des Beispiels von Chaoskeks den Fortschritt in ein Steuerelement schreiben. Die untertrichenen Stichwörter findest du alle in der Hilfe,

    mfg (Auto)Bert

  • Eigenen kleinen Explorer

    Hallo DeepRed,

    z.B. in einer Datenbank

    SQL
    CREATE TABLE [Katalog] ([KNr] INTEGER  NOT NULL PRIMARY KEY,[Bezeichnung] VARCHAR(255)  NOT NULL,[Vorfahre] INTEGER  NOT NULL)

    Mit dieser Struktur kannst du das ohne Probleme abbilden,

    mfg (Auto)Bert

  • Eigenen kleinen Explorer

    Hallo DeepRed,

    warum nimmst du keinen Treeview, der ist doch prädestiniert dafür solche Strukturen abzubilden. Gibt auch einige gute TreeView-Beispiele (in Skripte) von Oscar,

    Edit1: ich stell mir das so vor, links das Treeview- und rechts ein Header oder ein Listview-Steuerelement

    mfg (Auto)Bert

  • frage zu GUICtrlCreateTabItem

    Hallo Sirocool,

    wozu gibt es den

    Zitat

    GUICtrlCreateTab
    --------------------------------------------------------------------------------

    Erzeugt eine Karteireiterauswahl für die GUI.


    GUICtrlCreateTab ( left, top [, width [, height [, style [, exStyle]]]] )

    den style $TCS_MULTILINE? Könnte das sein was du suchst. (Wer suchet, der findet)

    mfg (Auto)Bert

  • TreeView Transparent

    @ChaosKeks,

    das Skript ist nicht von mir, hab ich vor längerer Zeit bei AutoItScript.com gefunden, leider weiss weder den Author noch den Link, sonst könnte ich die Lorbeeren weiterreichen.

    Zitat

    Um Popups zu Childs zu machen, gibt es MDI_Child.. Spoiler bitte mitlesen

    Dieser erweiterte Stil ist mir durchaus bekannt. Ich denke Jam00 wollte eigentlich folgendes probieren:

    Spoiler anzeigen
    [autoit]

    #include <TreeViewConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <SliderConstants.au3>
    #include <WindowsConstants.au3>
    #include <WinApi.au3>
    #Include <GuiImageList.au3>
    #Include <GuiTreeView.au3>

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

    Opt("GuiOnEventMode",1)
    ; #GUI# =================================================================================
    Local $hItem[6], $hImage, $hRandomImage, $hTreeView
    Local $iStyle = BitOR($TVS_EDITLABELS, $TVS_HASBUTTONS, $TVS_HASLINES, $TVS_LINESATROOT, $TVS_DISABLEDRAGDROP, $TVS_SHOWSELALWAYS, $TVS_CHECKBOXES)
    Local $hfrmPic = GUICreate("Form1", 237, 447+29, 193, 125,$WS_POPUP,0);,$hfrmMain);,$WS_EX_MDICHILD)
    GUICtrlCreatePic (@ScriptDir & "\bin\bg1.jpg",0,0,237,447)
    GUISetState(@SW_SHOW)
    Global $hfrmMain = GUICreate("Options",237, 447, 193, 125)
    Global $PosOld = WinGetPos ($hfrmMain)
    ;GUISetBkColor(0xFFFFFF)
    GuiSetOnEvent($GUI_EVENT_CLOSE, "_Exit")

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

    GUICtrlCreateGroup("Transparency", 15, 15,230, 70)
    $label = GUICtrlCreateLabel("Transparency = 100%", 23, 37, -1 ,20)
    $slider = GUICtrlCreateSlider(23, 57, 200, 20, BitOR($TBS_AUTOTICKS, $WS_BORDER))
    $hTreeView = GUICtrlCreateTreeView(2, 100, 396, 268, $iStyle, $WS_EX_CLIENTEDGE)
    $hImage = _GUIImageList_Create(16, 16, 5, 3)
    _GUIImageList_AddIcon($hImage, "shell32.dll", 110)
    _GUIImageList_AddIcon($hImage, "shell32.dll", 131)
    _GUIImageList_AddIcon($hImage, "shell32.dll", 135)
    _GUIImageList_AddIcon($hImage, "shell32.dll", 136)
    _GUIImageList_AddIcon($hImage, "shell32.dll", 137)
    _GUIImageList_AddIcon($hImage, "shell32.dll", 138)
    _GUICtrlTreeView_SetNormalImageList($hTreeView, $hImage)

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

    _GUICtrlTreeView_BeginUpdate($hTreeView)
    For $x = 0 To _GUIImageList_GetImageCount($hImage) - 1
    $hItem[$x] = _GUICtrlTreeView_Add($hTreeView, 0, StringFormat("[%02d] New Item", $x + 1), $x, $x)
    For $y = 0 To _GUIImageList_GetImageCount($hImage) - 1
    $hItem[$y] = _GUICtrlTreeView_AddChild($hTreeView, $hItem[$x], StringFormat("[%02d] Child Item", $x + 1), $x, $x)
    Next
    Next
    _GUICtrlTreeView_EndUpdate($hTreeView)

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

    $hRandomImage = Random(0, _GUIImageList_GetImageCount($hImage) - 1, 1)

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

    GUICtrlSetData($slider, 70)
    WinsetTrans("Options", "", GUICtrlRead($slider) * 2.55)

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

    GUIRegisterMsg($WM_MOVE, "_Move")
    DllCall("user32.dll", "int", "SetLayeredWindowAttributes", "hwnd", $hfrmMain, "long", 0xFFFFFF, "byte", 255, "long",True)

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

    GUIRegisterMsg($WM_HSCROLL, "WM_HVSCROLL")
    ;WinSetOnTop("Options","",1)
    GUISetState(@SW_SHOW,$hfrmMain)
    WinsetTrans("Options", "", GUICtrlRead($slider) * 2.55)

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

    ; #MAIN LOOP# ============================================================================
    While 1
    sleep(100)
    WEnd

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

    ; #FUNCTIONS# ============================================================================
    Func WM_HVSCROLL($hwnd, $iMsg, $wParam, $lParam) ; Slider
    Local $hWndFrom, $iCode
    If Not IsHWnd($Slider) Then $hWndCombo1 = GUICtrlGetHandle($Slider)
    $hWndFrom = $lParam
    $iCode = _WinAPI_HiWord ($wParam)
    Switch $hWndFrom
    Case $Slider, $hWndCombo1
    GUICtrlSetData($label, "Transparency = " & GUICtrlRead($slider)&"%")
    WinsetTrans("Options", "", GUICtrlRead($slider) * 2.55)
    EndSwitch
    EndFunc ;==>WM_HVSCROLL

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

    Func _Exit()
    Exit
    EndFunc

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

    Func _Move()
    $Pos = WinGetPos ($hfrmMain)
    If $Pos[0] <> $PosOld[0] Or $Pos[1] <> $PosOld[1] Then
    $PosOld = WinGetPos ($hfrmMain)
    WinMove ($hfrmPic,"",$Pos[0]+2,$Pos[1]+29)
    EndIf
    EndFunc

    [/autoit]

    wobei ich es hier mit MDI_Child auch nicht hinbekomme(n kann), bin noch am suchen. Diese Lösung hat den Vorteil, das die Steuerelemente wieder lesbar sind (solange man einen vernünftigen Wert einstellt). Ich hoffe nur, wir haben @riki jetzt nicht abgeschreckt (hab erst vorhin gesehen, dass es sein erster Beitrag war).

    Edit1: @ChaosKeks dein Skript, hat den gleichen Schönheitsfehler, wie das von Jam00, die Beschriftung der TreeviewItems ist nicht lesbar. Und auf das andere Skript von Jam00 warte ich immer noch (vielleicht klappts ja dort)

    einen schönen, sonnigen Tag noch

    (Auto)Bert

  • TreeView Transparent

    Hallo riki,

    hab mein Skript in Spoiler #2 von Post #3 ausgetauscht, war nicht komplett.

    Jam00, dein Ergebnis aus Post #9 überzeugt mich nicht, die Beschriftung der TreeViewItems sind nicht lesbar. Handelt es sich bei deinem angehängtem Bild um einen Screenshot, oder hast du einfach nur ein Bild aus dem von mir hochgeladenen ZIP nochmal eingestellt (Ich kann nämlich nichts von einerGUI erkennen) Dein Ergebnis von Post #13 fehlt leider auch

    @ChaosKeks, das Move benötigt er, damit der Baum im Fenster bleibt,

    einen schönen, sonnigen Tag noch

    (Auto)Bert

  • TreeView Transparent

    Hallo Jam00,

    schau dir doch bitte den 2. Spoiler an und lies was ich dazu geschrieben habe. Teste es erst einmal und urteile danach, auf das Skript im 1. Spoiler trifft deine Aussage zu.

    FirePanther, jawohl es sind 2 GUIs

    Edit1: Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.
    mfg (Auto)Bert

  • TreeView Transparent

    Hallo riki,

    und es geht doch, hier der Beweis:

    Spoiler anzeigen
    [autoit]

    #include <TreeViewConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <SliderConstants.au3>
    #include <WindowsConstants.au3>
    #include <WinApi.au3>
    #Include <GuiImageList.au3>
    #Include <GuiTreeView.au3>

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

    Opt("GuiOnEventMode",1)
    ; #GUI# =================================================================================
    Local $hItem[6], $hImage, $hRandomImage, $hTreeView
    Local $iStyle = BitOR($TVS_EDITLABELS, $TVS_HASBUTTONS, $TVS_HASLINES, $TVS_LINESATROOT, $TVS_DISABLEDRAGDROP, $TVS_SHOWSELALWAYS, $TVS_CHECKBOXES)
    $Options = GUICreate("Options", 260, 510,2,2)
    GUISetBkColor(0xFFFFFF)
    GuiSetOnEvent($GUI_EVENT_CLOSE, "_Exit")

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

    GUICtrlCreateGroup("Transparency", 15, 15,230, 70)
    $label = GUICtrlCreateLabel("Transparency = 100%", 23, 37, -1 ,20)
    $slider = GUICtrlCreateSlider(23, 57, 200, 20, BitOR($TBS_AUTOTICKS, $WS_BORDER))
    $hTreeView = GUICtrlCreateTreeView(2, 100, 396, 268, $iStyle, $WS_EX_CLIENTEDGE)
    $hImage = _GUIImageList_Create(16, 16, 5, 3)
    _GUIImageList_AddIcon($hImage, "shell32.dll", 110)
    _GUIImageList_AddIcon($hImage, "shell32.dll", 131)
    _GUIImageList_AddIcon($hImage, "shell32.dll", 135)
    _GUIImageList_AddIcon($hImage, "shell32.dll", 136)
    _GUIImageList_AddIcon($hImage, "shell32.dll", 137)
    _GUIImageList_AddIcon($hImage, "shell32.dll", 138)
    _GUICtrlTreeView_SetNormalImageList($hTreeView, $hImage)

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

    _GUICtrlTreeView_BeginUpdate($hTreeView)
    For $x = 0 To _GUIImageList_GetImageCount($hImage) - 1
    $hItem[$x] = _GUICtrlTreeView_Add($hTreeView, 0, StringFormat("[%02d] New Item", $x + 1), $x, $x)
    For $y = 0 To _GUIImageList_GetImageCount($hImage) - 1
    $hItem[$y] = _GUICtrlTreeView_AddChild($hTreeView, $hItem[$x], StringFormat("[%02d] Child Item", $x + 1), $x, $x)
    Next
    Next
    _GUICtrlTreeView_EndUpdate($hTreeView)

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

    $hRandomImage = Random(0, _GUIImageList_GetImageCount($hImage) - 1, 1)

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

    GUICtrlSetData($slider, 70)

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

    GUISetState()

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

    GUIRegisterMsg($WM_HSCROLL, "WM_HVSCROLL")

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

    ; #MAIN LOOP# ============================================================================
    While 1
    sleep(100)
    WEnd

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

    ; #FUNCTIONS# ============================================================================
    Func WM_HVSCROLL($hwnd, $iMsg, $wParam, $lParam) ; Slider
    Local $hWndFrom, $iCode
    If Not IsHWnd($Slider) Then $hWndCombo1 = GUICtrlGetHandle($Slider)
    $hWndFrom = $lParam
    $iCode = _WinAPI_HiWord ($wParam)
    Switch $hWndFrom
    Case $Slider, $hWndCombo1
    GUICtrlSetData($label, "Transparency = " & GUICtrlRead($slider)&"%")
    WinsetTrans("Options", "", GUICtrlRead($slider) * 2.55)
    EndSwitch
    EndFunc ;==>WM_HVSCROLL

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

    Func _Exit()
    Exit
    EndFunc

    [/autoit]

    Ich hab hier nur ein kleines Skript von @ChaosKeks, um den Treeview erweitert. Hat sofort geklappt. Viel Spass damit,

    Sorry, hier eine Version mit Hintergrundbild (angepasst auf TreeView, Originial gefunden AutoItScript.com Autor?)

    Spoiler anzeigen
    [autoit]

    GUICtrlSetData($slider, 70)
    #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #cs ----------------------------------------------------------------------------

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

    AutoIt Version: 3.3.0.0
    Author: myName

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

    Script Function:
    Template AutoIt script.

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

    #ce ----------------------------------------------------------------------------

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

    ; Script Start - Add your code below here
    #include <GUIConstants.au3>
    #include <WindowsConstants.au3>
    #include <ProgressConstants.au3>
    #include <Constants.au3>
    #include <StaticConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <TreeViewConstants.au3>
    #Include <GuiImageList.au3>
    #Include <GuiTreeView.au3>

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

    Opt("TrayMenuMode",1)
    HotKeySet ("{F6}", "hide")
    Local $hItem[6], $hImage, $hRandomImage, $hTreeView
    Local $iStyle = BitOR($TVS_EDITLABELS, $TVS_HASBUTTONS, $TVS_HASLINES, $TVS_LINESATROOT, $TVS_DISABLEDRAGDROP, $TVS_SHOWSELALWAYS, $TVS_CHECKBOXES)
    $1= GUICreate("TRANS GUI",700,550,-1,-1,$WS_POPUP,$WS_EX_CLIENTEDGE)
    $pic = GUICtrlCreatePic("bin\bg" &random (1,8,1) & ".jpg",0,0,700,550) ;change bgX.jpg with your jpeg
    GuiCtrlSetState(-1,$GUI_DISABLE)

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

    WinSetOnTop("TRANS","",1)
    GUISetState(@SW_SHOW,$1)
    $2= GUICreate("GUI",700,550,-1,-1,$WS_POPUP,$WS_EX_MDICHILD,$1)
    WinSetTrans ("GUI","",0)
    WinSetOnTop("GUI","",1)
    GUISetState(@SW_SHOW,$2)
    $progressbar1 = GUICtrlCreateProgress(0, 540, 700, 10, $PBS_SMOOTH )
    DllCall("UxTheme.dll", "int", "SetWindowTheme", "hwnd", GUICtrlGetHandle(-1), "wstr", 0, "wstr", 0)
    $close = GUICtrlCreateIcon ("bin\close.ico",-1,700-16,5,16,16)
    $w = GUICtrlCreateLabel("0",300,250,150,60)
    GUICtrlSetFont(-1, 20, 800)
    $hTreeView = GUICtrlCreateTreeView(2, 120, 396, 268, $iStyle, $WS_EX_CLIENTEDGE)
    $hImage = _GUIImageList_Create(16, 16, 5, 3)
    _GUIImageList_AddIcon($hImage, "shell32.dll", 110)
    _GUIImageList_AddIcon($hImage, "shell32.dll", 131)
    _GUIImageList_AddIcon($hImage, "shell32.dll", 135)
    _GUIImageList_AddIcon($hImage, "shell32.dll", 136)
    _GUIImageList_AddIcon($hImage, "shell32.dll", 137)
    _GUIImageList_AddIcon($hImage, "shell32.dll", 138)
    _GUICtrlTreeView_SetNormalImageList($hTreeView, $hImage)

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

    _GUICtrlTreeView_BeginUpdate($hTreeView)
    For $x = 0 To _GUIImageList_GetImageCount($hImage) - 1
    $hItem[$x] = _GUICtrlTreeView_Add($hTreeView, 0, StringFormat("[%02d] New Item", $x + 1), $x, $x)
    For $y = 0 To _GUIImageList_GetImageCount($hImage) - 1
    $hItem[$y] = _GUICtrlTreeView_AddChild($hTreeView, $hItem[$x], StringFormat("[%02d] Child Item", $x + 1), $x, $x)
    Next
    Next
    _GUICtrlTreeView_EndUpdate($hTreeView)

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

    ;------------------------MENU FILE
    $filemenu = GUICtrlCreateLabel("File", 3, 0, 25, 15 )
    GUICtrlSetFont(-1, 10, 800)
    $filesDummy = GUICtrlCreateDummy()
    $fileContext = GUICtrlCreateContextMenu($filesDummy)
    $fileopen = GUICtrlCreateMenuItem("Background", $fileContext)
    GUICtrlCreateMenuItem("", $fileContext)
    $OptionsExit = GUICtrlCreateMenuItem("Exit", $fileContext)

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

    ;--------------------Menu EDIT
    $editmenu = GUICtrlCreatelabel("Edit", 33, 0, 30, 15)
    GUICtrlSetFont(-1, 10, 800)
    $editDummy = GUICtrlCreateDummy()
    $editContext = GUICtrlCreateContextMenu($editDummy)
    $editcopy = GUICtrlCreateMenuItem("Copy", $editDummy)
    $editpaste = GUICtrlCreateMenuItem("Past", $editDummy)

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

    ;---------------------MENU HELP
    $helpmenu = GUICtrlCreatelabel("Help", 63, 0, 35, 15 )
    GUICtrlSetFont(-1, 10, 800)
    $HelpDummy = GUICtrlCreateDummy()
    $HelpContext = GUICtrlCreateContextMenu($HelpDummy)
    $HelpWWW = GUICtrlCreateMenuItem("Website", $HelpContext)
    GUICtrlCreateMenuItem("", $HelpContext)
    $HelpAbout = GUICtrlCreateMenuItem("Help", $HelpContext)
    $helpregister = GUICtrlCreateMenuItem("License", $helpContext)

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

    ;-------------------LINE
    $line = GUICtrlCreateGraphic(0, 16,700,2)
    GUICtrlSetGraphic($line, $GUI_GR_LINE, 0,0)
    GUICtrlSetColor(-1, 0)
    ;-----------------ICONS
    GUICtrlCreateIcon("shell32.dll",-100,0,25,32,32,$SS_SUNKEN )
    GUICtrlCreateIcon("shell32.dll",-4,32,25,32,32,$SS_SUNKEN )
    GUICtrlCreateIcon("shell32.dll",-7,64,25,32,32,$SS_SUNKEN )
    $btn=GUICtrlCreateButton("TEST",220,220,50,20)
    $Slider1 = GUICtrlCreateSlider(10, 60, 158, 45)
    GUICtrlSetData($slider1, 90)
    WinsetTrans("Options", "", GUICtrlRead($slider1) * 2.55)

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

    GUICtrlSetLimit (-1, 100, 10)
    GUISetState(@SW_SHOW)

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

    for $a = 0 to 100
    sleep(1)
    WinSetTrans ("GUI","",$a*1.5)
    GUICtrlSetData($progressbar1, $a )
    GUICtrlSetData($w, $a& " %")
    next
    GUICtrlDelete($w)

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

    while 1
    sleep(1)
    $msg = GUIGetMsg()
    If $msg = $GUI_EVENT_CLOSE or $msg = $OptionsExit Then ExitLoop
    ;If $msg = $close Then ExitLoop
    if $msg =$filemenu then ShowMenu($2, $msg, $fileContext)
    if $msg =$helpregister then InputBox("License", "Type your license key",""," ",Default,Default,Default,Default,Default,$2)
    if $msg = $helpmenu then ShowMenu($2, $msg, $HelpContext)
    if $msg = $editmenu then ShowMenu($2, $msg, $editContext)
    if $msg = $fileopen then
    $var = FileOpenDialog("Select a file", @scriptDir & "\bin", "Images (*.jpg)", 1 ,"",$2 )
    GUICtrlSetImage($pic,$var)
    endif
    ;FileSelectFolder("Select","",6,"",$2)
    if $msg = $HelpAbout then msgbox(64,"Help","F6 Hide/Show Gui"& @crlf & "File/Background to change background",Default,$2)
    $a = GUICtrlRead ($Slider1) ; Ließt den aktuellen wert des Sliders aus.
    WinSetTrans ("GUI","",$a)
    GUICtrlSetData($progressbar1, $a )
    GUICtrlSetData($w, $a& " %")
    wend
    ; -------------- func
    func hide()
    GUISetState(@SW_HIDE,$1)
    GUISetState(@SW_HIDE,$2)
    HotKeySet ("{F6}", "show")
    endfunc

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

    func show()
    GUISetState(@SW_SHOW,$1)
    GUISetState(@SW_SHOW,$2)
    HotKeySet ("{F6}", "hide")
    endfunc

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

    ; Show a menu in a given GUI window which belongs to a given GUI ctrl
    Func ShowMenu($hWnd, $CtrlID, $nContextID)
    Local $arPos, $x, $y
    Local $hMenu = GUICtrlGetHandle($nContextID)

    $arPos = ControlGetPos($hWnd, "", $CtrlID)

    $x = $arPos[0]
    $y = $arPos[1] + $arPos[3]

    ClientToScreen($hWnd, $x, $y)
    TrackPopupMenu($hWnd, $hMenu, $x, $y)
    EndFunc ;==>ShowMenu

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

    ; Convert the client (GUI) coordinates to screen (desktop) coordinates
    Func ClientToScreen($hWnd, ByRef $x, ByRef $y)
    Local $stPoint = DllStructCreate("int;int")

    DllStructSetData($stPoint, 1, $x)
    DllStructSetData($stPoint, 2, $y)

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

    DllCall("user32.dll", "int", "ClientToScreen", "hwnd", $hWnd, "ptr", DllStructGetPtr($stPoint))

    $x = DllStructGetData($stPoint, 1)
    $y = DllStructGetData($stPoint, 2)
    ; release Struct not really needed as it is a local
    $stPoint = 0
    EndFunc ;==>ClientToScreen

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

    ; Show at the given coordinates (x, y) the popup menu (hMenu) which belongs to a given GUI window (hWnd)
    Func TrackPopupMenu($hWnd, $hMenu, $x, $y)
    DllCall("user32.dll", "int", "TrackPopupMenuEx", "hwnd", $hMenu, "int", 0, "int", $x, "int", $y, "hwnd", $hWnd, "ptr", 0)
    EndFunc ;==>TrackPopupMenu

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

    ; ----------------------------------------

    [/autoit]

    Hierzu benötigst du noch einen @scriptdir\bin in dem die Bilder abgelegt sind. Hier das Original ohne TreeView aber mit Bildern: Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

    Edit2: Spoiler2 ausgetauscht, hatte nur ein Fragment kopiert
    Edit3: Spoiler2 ist überholt siehe Post #19
    mfg (Auto)Bert

  • wer hilft mir bei meinem projekt !

    Hallo 10UR,

    Kann mir kaum vorstellen, das ein Fliesenleger dies so macht:

    Zitat

    ZB: 14 4ecke a 4x4cm und 3 4ecke a 6x6cm.

    Dies wäre schon vernünftiger:

    Zitat

    Es sollen am eine keine ungleichmäßigkeit da sein zb : ganz links hat das 4 eck 6x6 und am ende 4x4.

    Zu dem Problem geb ich dir folgende Hilfestellung, entwickel eine Formel, poste diese und ich setz sie dir diese dann in AutoIT-Code um. Du solltest aber unbedingt selbst auch die Hilfe lesen, dann kannst du es selbst lösen,

    mfg (Auto)Bert

  • in Listview TXT CSV Laden

    Hallo subzero007,

    Zitat

    Habe soweit mein grundgerüst fertig werde es noch weiter aufbauen so jetzt hänge ich am online check das durchsuchen fenster habe ich auch bereits öffnet sich auch kann die Txt auch auswählen aber wie komme ich es jetzt in die listbox computerliste reinlade?

    Schon mal in die Hilfe geschaut, da steht z.B. folgendes

    Zitat

    _GUICtrlListBox_AddString
    --------------------------------------------------------------------------------

    Fügt einen String hinzu


    #Include <GuiListBox.au3>
    _GUICtrlListBox_AddString($hWnd, $sText)

    ein Beispiel ist auch dabei,

    mfg (Auto)Bert

  • Neueste Dokumente kopieren

    Hallo jmewald,

    ich hab mal eine Listview-Routine auf dein Ergebnis.TXT angepasst,

    Spoiler anzeigen
    [autoit]

    #include <array.au3>
    #include <File.au3>
    #include <GUIConstantsEx.au3>
    #include<WindowsConstants.au3>
    #include <GuiListView.au3>

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

    Opt('GUIOnEventMode', 1)
    Opt('MustDeclareVars', 1)

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

    Local $hMainGui = GUICreate("Artikel",800, 580, 0, 0,BitOR($WS_MINIMIZEBOX, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
    GUISetOnEvent($GUI_EVENT_CLOSE, '_End')

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

    Global $hlstvwArtikel = GUICtrlCreateListView("Dateiname | Artikelnummer | Datum ", 2, 2, 796, 465,BitOR($LVS_REPORT,$LVS_NOSORTHEADER))
    GUICtrlSetResizing($hlstvwArtikel, $GUI_DOCKBORDERS)
    _einlesen()
    GUISetState()

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

    While 1
    Sleep(120)
    WEnd

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

    Func _End()
    GUIDelete($hMainGui)
    Exit
    EndFunc ;==>_End

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

    func _einlesen()
    Local $file, $line, $vline, $oline, $inhalt, $i, $found
    $file = FileOpen("Ergebnis.txt", 0)
    ; Prüfen, ob Datei eingelesen wurde
    If $file = -1 Then
    MsgBox(0, "Fehler", "Die Datei konnte nicht geöffnet werden.")
    Exit
    EndIf


    ; Zeilen des Textes einlesen bis EOF
    While 1
    $line = FileReadLine($file)
    If @error = -1 Then ExitLoop
    $line = StringReplace($line,",","|")
    $vline= StringSplit($line,"|")
    $i = 0
    $found = False
    Do
    if _GUICtrlListView_GetItemCount($hlstvwArtikel) = 0 then ExitLoop
    $oline = _GUICtrlListView_GetItemTextArray($hlstvwArtikel,$i)
    if $vline[2] = $oline[2] Then
    $found = True
    if $vline[3] > $oline[3] Then
    _GUICtrlListView_SetItemText($hlstvwArtikel,$i,$vline)
    ExitLoop
    EndIf
    EndIf
    $i = $i + 1
    Until $i > _GUICtrlListView_GetItemCount($hlstvwArtikel) - 1
    if not $found then GUICtrlCreateListViewItem($line,$hlstvwArtikel)
    ; MsgBox(0, "Zeile gelesen:", $line)
    WEnd
    FileClose($file)

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

    EndFunc

    [/autoit]

    , musst du noch testen (gibt Problem wenn Artikel-Nr. 0).

    mfg (Auto)Bert

  • Anfänger braucht dringend Hilfe ;(

    Hallo phosgen,

    wenn du die Daten anhand der Telefonnummer als Doppeleintrag erkennen möchtest, hast du das Problem, dass du nur einen einer Wohngemeinschaft aufnehmen kannst. Besser wäre es anhand Name, Adresse und Geburtsdatum festzustellen, ob dieser bereits eingepflegt ist. Falls du mehr Infos zu der benützten Software lieferst, fallen mir vielleicht auch noch andere einfache Lösungsvorschäge ein.

    mfg (Auto)Bert

  • Aus versehen alle versteckten Fenster sichtbar gemacht. Keylogger?

    Hallo zusammen,

    hab durch einen Programmierfehler alle unsichtbaren Fenster sichtbar gemacht (war eigentlich keine Absicht), jetzt seh ich viele Fenster von denen ich mir einige nicht erklären kann: Connenctionstray, speichert anscheinend Desktopinhalte (akttuell mit Hintergrundbild von AutoIT neues Thema erstellen, acroT_win_9plus ebenso, AcroStupUnloadClass ebenso, MS_WebCheckMonitor, Acrobat IEHelper ist transparent lässt sich nicht beenden, Notification Dialog, Hidden Fax Window, Director Extension, 8C4AE0DE, IGF_EXT_Wnd_Name, DirectECWnd, TouchPad object helper window, MCI command handling window, HKWndName, PersistWndName, Scite_SingleThreadExtension_Dispatcher, DDE Server Window, BackMain_Form wenn ich dieses in den Vordergrund hole werde ich mit Fenstern überschüttet eines davon ist DTS Connect mit Copyrightmeldung von DTS inc (ich hab nie irgendeine Software von denen instaliert).

    • Meine Fragen hierzu ist jetzt kennt jemand diese Fenster, damit ich zumindest die harmlosen ausschiessen kann.
    • Hab ich mir vielleicht einen Keylogger oder ähniches eingefangen (Viel Spaß mit den Passwörtern zum Zeitung lesen)
    • Welche Prozesse sind unbedingt nötig für XP, Internetzugang und AutoIT-Programmierung

    mfg (Auto)Bert

  • _EditBox UDF ermögicht Eingaben ähnlich einer InputBox

    Hallo @simon,

    dies ist ja der erste Ansatz, ich möchte es aber noch erweitern z.B. eine Art maskierte Eingabemöglichkeit für Text, bzw. für Zahlen dass man nur aus betsimmten Wertebereichen Eingaben zulässt, bin auch am überlegen ob es sinnvoll sein könnte mehrere Eingabefelder zu ermögichen. Die Editbox ist dann genauso sinnvoll wie die Inputbox, oder erstellst du für kleine Eingaberoutinen jedesmal eine eigene Gui,

    @progandy, freut mich, dass auch schon jemand anders, so eine Idee hatte, (dann kann es also nicht ganz sinnlos sein) auch wenn ich warscheins eher in Richtung Eingabekontrolle weitermache.

    @all warte immer noch auf Anregungen oder wird so ein Teil wirklich nicht benötigt,

    mfg (Auto)Bert

    PS.: Wer Rechtschreibfehler findet, soll diese bitte entschuldigen, hab leider meine Brille verlegt und Tippe wie ein blinder in der Hoffnung, dass ich treffe.