Beiträge von Cartan12

Cartan12

autoBert: Oh, diese Funktion habe ich mir noch nie angesehen... hab schon sowas wie das hier versucht :

Spoiler anzeigen

[autoit]

#include <GUIConstantsEx.au3>
#include <TreeViewConstants.au3>
#include <WindowsConstants.au3>
#include <GuiStatusBar.au3>

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

;----------------------------------------Variables-------------------------Start
Global $TV[6][7]
Global $CM_TV[6]
Global $var = 0
Global $var1
Global $var2
$TV[0][0] = 5
$TV[1][0] = 5
$TV[2][0] = 5
$TV[3][0] = 5
$TV[4][0] = 5
$TV[5][0] = 5

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

;----------------------------------------Variables---------------------------End

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

;----------------------------------------GUI-------------------------------Start
$GUI_mainWindow = GUICreate("Any GUI", 1000, 750, -1, -1)

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

;------Menu------Start
$M_datei = GUICtrlCreateMenu("Datei")
$MI_beenden = GUICtrlCreateMenuItem("Beenden", $M_datei)
;------Menu--------End

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

$butt = GUICtrlCreateButton("details",200,200)

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

;-----ListView---Start
GUICtrlCreateGroup("Kunden", 5, 0, 160, 330)
$TreeView = GUICtrlCreateTreeView(10, 20, 150, 300, BitOR($TVS_HASBUTTONS,$TVS_HASLINES,$TVS_LINESATROOT,$TVS_DISABLEDRAGDROP,$TVS_SHOWSELALWAYS,$WS_GROUP,$WS_TABSTOP,$WS_HSCROLL,$WS_VSCROLL,$WS_BORDER))
For $i = 1 To 5
$TV[$i][6] = GUICtrlCreateTreeViewItem("Ordner 1_"&$i, $TreeView)
For $x = 1 To 5
$TV[$i][$x] = GUICtrlCreateTreeViewItem("User "&$x&", Ordner "&$i, $TV[$i][6])
Next
Next
;-----ListView-----End

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

;-----LVMenu-----Start
For $i = 0 To 4
For $x = 1 To 5
$CM_TV[$i] = GUICtrlCreateContextMenu($TV[$i][$x])
GUICtrlCreateMenuItem("Detailansicht", $CM_TV[$i])
Next
Next
;-----LVMenu-------End

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

;-----StatusBar--Start
$StatusBar1 = _GUICtrlStatusBar_Create($GUI_mainWindow)
_GUICtrlStatusBar_SetSimple($StatusBar1)
_GUICtrlStatusBar_SetText($StatusBar1, "Any StatusBar text")
_GUICtrlStatusBar_SetMinHeight($StatusBar1, 20)
;-----StatusBar----End

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

GUISetState(@SW_SHOW, $GUI_mainWindow)

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

;//TODO
$GUI_detailWindow = GUICreate("Detailansicht", 750, 500, -1, -1)
GUISetState(@SW_HIDE, $GUI_detailWindow)
;----------------------------------------GUI---------------------------------End

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

;----------------------------------------Script----------------------------Start
While 1 * Sleep(10)
$nMsg = GUIGetMsg(1)
$treewahl = GUICtrlRead($TreeView)

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

Switch $nMsg[0]
Case $butt
For $i2 = 1 To $TV[0][0]
For $x2 = 1 To $TV[$i][0]
If $treewahl == $TV[$i2][$x2] Then
_meinefunktion($i2,$x2)
EndIf
Next
Next
Case $GUI_EVENT_CLOSE
If $nMsg[1] = $GUI_mainWindow Then
Exit
ElseIf $nMsg[1] = $GUI_detailWindow Then
GUISetState(@SW_HIDE, $GUI_detailWindow)
EndIf
Case $MI_beenden
Exit
EndSwitch
WEnd
Func _meinefunktion($var1 ,$var2 = "")
If $var2 == "" Then
MsgBox(0,"",$var1)
Else
MsgBox(0,"",$var1 & " " & $var2)
EndIf
EndFunc

[/autoit]

Cartan12

Ich wüde dir mfehlen, dass du im Array(z.B. $benutzer[10][10]) den eintrag $benutzer[0][0] als anzahl der Oberpunkte und jeweils $benuter[1][0],
$beuntzer[2][0] die anzahl der benuter in diesem Oberpunkt abspeicherst

Cartan12

Du meinst, du hast dann x Oberpunkte und x Unterpunkte?

Cartan12

