v0.2 neue sache neue probleme key_select

Mc.Neal

ok da es ja mit einer festen taste funktion wollte ich jetzt versuchen die taste variable zu gestalten
nur da kommt jetzt das problem es funktioniert nicht
schnipsel:

[autoit]

$shout1 = GUICtrlCreateInput("", 16, 56, 161, 21)
HotKeySet("($shout_box1)", "shout_1")
func shout_1()
send("{ENTER}"&GUICtrlRead($shout1)&"{ENTER}")
EndFunc
$shout_box1 = GUICtrlCreateCombo("", 64, 80, 65, 25, BitOR($CBS_DROPDOWNLIST,$CBS_AUTOHSCROLL))
GUICtrlSetData(-1, "F1|F2|F3|F4|F5|F6|F7|F8|F9|F10|1|2|3|4|5|6|7|8|9|0")

[/autoit]

man siest ja es sollen die tasten F1-F10 1-0 verwendebar sein

das zu der ersten problem das andere ist mit koda ich wollte das, das fenster kein minimier maximier und exit button oben hat
aber immernoch verschiebbar ist zum anderen kommt da auch noch das problem wenn die sachen weg sind das ich es nichteinmal mehr übern task beenden kann.
das sollte jetzt glaub ich erstmal alles gewesen sein =)

greez

franjob

du kannst den taskblockieren mit if prozessexist (tasgmgr.exe) then close
oder so

Mc.Neal

nene ich meinte die taskleiste das teil unten beim windoof wo auch start ist =)
hat zum anderen problem keiner eine lösung?

TimBlo

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

[autoit='die besten hotkey funktionen ^^']

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

[/autoit]