Beiträge von TimBlo

hmmm sicher?
telefonnummer schule = 117 oda so,
telefonnummer Irrenhaus = ääähm (Scheisse, ich hab die nummer meines Nachbarn vergessen )

Hi leute, ich habe eine wichtige frage an euch:
Was ist der Unterschied zwischen einer Schule und einem Irrenhaus??

hoffe ihr habt gute antworten

control send mag es nicht wenn ich versuche {MEDIA_PLAY_PAUSE} ohne anführungsuzeichen zu senden,
geholfen ist mir jetzt immernoch nicht

Ich möchte an iTunes senden, also sowas wie "{MEDIA_PLAY}", nur möchte ich das fenster nicht immer erst aktivieren lassen,
ich habs mit ControlSend versucht aber iTunes und alles andere reagiert net,
aber wenn ich das fenster iTunes aktiviere und "{MEDIA_PLAY}" sende reagiert er (nur dann)

hat einer ne idee was ich falsch mache? vllt muss ich ja ne control ID angeben, oder was weiss ich,,,

durchaus!
nur leider versuche ich sowas kaum mal, aber mit den entsprechenden funktionen ist des kein problem,
weiss jetzt nicht ob es mit GUICtrlSetBgImage() oder sowas geht, aber ich kann dir mal auf die GUIListBox.au3 verweisen,
oder einen kleinen trik,
du machst ein Bild mit derselben grösse dahinter und machst die listbox ein bissel transparent, ist aber net so praktisch...

joomla kenne ich nicht, ich finds ehrens los eine website mit einem programm/script zu erstellen,
aber meine schule scheint noch eine funktionierende seite zu haben, ob wohl der admin noch weniger davon versteht als ich
http://schulewilderswil.ch/joomla15/
das is doch so ein ding wie du willst? ich kann den admin gerne auch fragen wie er das hostet...
noch einfacher wäre es wenn du einen web server auf deinem PC installierst und den router darauf konfigurierst

direkt geholfen hab ich dir jetzt zwar net, aber das is alles was ich dir sagen kann

"And" ist logisches "Und"
du sagst deinem code
"wenn datei nicht existiert und datei nicht existiert und datei existiert dann"...
so würde man es von autoit nach deutsch überstzen

If Not FileExists ( "D:\Workflow\TRIAS Cover\10x16\*.*" ) And Not FileExists ( "D:\Workflow\TRIAS Cover\12x19\*.*" ) And Not FileExists ( "D:\Workflow\TRIAS Cover\15x18\*.*" ) And Not FileExists ( "D:\Workflow\TRIAS Cover\16x21\*.*" ) And Not FileExists ( "D:\Workflow\TRIAS Cover\17x24\*.*" ) And Not FileExists ( "D:\Workflow\TRIAS Cover\22x23\*.*" ) And FileExists ( "D:\Workflow\Aktuell\cut\*.*" ) Then
AcrobatStapel ("pdf150")
AcrobatStapel ("jpg300")
Else
MsgBox(0,"nixda","keinedatenzuverarbeiten",3)
EndIf

bittesehr, prinzip verstanden? immer schön And schreiben in der IF

man man!!
warum nicht alle nötigen infos in ne ini schreiben und der Taskplaner war nur ein vorschlag, ich würde den nicht verwenden, es schien nur eine schnelle lösung zu sein

du lässt dein code wirklich am besten immer laufen....

#include <INet.au3>
#include <Array.au3>

Dim $adress[5]
$sendet = False

while 1
If @HOUR = 1 And Not $sendet Then
$ato= @DesktopDir&"\Witze\Witze.txt" ;Pfad wo sich die Witzedatei befindet (pro Zeile ein Witz)
$adress[1]= "test@xyz.de"
$adress[2]= "test2@xyz.de"
$adress[3]= "test3@xyz.de"
$subject= "Witz des Tages"
$count= 1

Do
$witz= FileReadLine($ato,$count)
$count= $count+1
$body= $witz
$i=1
While $i<4
Sleep(5000)
_INetMail($adress[$i],$subject,$body)
Sleep(5000)
WinActivate("Witz des Tages - Nachricht")
Sleep(3000)
Send("^{ENTER}")
$i=$i+1
WEnd

