04 Nisan 2009, 17:49
#1 Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
iconlar çalışmıyor
Selamın aleykum arkadaşlar ben daha öncede konu açmıştım buraya ama sorun çözülmedi ben yeni başladım irc script yapmaya bu ilk deneyimim
scriptte iconlar çalışmıyor bunun nedeni nedir anlatırmısınız iyibir toolbar nasıl yapılır
acaba iconların boyutlarından kaynaklanabilirmi birsürü icon denedim fayda etmedi dosya yolunu değiştirdim olmadı kafam durdu bana yardım edermisiniz
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN... ] Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:start: {
dialog -ma toolbar toolbar
}
alias _mdx dll $shortfn(görünüm\dll\mdx.dll) $1-
alias mdx { return $dll(görünüm\DLL\mdx.dll,$1,$2-) }
alias Temabul { .comreg görünüm/dll/Tema.dll | .comopen toolbar Tema.buL | var %komut = $com(toolbar,TemaBul,1) | var %komut = $com(toolbar).result | .comclose toolbar | .comreg -u görünüm/dll/Tema.dll | return %komut }
alias rebar { dll görünüm\DLL\rebar.dll $$1- }
alias bars { return görünüm\DLL\bars.mdx }
alias rebar { dll görünüm\DLL\rebar.dll $$5- }
alias _mdxinit dll $shortfn(görünüm\dll\mdx.dll) SetMircVersion $version | dll $shortfn(görünüm\dll\mdx.dll) MarkDialog $dname
on *:connect: {
update.toolbar
}
on *:disconnect: {
update.toolbar
}
on *:close:*: {
update.toolbar
}
alias saat { if ($dialog(toolbar)) { did -a toolbar $1 $time } }
alias update.toolbar {
if (!$dialog(toolbar)) { halt }
else {
scid $activecid
if ( $scid($activecid).status = connecting || $scid($activecid).status = connected ) {
did -o toolbar 1 3 +a 2 $chr(32) Balanty Kes $chr(9) $+ IRC Serverle Balantnz Koparr.
}
else {
did -o toolbar 1 3 +a 1 $chr(32) Servere Balan $chr(9) $+ IRC Servere Balant Kurar.
}
}
}
dialog toolbar {
title "x"
size 400 250 50 $iif($temabul,14,17)
option dbu
list 4, 0 -2 550 17, size
list 1, 80 4 550 17, size
text "", 2, 464 6 45 16, center
text "", 3, 467 10 39 11, center
}
on *:dialog:toolbar:init:0: {
mdx MarkDialog $dname
mdx SetDialog $dname style
mdx SetFont $dname 1,14 Turkish 14 900 Cyrillic
mdx SetColor $dname 3 text $rgb(300,000,000)
mdx SetFont $dname 3 +a 20 600 arial 78538585
.timersaat 0 5 saat 3
rebar HideToolbar .
rebar Dock $dialog(toolbar).hwnd > top
mdx SetControlMDX $dname 1,3,4 Progressbar smooth > $ctl
mdx SetControlMDX $dname 1,4 ToolBar flat wrap arrows nodivider > $bars
mdx SetBorderStyle 1
did -i $dname 1 1 setscheme $rgb(163,163,163) $rgb(163,163,163)
did -i $dname 1 1 bmpsize 27 27
did -i $dname 1 1 setimage icon large icon\1
did -i $dname 1 1 setimage icon large icon\1
did -i $dname 1 1 setimage icon large icon\1
did -i $dname 1 1 setimage icon large icon\1
did -i $dname 1 1 setimage icon large icon\1
did -i $dname 1 1 setimage icon large icon\1
did -i $dname 1 1 setimage icon large icon\1
did -i $dname 1 1 setimage icon large icon\1
did -a $dname 1 +a -
did -a $dname 1 +a 1 $chr(32) Server Balan $chr(9) $+ IRC Servere Balant Kurar.
did -a $dname 1 +a -
did -a $dname 1 +a 3 $chr(32) Balantı $chr(9) $+ Balant Ayarlarn Yapar.
did -a $dname 1 +a -
did -a $dname 1 +a 4 $chr(32) Korumalar $chr(9) $+ Kanal ve Kişisel Korumalar Açar
did -a $dname 1 +a -
did -a $dname 1 +a 5 $chr(32) MerkezFM $chr(9) $+ MerkezFM Açar.
did -a $dname 1 +a -
did -a $dname 1 +a 6 $chr(32) Away Panel $chr(9) $+ Avay Panelini Açar.
did -a $dname 1 +a -
did -a $dname 1 +a 7 $chr(32) Televizyon $chr(9) $+ TV Açar.
did -a $dname 1 +a -
did -a $dname 1 +a 8 $chr(32) Forum Sitemiz $chr(9) $+ IRC'mizin Resmi Forum Sitesi
did -a $dname 1 +a -
did -a $dname 1 +a 9 $chr(32) efektLer $chr(9) $+ Kanallara Giriş Çıkışları Açar
did -a $dname 1 +a -
}
on *:dialog:toolbar:*:*: {
if $devent == sclick {
if $did == 1 {
if ($did($dname,1).sel = 3) {
if ($scid($activecid).status = connecting || $scid($activecid).status = connected ) { scid $activecid disconnect }
else {
scid $activecid server
}
update.toolbar
did -f $dname 1
scid $activecid window -a "status window"
}
if ($did($dname,1).sel = 5) {
cm2
}
if ($did($dname,1).sel = 7) {
cm1
}
if ($did($dname,1).sel = 9) {
Radyo
}
if ($did($dname,1).sel = 11) {
Aways
}
if ($did($dname,1).sel = 13) {
.run script\tv.exe
}
if ($did($dname,1).sel = 15) {
.run xxxxxxxxxxxxxxxxxxx
}
if ($did($dname,1).sel = 17) {
efekt
}
if ($did($dname,1).sel = 19) {
dialog -m bilgi bilgi
}
if ($did($dname,1).sel = 21) {
}
}
}
}