Beiträge von MrB

  • String Fragen

    Moin zusammen,

    Wahrscheinlich einfache Frage aber ich finde nix,

    Wie ersetze ich alles Buchstaben bzw Zahlen aus einem String ?? Hab mir zwar alle String Befehle angeschaut und auch was gefunden (denke ich) nur bekomme ich´s nicht hin

    [autoit]

    $ping[$i] = StringRegExpReplace($ping[$i],"/D","",1)

    [/autoit]

    Soll alle Buchstaben ersetzen. Macht gelinde gesagt nix, welches mir sagt das ich was falsch mache ;(

    Kann mir das mal einer erklären pls

    P.S.: Der String sieht folgendermaßen aus : Abcd1234 und alles Buchstaben sollen weg.

  • Mal wieder ListView Probleme

    Moin,

    Wie schon gesagt geht es um ein ListView ! Nur nebenbei, ich hasse die Dinger :cursing: . Die wollen einfach nicht bei mir in den Schädel. Naja, vielleicht bald.

    Also mein ListView wird folgendermaßen erstellt:

    [autoit]

    $aButton[38] = GUICtrlCreateListView("1|2|3 ", 480, 210, 310, 300, BitOR($LVS_EX_HEADERDRAGDROP, $LVS_EX_GRIDLINES))
    GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 0, 40)
    GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 1, 40)
    GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 2, 220)

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

    For $i = 1 To $string2[0] Step 3
    $string2[$i] = StringReplace($string2[$i], "|", "-#-")

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

    GUICtrlCreateListViewItem($string2[$i] & "|" & $string2[($i + 1)] & "|" & StringReplace($string2[($i + 2)], "|", "-#-"), $aButton[38])
    Next

    [/autoit]

    So und nun möchte ich das z.B. bei einem Doppelklick auf eine Zelle (z.B. Zeile 2 Spalte 3) der Inhalt ausgelesen wird,damit ich ihn weiterverarbeiten kann. Ich hab da schon alles mögliche und auch unmögliche probiert - Es will nicht.

    PLS HELP

  • Script Fehler nach Exe erstellung

    @All

    Sry, lag einfach daran das ich unsauber programmiert hatte, welches bei Win7 nichts machte, da ich da die Dateien schon automatisch an der richtigen stelle hatte. Hab mir jetzt mit VMWare mal ein XP aufgesetzt und die Fehler gefunden. Bin einfach nicht drauf gekommen mal ein XP aufzusetzen und es dann zu testen. Manchmal ist man halt vernagelt grrrr..

    @PokerFace

    Stimmt. Bei XP gab´s $line[2] nicht. Fehler gefunden und behoben.

    autoBert

    Hast recht ist besser so. Hab´s geändert THX

  • Script Fehler nach Exe erstellung

    Ja, schon klar :D . Hab da nur einiges drin stehen, was nicht unbedingt für die Allgemeinheit gedacht ist. Bin aber schon soweit das ich sagen kann das es an folgender Funktion liegt :

    [autoit]

    Func fullinfo()
    $file = FileOpen($pfadconfig, 0)
    $line = FileReadLine($file, 274)
    FileClose($file)
    $line2 = StringSplit($line, "" & Chr(34))
    _ArrayDisplay($line2)
    If IsArray($line2) Then
    If $line2[2] = 1 Then
    $full = "JA"
    Else
    $full = "NEIN"
    EndIf
    Return $full
    Else
    MsgBox(0, "Fehler", "Array Fehler: Func fullinfo()")
    EndIf

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

    EndFunc ;==>fullinfo

    [/autoit]

  • Script Fehler nach Exe erstellung

    Moin zusammen,

    Hab da einen Fehler, wo ich nicht weis, wie ich den eingrenzen soll. Vorab: Die Exe funktioniert auf Vista und Win7 ohne Probleme ! Wenn ich die aber auf WinXP Prof. laufen lasse bekomme ich immer folgende Meldung :

    Line 4226: (File: usw.)
    Error: Array variable has incorrect number of subscripts or subscript dimension range exceeded.

    Finde aber keinen Fehler bei den Array Variablen und warum tritt der Fehler nur bei XP auf ?

    Bekomm ich irgendwie raus was mit Line 4226 genau gemeint ist ?

  • existierendes Fenster -> Style ändern

    Hmm, irgendwie kapier ich das nicht. Wofür brauch ich _WinAPI_GetWindowLong ?

    [autoit]


    $handle2 = WinGetHandle("Dokument1 - Microsoft Word")
    _WinAPI_SetWindowLong($handle2, $GWL_STYLE, $WS_POPUP)

    [/autoit]

    oder auch mal so

    [autoit]


    $handle2 = WinGetHandle("Dokument1 - Microsoft Word")
    $style = _WinAPI_GetWindowLong($handle2, $GWL_STYLE)
    _WinAPI_SetWindowLong($handle2, $style, $WS_POPUP)

    [/autoit]

    So hab ich jetzt mal mit Word getestet, aber außer das Word abschmiert passiert nix bzw. es passiert überhaupt gar nix.

    Da fehlt mir der Grips X(

  • Nicht sichtbare GUI

    Raupi

    Du meinst für den Vordergrund oder?

    [autoit]

    GUISetState(@SW_SHOW, $pic)
    GUISetState(@SW_DISABLE, $hGUI)
    WinSetOntop($hGUI,"",1)

    [/autoit]

    Damit ist die GUI aber nicht komplett deaktiviert. Wenn ich mit der Maus drüber gehe und klicke usw.

  • Nicht sichtbare GUI

    Raupi

    Funktioniert einwandfrei. Dickes Danke !!!!!

    Natürlich auch an alle anderen!

    Wenn mir jetzt noch einer sagt, wie ich es hinbekomme das das Bild immer im Vordergrund ist, seit ihr mich los ^^. Bin da im Moment dran, nur das Ding haut immer ab wenn ich irgend ein anderes Fenster aktiviere und es soll immer, egal was passiert, im Vordergrund sein.

    P.S.: Vergesst es, Wie ich auf senden geklickt, kam ich von selber drauf:

    [autoit]

    WinSetOnTop("fk", "", 1)

    [/autoit]

    Aber schon das nächste. wie bekomme ich das Fenster komplett deaktiviert ? Mit

    [autoit]

    GUISetState(@SW_DISABLE, $hGUI)
    GUISetState(@SW_LOCK, $hGUI)

    [/autoit]

    Ist es nicht komplett deaktiviert.

  • Nicht sichtbare GUI

    Raupi

    Nein natürlich nicht, grrr. hätte ich auch sagen können. Hatte das Bild halt als png da, sry.

    Greek

    Jetzt ist das weiße Viereck (GUI) schwarz. Muss ich irgendeine spezielle Version von irgendwas haben ? Gut ausgedrückt, nicht wahr.

  • Nicht sichtbare GUI

    Hmm immer noch nicht das was ich meine. Normalerweise ist der Bereich um den Ball nicht sichtbar (im png als transparent). Nur wie man sieht ist da noch ein Rechtecke zu sehen und genau das soll weg und zwar so das nur der Ball zu sehen ist und sonst nichts.

  • Nicht sichtbare GUI

    Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

    Erstmal THX an alle'!

    Raupi

    Bild ist oben ^^

    autoBert

    Außer mit der Var $path, hab ich keine Änderung gefunden (Seh wahrscheinlich nix mehr :) ). Mit deinem Script hab ich aber auch das Problem das der Hintergrund (GUI) weiß ist.

    oetzn
    Werd ich machen

    So, hab ich mir angesehen und funktioniert auch nicht. Geht das nicht nur mit .jpg. Mein hätte ich mal irgendwo gelesen

  • Nicht sichtbare GUI

    Hallo zusammen,

    Hab da mal wieder was.

    Und zwar möchte ich ein PNG Bild anzeigen aber ohne ein sichtbare GUI, also wirklich nur das reine Bild. Nur irgendwie bekomme ich das nicht hin. Bekomme die GUI nicht transparent.

    Hier mal mein Stand im Mom der nicht funktioniert:

    [autoit]

    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #include <GDIPlus.au3>
    #include <WinAPI.au3>

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

    Global $hGUI, $hImage, $hGraphic

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

    $x = x()
    $y = y()

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

    $hGUI = GUICreate("fk", $x, $y, (@DesktopWidth / 2) - 132, (@DesktopHeight / 2) - 132, $WS_POPUP, $WS_EX_TRANSPARENT)

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

    _GDIPlus_Startup()
    $hImage = _GDIPlus_ImageLoadFromFile("c:\fk.png")
    $hGraphic = _GDIPlus_GraphicsCreateFromHWND($hGUI)

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

    GUIRegisterMsg($WM_PAINT, "MY_WM_PAINT")

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

    GUISetState(@SW_SHOW)

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

    While 1

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

    HotKeySet("^!x", "MeinExit")

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

    $msg2 = GUIGetMsg()

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

    Select
    Case $msg2 = $gui_event_close
    Exit
    EndSelect
    WEnd

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

    ; Ressourcen aufräumen
    _GDIPlus_GraphicsDispose($hGraphic)
    _GDIPlus_ImageDispose($hImage)
    _GDIPlus_Shutdown()

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

    ; PNG Bild zeichnen
    Func MY_WM_PAINT($hWnd, $msg, $wParam, $lParam)
    _WinAPI_RedrawWindow($hGUI, 0, 0, $RDW_UPDATENOW)
    _GDIPlus_GraphicsDrawImage($hGraphic, $hImage, 0, 0)
    _WinAPI_RedrawWindow($hGUI, 0, 0, $RDW_VALIDATE)
    Return $GUI_RUNDEFMSG
    EndFunc ;==>MY_WM_PAINT

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

    Func x()
    _GDIPlus_Startup()
    $hImage = _GDIPlus_ImageLoadFromFile($path)
    $x = _GDIPlus_ImageGetWidth($hImage)
    _GDIPlus_ImageDispose($hImage)
    _GDIPlus_Shutdown()
    Return $x
    EndFunc ;==>x

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

    Func y()
    _GDIPlus_Startup()
    $hImage = _GDIPlus_ImageLoadFromFile($path)
    $y = _GDIPlus_ImageGetHeight($hImage)
    _GDIPlus_ImageDispose($hImage)
    _GDIPlus_Shutdown()
    Return $y
    EndFunc ;==>y

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

    Func MeinExit()
    Exit
    EndFunc

    [/autoit]

    Alles ein wenig zusammen gewürfelt :-(.

    Bild wird angezeigt nur ist halt die GUI nicht transparent. Hab dann mal das hier von BugFix gefunden, komme damit aber definitiv nicht klar.

    Kann mir da einer helfen?