MsgBox(0,"test","count= "&$count)
Until $count=10
$sendet = True
ElseIf @HOUR = 2 And $sendet Then
$sendet = False
Else
sleep(1000)
EndIf
WEnd

das wirds tun

einen Laptop hätte ich schon um es mit einer anzeige zu testen, aber den muss ich erst einrichten, und das lohnt sich nicht
und dem PC will ich die sekundäre anzeige nich weg nehmen nur um was zu testen
fragen is da die einfachste lösung
also danke dir
das programm wird also bei 100 anzeigen sogar besser als die grafik funktionieren

ich bin nicht so der held darin, fragen sollte mir wieterhelfen:
ich hab 2 anzeigen und niemand hat hier gesagt was passiert wenn nur eine da ist....
es is an zu nehmen das dies in allen situationen funktioniert, aber ich möchte mir mal sicher sein...

ich weiss nicht mal wie du autoit dann zur wiederherstellung bringst, aber würde es nicht mit nummerierung und dem aktuellen datum gehen ?

wenn du mir den ganzen code hättest könnt ich dir das nötige einbauen, aber lass ma lieber sein, dann kann ich noch was anderes machen
was linie 2 in deinem post soll weiss ich nicht, so hab ich das noch nie gesehen
und du kannst dein <ding> auch über das tray icon von autoit beenden
und das verschieb bar, geht mit einem bild oder label, welcher den ex style 0x00100000 trägt und über das ganze gui geht (im hintergrund am besten, d.h. bild/label am anfang gleich nach Guicreate erstellen)

das mit den hotkeys, so wie ich es einst gemacht hab, so kann ichs dir noch geben, musst vllt dran rumbasteln damits für dich stimmt und ob die F-tasten sowie die zahlen funktionieren werden weiss ich auch nicht... sollten aber schon

func hotkeyedit($idname) ;idname soll wohl ne kennzeichnug sein, wofür der hotkey gedacht is, weiss nicht ob dir das was bringt...
$valueitem = InputBox("Hotkey ändern", "Geben Sie die neue Tastenkombination ein"&@crlf&"Mehrere Tasten mit einem "&'+'&" trennen (keine leerzeichen!)"&@crlf&"Spezielle Tasten wie ESC gross schreiben"&@crlf&"Den rest klein... (min. 2 Tasten benötigt)", "", "", 400, 160) ;dann kommt eben die box wo man eingibt...
$itemkey = StringSplit($valueitem, '+') ; dann wird die eingabe auseinander genommen
If @error Then
MsgBox(48, "Fatal Error", "Unbekannter fehler! Vermutlich ist ihre eingabe ungültig, versuchen sie es mit einer anderen")
Else
$keyitem = hotkeycomp(2, $itemkey) ; dann verwandelt er dinger wie ESC in {ESC} (voll automatisch, geil oder? ^^)
IniWrite("den namen der ini (den original namen schreib ich lieber net hin ^^)", "Hotkeys", $idname, $keyitem) ; der hotkey wird in ner ini gespeichert, weiss nicht ob dir das was bringt...
EndIf
EndFunc
Func hotkeycomp($compright, $keys)
If $compright == 0 Then
For $it=0 to $keys[0]
if $keys[$it] == "+" Then
$keys[$it] = "SHIFT"
ElseIf $keys[$it] == "!" Then
$keys[$it] = "ALT"
ElseIf $keys[$it] == "{PAUSE}" Then
$keys[$it] = "PAUSE"
ElseIf $keys[$it] == "{ESC}" Then
$keys[$it] = "ESC"
ElseIf $keys[$it] == "{SPACE}" Then
$keys[$it] = "LEER"
ElseIf $keys[$it] == "#" Then
$keys[$it] = "WIN"
ElseIf $keys[$it] == "{TAB}" Then
$keys[$it] = "TAB"
ElseIf $keys[$it] == "^" Then
$keys[$it] = "STRG"
EndIf
For $st = 1 to 12
If $keys[$it] == "{F"&$st&"}" Then
$keys[$it] = "F"&$st
EndIf
Next
Next
$refkey = $keys[1]
If $keys[0] = 1 Then
$refkey = $keys[1]
Else
For $it=2 to $keys[0]
$refkey = $refkey&" + "&$keys[$it]
Next
EndIf
Return($refkey)
$refkey = ""
ElseIf $compright == 1 Then
$refkey = $keys[1]
If $keys[0] = 1 Then
$refkey = $keys[1]
Else
For $it=2 to $keys[0]
$refkey = $refkey&$keys[$it]
Next
EndIf
Return($refkey)
$refkey = ""
ElseIf $compright == 2 Then
For $it=0 to $keys[0]
if $keys[$it] == "SHIFT" Then
$keys[$it] = "+"
ElseIf $keys[$it] == "ALT" Then
$keys[$it] = "!"
ElseIf $keys[$it] == "PAUSE" Then
$keys[$it] = "{PAUSE}"
ElseIf $keys[$it] == "ESC" Then
$keys[$it] = "{ESC}"
ElseIf $keys[$it] == "LEER" Then
$keys[$it] = "{SPACE}"
ElseIf $keys[$it] == "WIN" Then
$keys[$it] = "#"
ElseIf $keys[$it] == "TAB" Then
$keys[$it] = "{TAB}"
ElseIf $keys[$it] == "STRG" Then
$keys[$it] = "^"
EndIf
For $st = 1 to 12
If $keys[$it] == "F"&$st Then
$keys[$it] = "{F"&$st&"}"
EndIf
Next
Next
$refkey = $keys[1]
If $keys[0] = 1 Then
$refkey = $keys[1]
Else
For $it=2 to $keys[0]
$refkey = $refkey&"|"&$keys[$it]
Next
EndIf
Return($refkey)
$refkey = ""
EndIf
EndFunc