Spoiler anzeigen

[autoit]

$butt = GUICtrlCreateButton("details",200,200)

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

While 1 * Sleep(10)
$nMsg = GUIGetMsg(1)
$treewahl = GUICtrlRead($TreeView)

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

Switch $nMsg[0]
Case $butt
If $treewahl == 8 Then
MsgBox(0,"","Oberpunkt 1")
EndIf
If $treewahl == 14 Then
MsgBox(0,"","Oberpunkt 2")
EndIf
If $treewahl == 22 Then
MsgBox(0,"","Oberpunkt 3")
EndIf
If $treewahl == 30 Then
MsgBox(0,"","Oberpunkt 4")
EndIf
If $treewahl == 38 Then
MsgBox(0,"","Oberpunkt 5")
EndIf
If $treewahl >= 9 And $treewahl <= 13 Then
MsgBox(0,"","Oberpunkt 1" & @CRLF & "Unterpunkt " & $treewahl -
EndIf
If $treewahl >= 15 And $treewahl <= 21 Then
MsgBox(0,"","Oberpunkt 2" & @CRLF & "Unterpunkt " & $treewahl - 14)
EndIf
If $treewahl >= 23 And $treewahl <= 29 Then
MsgBox(0,"","Oberpunkt 3" & @CRLF & "Unterpunkt " & $treewahl - 22)
EndIf
If $treewahl >= 31 And $treewahl <= 37 Then
MsgBox(0,"","Oberpunkt 4" & @CRLF & "Unterpunkt " & $treewahl - 30)
EndIf
If $treewahl >= 39 And $treewahl <= 45 Then
MsgBox(0,"","Oberpunkt 5" & @CRLF & "Unterpunkt " & $treewahl - 38)
EndIf
Case $GUI_EVENT_CLOSE
If $nMsg[1] = $GUI_mainWindow Then
Exit
ElseIf $nMsg[1] = $GUI_detailWindow Then
GUISetState(@SW_HIDE, $GUI_detailWindow)
EndIf
Case $MI_beenden
Exit
EndSwitch
WEnd

[/autoit]

Hier nochmal mit Funktion:

Spoiler anzeigen

[autoit]

While 1 * Sleep(10)
$nMsg = GUIGetMsg(1)
$treewahl = GUICtrlRead($TreeView)

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

Switch $nMsg[0]
Case $butt
If $treewahl == 8 Then
_meinefunktion(1)
EndIf
If $treewahl == 14 Then
_meinefunktion(2)
EndIf
If $treewahl == 22 Then
_meinefunktion(3)
EndIf
If $treewahl == 30 Then
_meinefunktion(4)
EndIf
If $treewahl == 38 Then
_meinefunktion(5)
EndIf
If $treewahl >= 9 And $treewahl <= 13 Then
_meinefunktion(1,$treewahl -
EndIf
If $treewahl >= 15 And $treewahl <= 21 Then
_meinefunktion(1,$treewahl - 14)
EndIf
If $treewahl >= 23 And $treewahl <= 29 Then
_meinefunktion(1,$treewahl - 22)
EndIf
If $treewahl >= 31 And $treewahl <= 37 Then
_meinefunktion(1,$treewahl - 30)
EndIf
If $treewahl >= 39 And $treewahl <= 45 Then
_meinefunktion(1,$treewahl - 38)
EndIf
Case $GUI_EVENT_CLOSE
If $nMsg[1] = $GUI_mainWindow Then
Exit
ElseIf $nMsg[1] = $GUI_detailWindow Then
GUISetState(@SW_HIDE, $GUI_detailWindow)
EndIf
Case $MI_beenden
Exit
EndSwitch
WEnd
Func _meinefunktion($var1 ,$var2 = "")
If $var2 == "" Then
MsgBox(0,"",$var1)
Else
MsgBox(0,"",$var1 & " " & $var2)
EndIf
EndFunc

[/autoit]

Cartan12

Ach so, ja da kannst du doch so was wie

[autoit]

$x = "Hallo"
$i = "Welt"
Func meinefunktion($x ,$i)
MsgBox(0,"",$x)
MsgBox(0,"",$i)
EndFunc

[/autoit]

machen...

Cartan12

Kannst du bitte den ganzen Code posten, denn es schwer dir zu helfen, wenn du uns nur Codefragmente gibst...

Cartan12

Eine Alternative wäre die Chatbox UDF von Oscar:
Chatbox-UDF

Cartan12

Achso... da wäre es doch am besten die I-Net seite zu scollen, oder?

Cartan12

Wäre es nicht einfacher, wenn du die Daten per FTPEx.au3 überträgst?

100 Post!!!

Cartan12

Ne ich glaube das liegt an mir... ich verstehe nicht was du meinst. Sichtbarer Teil bedeutet für mich ganzer Bildschirm und die ganze internetseite ist doch dadrauf, oder? Willst du jetzt nur das Browserfenster ohne Taskleiste?

Cartan12

Was meinst du mit "wieder nur von sichtbaren Teil"? Willst du Screenshots von den Fenstern haben, die im Hintergrund laufen, oder einen Screenshot von einem Teil des Fensters?

Cartan12

Oh, ihr habt Recht... Wie dumm von mir :pinch:

Cartan12

So eins hab ich noch:

[autoit]

#include <ScreenCapture.au3>

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

WinActivate("[ offen ] Einfache Variante für unzugängliche Koordinaten")
Sleep(1000)
_ScreenCapture_Capture(@ScriptDir & "\test.jpg")

[/autoit]

Cartan12

So, das hier MUSS aber funktionieren(Mit Firefox, oder Internet Explorer). Du musst einfach nur diese seite im hintergrund offen haben:

[autoit]

#include <ScreenCapture.au3>

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

$han = WinGetHandle("[ offen ] Einfache Variante für unzugängliche Koordinaten - Hilfe & Unterstützung - .: autoit.d - Windows Internet Explorer")
MsgBox(0,"",$han)
_ScreenCapture_CaptureWnd(@ScriptDir & "\test.jpg", $han)
$han = WinGetHandle("[ offen ] Einfache Variante für unzugängliche Koordinaten - Hilfe & Unterstützung - .: autoit.de :. - Das deutsche AutoIt-Forum - Mozilla Firefox")
MsgBox(0,"",$han)
_ScreenCapture_CaptureWnd(@ScriptDir & "\test2.jpg", $han)

[/autoit]

Cartan12

Probier das mal bitte: (Stell sicher, das die Festplatte C:\ im hintergrund offen ist)

[autoit]

#include <ScreenCapture.au3>

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

$han = WinGetHandle("C:\")
MsgBox(0,"",$han)
_ScreenCapture_CaptureWnd(@ScriptDir & "\test.jpg", $han)

[/autoit]

Cartan12

Code klappt auch nur, wenn firefox auf der "Hilfe & Unterstützung"-Seite ist

edit: Ach ja und

[autoit]

#include <ScreenCapture.au3>

[/autoit]

fehlt noch

Cartan12

Erstmal wieder die Standardfrage: Wofür brauchst du das? (könnte ja ein Bot sein, wie wir hier schon oft hier erlebt haben)
Tut mir leid, aber das müssen wir fragen

Cartan12

Den Screenshot machst du so:

[autoit]

$han = WinGetHandle("Hilfe & Unterstützung - .: autoit.de :. - Das deutsche AutoIt-Forum - Mozilla Firefox")
MsgBox(0,"",$han)
_ScreenCapture_CaptureWnd(@ScriptDir & "\test.jpg", $han)

[/autoit]

Cartan12

Ja, bei allen, die im Hintergrund laufen.

Cartan12

[autoit]

If $Array[5] == "" Then MsgBox(0,"!","$Array[5] existiert nicht!")

[/autoit]

Beiträge von Cartan12

Prob mit Array in einer For-Schleife und GUIGetMsg()

Prob mit Array in einer For-Schleife und GUIGetMsg()

Prob mit Array in einer For-Schleife und GUIGetMsg()

Prob mit Array in einer For-Schleife und GUIGetMsg()

Prob mit Array in einer For-Schleife und GUIGetMsg()

Prob mit Array in einer For-Schleife und GUIGetMsg()

RichEdit font dauerhaft ändern

Einfache Variante für unzugängliche Koordinaten

Post Request via WinHTTP.au3 / HTTP.au3

Einfache Variante für unzugängliche Koordinaten

Einfache Variante für unzugängliche Koordinaten

Variable zu Array...

Einfache Variante für unzugängliche Koordinaten

Einfache Variante für unzugängliche Koordinaten

Einfache Variante für unzugängliche Koordinaten

Einfache Variante für unzugängliche Koordinaten

klick mit rechter maustase auf eine stelle

Einfache Variante für unzugängliche Koordinaten

Einfache Variante für unzugängliche Koordinaten

Variable zu Array...