Also wenn sich das Irrlicht Device nicht auf aktive/inaktive prüfen lässt könnte man alle anderen Fenster prüfen (Winlist usw.).
In _Bild_Suche gibts jede Menge nicht deklarierter Variablen (Scite meckert auch).
P.S. Wo entstehen die fliegenden Würfel? Steige bei der Irrlicht Funktion noch nicht so durch ...
Bei mir funktioniert das Blättern leider nicht.
Ansonsten aber sehr nett.
edit \ Ähm sorry natürlich funktionierts, rechte und linke Taste verwechselt 
Vielleicht wäre es sinnvoll ein etwas anderes Gui Konzept zu wählen.
z.B. ein Listview in dem alle Sender aufgelistet werden.
Dazu den Ordner mit den .asx Dateien und eine .txt für die Direktlinks.
So kann jeder einfach neue Links einfügen und du musst nicht mit den Buttons darauf reagieren.
Ist genau der richtige Befehl dafür.
Und es funktioniert auch wie erwartet (kannst ja mal deine Werte ins Hilfe Beispiel eintragen).
Stellt sich nur die Frage wie man das am besten Bewerten soll.
Für ein vorgefertigtes Testskript lässt sich sicherlich schnell eine gute Optimierung finden.
Bei zufälligen Testskripten kann die Bewertung je nach Vorgehensweise auch extrem schwanken.
Lesbar/unlesbar ist imho eher eine Frage des Know-how. Sobald man die Vorgehensweise der Optimierung verstanden hat, versteht man auch den Code.
Hm also bei mir funktionierts.
Möglicherweise sind in deinem Verzeichnis eben keine Dateien älter als "X" Tage?
#include <date.au3>
global $Dir = "" ;Verzeichnis eintragen
global $delday = 5 ; alle Dateien älter als 5 Tage werden ausgegeben (gelöscht)
_clean($dir, $delday)
Func _clean($cleandir, $cleanday)
Local $afile, $tfile, $sfile
$hSearch = FileFindFirstFile($cleandir & "*.*")
While (True)
$tfile = FileFindNextFile($hSearch)
If @error Then ExitLoop
$afile = FileGetTime($cleandir & "\" & $tfile, 1, 0) ;Zeitstempel der Datei bestimmen
$sfile = StringFormat("%04d/%02d/%02d %02d:%02d:%02d", $afile[0], $afile[1], $afile[2], $afile[3], $afile[4], $afile[5]) ;ins richtige Format für _Datediff bringen
$diff = _DateDiff( 'D',$sfile,_NowCalc()) ;Vergleich Zeitstempel mit dem heutigem Datum
If $tfile <> "" and $Diff >= $cleanday then ; wenn ... und $Diff >= als der "Cleanday" ist dann ...
;FileDelete($cleandir&"\"&$tFile) ; gleich löschen ist etwas hart als Beispiel
ConsoleWrite($cleandir&"\"&$tFile & @crlf)
Endif
WEnd
FileClose($hSearch)
EndFunc
So geht das.
Man könnte auch als "Cleanday" ein richtiges Datum eingeben und mit _Datediff darauf prüfen.
Geht wohl nicht? 
Hab hier was gefunden: http://msdn.microsoft.com/de-de/library/…iew(VS.80).aspx
Gibts dazu ne UDF?
Das geht gar nicht oder? Es kommt immer diese -1 Line Anzeige.
Wirklich nötig ist das aber auch nicht, verbessere lieber dein Errorhandling!
Mit dem Doppelbuffer gehts 
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <GDIPlus.au3>
Global $width = 302
Global $height = 302
$hGUI = GUICreate("BlueJ Figuren Demo", $width, $height)
$hWnd = WinGetHandle($hGUI)
;~ GUISetBkColor(0, $hGUI)
;~ GUISetBkColor(0xFFFFFF, $hGUI)
;~ WinSetTrans($hGUI, "", 255)
GUISetState(@SW_SHOW)
_GDIPlus_Startup()
$hGraphic = _GDIPlus_GraphicsCreateFromHWND($hWnd)
$Bitmap = _GDIPlus_BitmapCreateFromGraphics($width, $height, $hGraphic) ;create bitmap
$backbuffer = _GDIPlus_ImageGetGraphicsContext($bitmap)
_GDIPlus_GraphicsSetSmoothingMode($hGraphic, 2)
$hBrush = _GDIPlus_BrushCreateSolid(0xFFFFFF00)
_GDIPlus_GraphicsClear($hGraphic)
_GDIPlus_GraphicsFillPie($hGraphic, $width / 2 - 60 / 2, $height / 2 - 60 / 2, 60, 60, 1, 360, $hBrush)
Local $a = 1
[/autoit] [autoit][/autoit] [autoit]While GUIGetMsg() <> $GUI_EVENT_CLOSE
_GDIPlus_GraphicsClear($backbuffer)
_GDIPlus_GraphicsClear($backbuffer)
_GDIPlus_GraphicsFillPie($backbuffer, $a, 50, 60, 60, 1, 360, $hBrush)
_GDIPlus_GraphicsDrawImageRect($hgraphic, $bitmap, 0, 0, $width, $height)
$a += 1
Sleep(10)
WEnd
"Irgendwie" geht das schon, kenne verschiedene Programme die sowas eingebaut haben.
Nur ob das dann auch ein standard Listview wie in Autoit ist?
Hier mal ein Beispiel zum Spielen und die .ini einzulesen:
#include <GUIConstantsEx.au3>
#include <GuiListView.au3>
#include <WindowsConstants.au3>
#include <Array.au3>
#include <File.au3>
global $ini = "" ;Pfad zur ini
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]$Form1 = GUICreate("Ini read to Listview - Beispiel", 700, 500, -1, -1)
$ListView1 = GUICtrlCreateListView("", 20, 20,660 , 350)
$hlistview= GUICtrlGetHandle($ListView1)
_GUICtrlListView_AddColumn($hListView, "Key", 200)
_GUICtrlListView_AddColumn($hListView, "Value", 450)
$Button2 = GUICtrlCreateButton("Iniread", 20, 420, 120, 33, 0)
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
case $Button2
_Initoliostview($hlistview, $ini)
EndSwitch
WEnd
Func _Initolistview($hwnd, $path)
; nuts (http://www.autoit.de)
;$hwnd = Handle to the listview
;$path = ini path
local $anames, $aread
If not IsHWnd($hwnd) then
SetError(1) ;not a handle -> @error = 1
Return
ElseIf not FileExists($path) then
SetError(2) ;ini not found -> @error = 2
Return
endif
$anames = IniReadSectionNames($path)
$counter = -1;_GUICtrlListView_GetItemCount($hwnd)
for $i = 1 to $anames[0]
$aread = IniReadSection($path, $anames[$i])
if @error then
$counter+= 1
_GUICtrlListView_EnableGroupView($hwnd)
_GUICtrlListView_InsertGroup($hwnd, -1, $i, $anames[$i])
_GUICtrlListView_AddItem($hwnd, "Kein Eintrag")
_GUICtrlListView_SetItemGroupID($hwnd, $counter, $i)
ContinueLoop
endif
_GUICtrlListView_EnableGroupView($hwnd)
_GUICtrlListView_InsertGroup($hwnd, -1, $i, $anames[$i])
for $x = 1 to $aread[0][0]
$counter+= 1
_GUICtrlListView_AddItem($hwnd, $aread[$x][0])
_GUICtrlListView_AddSubItem($hwnd,$counter, $aread[$x][1],1)
_GUICtrlListView_SetItemGroupID($hwnd, $counter, $i)
next
next
endfunc
#include <Array.au3>
[/autoit][autoit][/autoit][autoit]$Text="Moin!!!Wie gehts?"
$Text2=StringRegExp($Text,"(!!!)(.*)",1)
_ArrayDisplay($Text2)
So?
Hey,
wollte mal fragen ob man mit dem Standard-Listview bestimmte Controls in ein Listviewitem/Subitem einfügen kann.
Ich mach hier gerade ein Konfig. Programm bei dem sich die Listviewansicht im Prinzip anbietet.
Allerdings wäre es sehr praktisch, wenn man den Input schon beim eingeben festlegen könnte, z.b. über eine Combobox.
Somit könnte man schon hinterlegen auf welche Werte der .ini Eintrag geprüft wird (hier 1/0 für an/aus, aber wer weiss das schon außer dem Programmierer?)
Zur Pfadauswahl wäre auch ein Button (mit Fileselectfolder Funktion oder so) sehr nützlich.
Gruß nuts
Ich muss mir aber trotzdem mal überlegen, wie man die ganze Geschichte mit 2 dynamischen Arrays gemacht wird.
Na mit noch einer For ... Next Schleifen in der das zweite dynamische Array durchgegangen wird. 
edit \ bzw. so: https://autoit.de/index.php?page=Thread&threadID=8142
Schau dir mal RegEnumKey an.
Mit AdlibEnable sollte es auch gut gehen.
Ja klar, und 20 Dyndns-Namen und 20 mal den Router konfigurieren (Portweiterleitung).
Hö? Wozu?
Sobald der gewünschte PC angeschaltet wird kann dieser doch seine IP auf dem "Client" (der ausführende PC) hinterlegen (ggf. mit refresh Funktion).
Danach wartet der PC auf weitere Anweisungen.
Die gewünschten Ports müssen natürlich frei sein, dieses Problem hat man aber bei jeder Datenübertragung.
Aber der Server wartet doch auf die Clients.
Was du willst sind "20 Server" und einen "Client".
Ist aber ja kein Problem, du musst das Prinzip nur umdrehen
Was ist denn genau dein Problem? Das der Pingaufruf nichts zurückgibt?
Mein Beispiel liefert das gewünschte Ergebnis.
Schonmal versucht es so in dein Skript einzubauen?
Aber auch nur als Service.
HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\RunServicesOnce
HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\RunServices
Da müsste das Skript rein, würde ich mal behaupten.
edit \ Sowas meine ich: http://www.pirmasoft.de/runassvc.php
Jetzt fehlt noch die Autoitumsetzung
