Dann sieht es doof aus 
Also im Moment funktioniert in deinem Script ja gar nichts 
Du könntest wenigstens die Bilder anhängen...
Beiträge von name22
-
-
Ok hier ein kleiner Tipp am Rande: Mach das mit GDI+
-
Zitat
Zielsetzung dieser CD-ROM mit den vier TV-Helden ist es, Kinder zwischen zwei und vier Jahren mit dem PC vertraut zu machen
Wer's glaubt... -
Zitat
(gibts sowas überhaupt? xD )
Das hängt davon ab in welchem Alter die Babys heutzutage schon am Rechner sitzen. -
Schnitzel: Tolle Lieblingsgames
-
Bitte nochmal in verständlichem Satzbau
Ich kann mir beim besten Willen noch nicht vorstellen was du willst. -
Zitat
und was für müll bei mir steht da ein sauberer string
Bei mir nicht :D. Da ist nicht mal klar getrennt.
Hier mal meine vereinfachte Version (funktioniert 
Spoiler anzeigen
[autoit]#include <GUIConstantsEx.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <WindowsConstants.au3>$sFile = @ScriptDir & "\Date.txt"
[/autoit] [autoit][/autoit] [autoit]If Not FileExists($sFile) Then
[/autoit] [autoit][/autoit] [autoit]
$hFile = FileOpen($sFile, 1)
FileClose($hFile)
EndIf$Date = GUICreate("Datumsauswahl", 209, 220, 192, 124)
[/autoit] [autoit][/autoit] [autoit]
$DatePick = GUICtrlCreateMonthCal("2010/04/07", 8, 8, 191, 164)
$Save = GUICtrlCreateButton("Speichern", 64, 184, 75, 25)
GUISetState()While 1
[/autoit]
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Save
$sDate = GUICtrlRead($DatePick)
$iHours = InputBox("Stunden", "Gib die Stunden ein: ")
If Number($iHours) <> "" Then
$sText = FileRead($sFile)
If StringInStr($sText, $sDate & " : " & $iHours) = 0 Then FileWrite($sFile, $sDate & " : " & $iHours & @CRLF)
EndIf
EndSwitch
WEnd
Vielleicht kannst du ja was übernehmen. -
Die Stelle im Script die für das anhängen der Stunden zuständig ist, ist fehlerhaft.
In der Datei steht bei mir nur Müll nach ausführen deines Scripts -
Zitat
Ich habe ja nach jeder neuen anfügung von daten ein @CRLF drinne aber das dürfe doch auch kein Prob sein oder?
Wer weiß...
Ich würde sowieso IniRead und IniWrite verwenden. -
Wieso nimmst du nicht einfach StringInStr oder willst du noch andere Sachen überprüfen?
-
Soweit ich weiß keine.
Zumindest nicht wenn sie verschiedene Zwecke haben. Oder auf andere Events reagieren. -
Ich hoffe du hast diese eckigen Klammern nicht in deinem Script, oder die Gleichsetzung der Variablen.
-
Ich verstehe nicht wo da das Problem liegt.
Schließlich sieht man das doch nicht. Die Performance wird genausowenig beeinträchtigt.
Oder gibt es ein anderes Problem? -
Also bei mir funktioniert diese Methode problemlos.
Spoiler anzeigen
[autoit]#include <GUIConstantsEx.au3>
[/autoit] [autoit][/autoit] [autoit]$Form1 = GUICreate("Form1", 237, 140, 192, 124)
[/autoit] [autoit][/autoit] [autoit]
$Label = GUICtrlCreateLabel("", 56, 48, 121, 21)
$Input1 = GUICtrlCreateInput("Standard", 56, 48, 121, 21)
GUISetState()While 1
[/autoit]
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Label
GUICtrlSetData($Input1, "")
EndSwitch
WEnd -
Der Fehler liegt hier
[autoit]$ListView1 = GUICtrlCreateListView("", 0, 40, 250, 342)
[/autoit]
[autoit]
Du musst mindestens eine Kolumne angeben. Liess dir dazu am besten auch mal die Hilfe durch.
Probier es mal so:$ListView1 = GUICtrlCreateListView("Dateien", 0, 40, 250, 342)
[/autoit] -
Mit dieser Variante kannst du beliebig viele Fenster überprüfen.
Spoiler anzeigen
[autoit]HotKeySet("{ESC}", "_Exit")
[/autoit] [autoit][/autoit] [autoit]
TrayTip("Running", "Hit ESC to exit", 1, 0)$sImage = "C:\9.jpg"
[/autoit] [autoit][/autoit] [autoit]
$iWidth = 25
$iHeight = 40$iCount = 2 ;Anzahl der Fenster/Controls
[/autoit] [autoit][/autoit] [autoit]Dim $aControl[$iCount][3]
[/autoit] [autoit][/autoit] [autoit]
$aControl[0][0] = "" ;Fenstertitel 1
$aControl[0][1] = "" ;Fenstertext 1
$aControl[0][2] = "[CLASS:PClass; INSTANCE:2]" ;Control 1
$aControl[1][0] = "" ;Fenstertitel 2
$aControl[1][1] = "" ;Fenstertext 2
$aControl[1][2] = "[CLASS:PClass; INSTANCE:2]" ;Control 2
;usw usw je nach dem wie viele Fenster du haben willstWhile 1
[/autoit] [autoit][/autoit] [autoit]
For $i = 0 To $iCount - 1
If ControlGetText($aControl[$i][0], $aControl[$i][1], $aControl[$i][2]) = $sSearchText Then
$aWinPos = WinGetPos($aControl[$i][0], $aControl[$i][1])
SplashImageOn("Splash Screen", $sImage, $iWidth, $iHeight, $aWinPos[0] + 310, $aWinPos[1] + 110, 1)
EndIf
Next
WEndFunc _Exit()
[/autoit]
Exit
EndFunc -
Zitat
lässt sich trotzdem in etwa verstehen was ich eigentlich will?
[autoit]
Mehr oder weniger
Hier mal im Pseudo Code:HotKeySet("{ESC}", "_Exit")
[/autoit][autoit][/autoit][autoit]While 1
[/autoit][autoit][/autoit][autoit]
$Text1 = TextAuslesen1()
If StringInStr($Text1, $GesuchterText1) <> -1 Then BildAnzeigen1()
$Text2 = TextAuslesen2()
If StringInStr($Text2, $GesuchterText2) <> -1 Then BildAnzeigen2()
WEndFunc _Exit()
[/autoit]
Exit
EndFunc -
Bitte setze in Zukunft
Code[autoit][/autoit]Blöcke um deinen Code herum.
In deinem Script sind ein paar unnötige Schleifen und Abfragen drin, außerdem wird $i in deinem Script nie auf 1 gesetzt, somit hast du 2 Endlosschleifen in einander.
Ist das wirklich dein ganzes Script? -
Zitat
p.s. ich habe mienen Preis nocnicht erhalten, das älteste theard überhaupt auszugraben
Das war ja auch nur eine Idee von mir^^.
Wer weiß vielleicht setzt sich das irgendwann durch . -
Tja, dann musst du wohl irgendwie versuchen oetzn's 1.Vorschlag umzusetzen.
Ganz einfach wird das wahrscheinlich nicht, aber du solltest dich auf jeden Fall mit der BASS.au3 beschäftigen.