help - 05/07/04 10:12 AM
how can i call colormenu (ctrl+k) by command?
if i cant, how can i made dialog with color selection?
thanks
if i cant, how can i made dialog with color selection?
thanks
alias keysend { var %#,%& if ($1 == ALT) { var %# %# $+ % | tokenize 32 $2- } if ($1 == CTRL) { var %# %# $+ ^ | tokenize 32 $2- } if ($1 == SHIFT) { var %# %# $+ + | tokenize 32 $2- } if ($1 == ALT) { var %# %# $+ % | tokenize 32 $2- } if ($1 == CTRL) { var %# %# $+ ^ | tokenize 32 $2- } if ($1 == SHIFT) { var %# %# $+ + | tokenize 32 $2- } while ((!%&) || ($com(%&))) { var %& = key- $+ $rand(a,z) $+ $rand(a,z) $+ $rand(a,z) } .comopen %& WScript.Shell if (!$comerr) var %z = $com(%&,SendKeys,3,bstr,%# $+ $1-) .comclose %& }
dialog test { title "lalalala" size 50 50 80 30 option dbu text "nick color:", 1, 10 15 25 10 button "choose color", 2, 10 15 50 10 } ; ??? on 1:dialof:hui:sclick:557: { ; ???//keysend ctrl k ; ???}
dialog test { title "lalalala" size 100 100 80 30 option dbu text "nick color:", 1, 10 15 25 10 edit "", 2, 10 15 50 10 check "color",3,10 5 50 10,push } on 1:dialog:test:edit:2:{ if ($did(3).state = 1) { keysend ctrl k | did -u $dname 3 } } prees the color button and try to write somthing in the edit box