darkshades1 Nickli Üyeden Alıntı
(Mesaj 1040676618)
Selamun Aleykum..
arkadaslar mdx.dll ile dialog ların arka planlarını değişik renkler yapılabiliyormus yani yapılıyor daha dogrusu ama renk kodlarını bilmiyorum daha demin denedim ama arka planı mavi yazıların arka planı değişik oldu google den arattım renk dialogu diye bişi buldum ama kod da hata verdi renkleri ayarliyip kodları veriyormus bu konu hakkında yardımcı olabilicek varmı...
bide GooGLe den arayıp da buldugum kod buydu:
Kod:
alias cstudio { $iif(!$dialog(cstudio),dialog -m cstudio cstudio,dialog -v cstudio) }
dialog cstudio {
title “Color Studio |
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
by ReBeL”
size -1 -1 154 131
option dbu
scroll “”, 1, 35 3 115 8, range 0 255 horizontal bottom
text “Red”, 2, 1 3 11 8
text “Green”, 3, 1 15 16 8
text “Blue”, 4, 1 27 10 8
scroll “”, 5, 35 15 115 8, range 0 255 horizontal bottom
scroll “”, 6, 35 27 115 8, range 0 255 horizontal bottom
list 7, 5 45 139 26, size
box “[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]”, 8, 1 37 149 38
box “Degerler”, 9, 1 77 149 37
edit “”, 10, 45 87 99 10, read
text “RGB”, 11, 8 89 16 8
text “$RGB”, 12, 8 100 20 8
edit “”, 13, 45 99 99 10, read
button “Exit”, 14, 1 115 46 12
button “İnfo”, 15, 50 115 47 12
button “Visit To Web Site”, 16, 99 115 51 12
}
on *:dialog:cstudio:*:*: {
if $devent == init {
if !%mdx.dll { taramdx }
var %s dll %mdx.dll
%s MarkDialog $dname
%s SetBorderStyle $dname 7
%s SetColor $dname 7 background 0
}
if $devent == scroll {
if !%mdx.dll { taramdx }
var %s dll %mdx.dll
%s SetColor $dname 7 background $rgb($did(1).sel,$did(5).sel,$did(6).sel)
did -ra $dname 10 $rgb($did(1).sel,$did(5).sel,$did(6).sel)
did -ra $dname 13 Red; $did(1).sel Green; $did(5).sel Blue; $did(6).sel
}
if $devent == sclick {
if $did == 14 { dialog -x $dname }
if $did == 15 {
var %a echo 2 -a
%a *** “Color Dialog” ReBeL Tarafından Yazılmış Bir Dialogdur
%a *** Bu Dialog Sayesinde Renklerin RGB Kodunu Alabilirsiniz
%a *** Hayırlı Çalışmalar Dileriz
%a *** [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
}
if $did == 16 { run [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] }
}
}
alias taramdx {
var %q 1
var %i $scriptdir
while (%q <= $findfile(%i,*.dll,0)) {
if $gettok($findfile(%i,*.dll,%q),-1,$asc()) == mdx.dll {
set %mdx.dll $shortfn($findfile(%i,*.dll,%q))
}
inc %q
}
}
ekledim /dialog -m cstudio cstudio yapıp actım fakat * /dll: Açılamıyor 'C:\Program Files\mIRC\SetColor' (Satır 67, script1.txt) bu hatayı aldım
birde bu * /dll: Açılamıyor 'C:\Program Files\mIRC\SetColor' (Satır 67, script1.txt) Selamun Aleykum
Iyi Aksamlar..
|