lol
vielleicht solltest du bei zeile 59 mal ein exceptionhandling einbauen
also

$pos = WinGetPos(HWnd($cool_hwnd))
If @error Then
<bla bla>
else
<bla bla>
endif

das dürfte dein problem schon lösen, aber warum autoit solche schlechten fehlermeldungen macht weiss ich nicht,
vieleicht will autoit dass wir beim programmieren etwas mehr denken (mirs is vorher ne ähnliche meldung gekommen )

BugFix scheint auch ne gute erkläung zu haben, wenn das so is, würd ich da nen exceptionhandling einbauen, damit man es eben doch aufrufen kann ohne die parameter zu geben...

hmmm komisch, die alt taste scheint verantwortlich zu sein....
nein!! du hast mein PC angesteckt, jetzt is er auch krank!!!
nimm einfach was anderes als {ALT}

muss das funktionieren wenn du alles auf eine zeile schriebst?

$shout1 = GUICtrlCreateInput("Alt + 1", 72, 56, 161, 21)
HotKeySet("{ALT}1", "shout")
func shout()
send("{ENTER}"&GUICtrlRead($shout1)&"{ENTER}")
EndFunc

hab ich dir das nich schon mal korrigiert

ich weiss jetzt immernoch nicht genau warum mich knuddle hier her gebeten hat, aber ich würde sagen um fehler zu finden hat ScITE sowie viele andere editoren ne suchfunktion

hab ich was falsch gemacht?
ich bleibe der arbeitswelt verschont?! hmmm schulstubenhocker kann auch zur arbeit werden!!
ich weiss nur dass das dingi funktioniert, und mehr muss es für mich nicht können,
es is ja open source, ihr dürft es euch alle anpassen

wau, ich kann gerade so gut nen code erstellen der Sudokus erstellt, bei nur einerzahl
und wenn ich den code erweitere hab ich es erst mal mit problemen zu tun, um etwas anzuhängen (ich denke da an eine weitere methode)

und mir ists eigentlich egal ob irgend wo erklärt is wie ans machen soll, ich machs so wies mir passt, und entwickle meine eigenen methoden.

ich mache jetzt dann sowiso mit was anderem weiter, dass sollte ja nur ein zwischenprojekt sein weil ich langweilig hatte

loool ich glaubs nich, ich hab dir immer versucht zu erklären dass du ubound nivh selber machen musst da die grösse in $readsection[0][0] steht, das hast du nich mitbekommen?