Ich wollte, dass entweder das kleine Fenster zu sehen ist, oder das TrayIcon. Mit Strg+Alt+m kannst du ja das Programm minimieren, dann wird auch das Icon wieder sichtbar.
Natürlich kannst du das Programm so anpassen wie es dir am besten gefällt. 
Beiträge von funkey
-
-
PixelChecksum generiert eine Checksumme der Farben in dem Bereich den du auswählst. Ändert sich die Farbe von nur einem Pixel in dem Bereich, dann ist auch die Checksumme eine andere.
Edit: Außer der Step-Parameter ist größer als 1
-
Dann reicht das vollkommen aus:
[autoit]GUICtrlSetState($TreeView1_0, $GUI_EXPAND)
[/autoit] -
Hab mir da jetzt was gebastelt, kannst vllt jemand brauchen. Nur den $html -String anpassen!
Spoiler anzeigen
[autoit]#NoTrayIcon
[/autoit] [autoit][/autoit] [autoit]
#include <WindowsConstants.au3>
#include <GUIConstants.au3>
#include <IE.au3>Opt("GUIOnEventMode", 1)
[/autoit] [autoit][/autoit] [autoit]
Opt("TrayOnEventMode", 1)
Opt("TrayMenuMode", 1)HotKeySet("^!q","_Ende")
[/autoit] [autoit][/autoit] [autoit]
HotKeySet("^!m","_Minimieren")$ende = TrayCreateItem("Ende")
[/autoit] [autoit][/autoit] [autoit]
TrayItemSetOnEvent( -1, "_Ende")
$anzeigen = TrayCreateItem("Wieder anzeigen")
TrayItemSetOnEvent( -1, "_anzeigen")$html = '<table cellspacing="1" cellpadding="0" border="0" style="background-color:'
[/autoit] [autoit][/autoit] [autoit]
$html &= '#042C50" width="122"><tr><td align="center" style="background-color : #042C50;">'
$html &= '<a href="http://www.meteo24.de/wetter/43X1198604.html" style="text-decoration: none;" '
$html &= 'target="_blank"><font face="Verdana" size="1" color="#FFCC00" style="text-decoration: none; '
$html &= 'font-weight: bold;">Wetter Zellberg</font></a></td></tr><tr><td align="center"><iframe width="120" '
$html &= 'height="98" scrolling="no" frameborder="0" src="http://www.meteo24.de/hptool/v1?cid=43X1198604&l=de&style=9">'
$html &= ' </iframe></td></tr><tr><td align="center" height="15" style="background-color : #042C50;"><a href="http://www.meteo24.de/" '
$html &= 'style="text-decoration: none;" target="_blank"><font face="Verdana" size="1" color="#FFCC00">© meteo24.de</font></a></td></tr></table>'Do
[/autoit] [autoit][/autoit] [autoit]
$html_file = @TempDir & "\temp" & Hex(Random(0, 65535), 4)
Until Not FileExists($html_file)
FileWrite($html_file, $html)GUICreate("Hallo",124,114, -1, -1, $WS_POPUP, BitOR($WS_EX_TOOLWINDOW, $WS_EX_TOPMOST))
[/autoit] [autoit][/autoit] [autoit]
GUISetOnEvent($GUI_EVENT_PRIMARYDOWN, "_Move")$oIE = _IECreateEmbedded()
[/autoit] [autoit][/autoit] [autoit]
$GuiActicex = GUICtrlCreateObj($oIE, -11, -16, 200, 200)
_IENavigate ($oIE, $html_file)
GUISetState()While 1
[/autoit] [autoit][/autoit] [autoit]
Sleep(10)
WEndFunc _Move() ; Danke eukalyptus für diese Funktion
[/autoit] [autoit][/autoit] [autoit]
Local $DifX, $DifY, $MouseData = GUIGetCursorInfo(@GUI_WinHandle)
Local $WinPos = WinGetPos(@GUI_WinHandle)
Local $MPos = MouseGetPos()
$DifX = $MPos[0] - $WinPos[0]
$DifY = $MPos[1] - $WinPos[1]
While $MouseData[2]
$MPos = MouseGetPos()
$WinPos = WinGetPos(@GUI_WinHandle)
If ($WinPos[0] <> ($MPos[0] - $DifX)) Or ($WinPos[1] <> ($MPos[1] - $DifY)) Then
WinMove(@GUI_WinHandle, '', $MPos[0] - $DifX, $MPos[1] - $DifY)
EndIf
Sleep(15)
$MouseData = GUIGetCursorInfo(@GUI_WinHandle)
WEnd
EndFuncFunc _Minimieren()
[/autoit] [autoit][/autoit] [autoit]
GUISetState(@SW_HIDE)
Opt("TrayIconHide",0)
EndFuncFunc _anzeigen()
[/autoit] [autoit][/autoit] [autoit]
GUISetState(@SW_SHOW)
Opt("TrayIconHide",1)
EndFuncFunc _Ende()
[/autoit]
GUIDelete()
Exit
EndFunc -
Vllt mit
[autoit]_GUICtrlTreeView_Expand
[/autoit]
-
Ist mir auch aufgefallen, dass dieser Link nicht geht!
Aber der andere geht zum Glück_ResizeCtrl.au3
-
Einfach alles deaktiviert bis nicht mehr anderes übrig blieb, und natürlich testen, testen, testen.
Freut mich dass es funktioniert!
-
Ich habe es hinbekommen. '[CLASS: PCHAxWin; INSTANCE:1]' hat sich über alles drübergelegt, sodass der neue Button nur im Hintergrund erstellt wurde und nicht sichtbar war.
Jetzt geht's auf alle Fälle. Die Funktionen aus meiner AnyGui UDF heißen zwar anders, das dürfte für dich aber kein Problem sein.Spoiler anzeigen
[autoit]#include <GuiConstants.au3>
[/autoit] [autoit][/autoit] [autoit]
#include "ANYGUIv2.8a.au3"$title = "Hilfe- und Supportcenter"
[/autoit] [autoit][/autoit] [autoit]ShellExecute("hcp://CN=Microsoft%20Corporation,L=Redmond,S=Washington,C=US/Remote%20Assistance/Escalation/Unsolicited/unsolicitedrcui.htm")
[/autoit] [autoit][/autoit] [autoit]
WinWaitActive($title)ControlHide($title, "","[CLASSNN:ToolbarWindow321]")
[/autoit] [autoit][/autoit] [autoit]
;~ ControlHide($title, "","[CLASSNN:ReBarWindow321]")
ControlHide($title, "","[CLASS:PCHAxWin; INSTANCE:1]")$handle = _GuiTarget($title,1)
[/autoit] [autoit][/autoit] [autoit]
$Button1 = _TargetaddButton("Hier war früher mal was anderes :)", 0, 0, 952 ,30)
GUISetState ( @SW_SHOW )While WinExists($title)
[/autoit]
$msg = GuiGetMsg()
If $msg = $Button1[0] Then
MsgBox(0,"Test","Dein neuer Button wurde gedrückt!")
EndIf
WEnd
_EndTarget() -
Wir haben hier leider nicht viel Erfahrung mit der ANYGUIv2.8a.au3 siehe AnyGUI.au3.
Könntest du mal bitte deine AnyGui UDF hier posten? Mit meiner Version krieg ich's auch nicht hin, hab das aber auch noch nie gemacht. Ich denke das liegt am Internet Explorer, der mag sowas wahrscheinlich nicht
-
Also beim angegebenen Fenster funktioniert's so:
[autoit]ControlHide("Hilfe- und Supportcenter","","[ClassNN:ToolbarWindow321]")
[/autoit] -
Du musst Sleep(1000) schreiben , also Klammern nicht vergessen.
-
Ich würde gerne helfen, habe aber die 'Remoteunterstützung' nicht installiert, oder wie finde (öffne) ich dieses Fenster? (habe XP Prof. SP2)
-
Probier mal diese beiden Dateien zu includen:
[autoit]#include <WindowsConstants.au3>
[/autoit]
#include <StaticConstants.au3> -
Auch von mir alles Gute zum Geburtstag Xeno! Bleib so hilfsbereit wie du bist.
-
'TopBottom' heißt für mich, dass alle anderen Fenster darüberliegen. Demnach habe ich das WinList-Beispiel mal ein wenig verändert um alle anderen Fenster einfach mal in den Vordergrung zu bringen. Ich finde das zwar sinnlos, aber vllt ist es ja genau das, was du brauchst.
[autoit]Opt("WinWaitDelay",0)
[/autoit][autoit][/autoit][autoit]$var = WinList()
[/autoit][autoit][/autoit][autoit]
$Bottom = 'Rechner' ;Trage hier den vollständigen Fenstertitel ein, von dem Fenster das am weitesten hinten sein soll!For $i = $var[0][0] To 1 Step -1
[/autoit][autoit][/autoit][autoit]
If $var[$i][0] <> "" AND IsVisible($var[$i][1]) And $var[$i][0] <> $Bottom Then
WinActivate($var[$i][0])
WinWaitActive($var[$i][0])
EndIf
NextFunc IsVisible($handle)
[/autoit]
If BitAnd( WinGetState($handle), 2 ) Then
Return 1
Else
Return 0
EndIf
EndFunc -
Schau dir den Quelltext der Seite an und überleg dir wie du am besten den Link herausfiltern kannst.
Du wirst vllt folgende Befehle brauchen: _IEBodyReadHTML, StringInStr, _StringBetween, StringMid, StringTrimLeft usw.
Viel Glück, ich kann es jetzt nicht testen, hab aber schon ähnliche Skripte erfolgreich gemacht.
-
Von ProcessList() erhälst du ein 2-dimensionales Array, das du am besten mit _ArrayDisplay anzeigen lässt.
[autoit]
Die 1. Dimension enthält die Prozessnamen, die 2. die Prozess-ID.
Im unten folgenden Beispiel erstelle ich noch ein 1D-Array nur mit den Prozessnamen, das ich dann verwende um diese in die Datei Prozesse.txt zu schreiben.#Include <File.au3>
[/autoit][autoit][/autoit][autoit]
#Include <Array.au3>Local $Prozesse = ProcessList()
[/autoit]
_ArrayDisplay($Prozesse)
Local $exe[$Prozesse[0][0]]
For $i = 0 To UBound($exe) -1
$exe[$i] = $Prozesse[$i+1][0]
Next
_FileWriteFromArray('Prozesse.txt', $exe) -
[autoit]
Processlist()
[/autoit] -
Geht doch super
[autoit]
Man kann send-Befehle auch zusammenfassen$kontoname = 'Funkey'
[/autoit]
Send($kontoname&"{TAB}kundennummer{TAB 2}anrede{TAB}vorname{TAB}nachname{TAB 6}{ENTER}")Edit: Alles Variable:
[autoit]$Kontoname = 'Funkey'
[/autoit][autoit][/autoit][autoit]
$Kundennummer ='0815'
$Anrede = 'Herr'
$Vorname = 'funkey'
$Nachname = 'fun'Send($Kontoname&"{TAB}"&$Kundennummer&"{TAB 2}"&$Anrede&"{TAB}"&$Vorname&"{TAB}"&$Nachname&"{TAB 6}{ENTER}")
[/autoit]P.S.: Schau dir mal die Befehle ControlSend und ControlSetText an, dann brauchst du nicht mit dem Tabulator durch die Gegend zu springen, vorausgesetzt du gibst die Daten nicht in den IE ein, dann brauchst du _IEFormElementSetValue.
-
Hab den Fehler entdeckt:
IE7-Titel : 'Windows Internet Explorer'
IE6-Titel : 'Microsoft Internet Explorer'