Tekil Mesaj gösterimi
Alt 03 Şubat 2009, 00:27   #102
Çevrimdışı
Hayat
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Toolbar Tasarımı [Güncellendi]




Hocam en baştaki Servera bağlan Bağlantıyı kes butonunda bir sorun var acaba başka birşeylemi çakışıyor anlayamadım ama. Bağlantıyı kes diyince kesiyor. Fakat bağlan diyince bağlanmıyor yardımcı olabilirmisiniz.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias Temadene { echo -a Temam: $iif($temabul,XP Teması,Klasik Windows Teması) } alias Temabul { .comreg dll/Tema.dll | .comopen toolbar Tema.buL | var %komut = $com(toolbar,TemaBul,1) | var %komut = $com(toolbar).result | .comclose toolbar | .comreg -u dll/Tema.dll | return %komut } alias mdx { return $dll(DLL\mdx.dll,$1,$2-) } alias rebar { dll DLL\rebar.dll $$1- } alias bars { return DLL\bars.mdx } on *:connect: { update.toolbar } on *:disconnect: { update.toolbar } on *:close:*: { update.toolbar } 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) Bağlantıyı Kes.. $chr(9) $+ IRC Serverle Bağlantınızı Koparır. } else { did -o toolbar 1 3 +a 1 $chr(32) Servere Bağlan $chr(9) $+ IRC Servere Bağlantı Kurar. } } } dialog toolbar { title "Sesssr" size 0 0 750 $iif($temabul,12,15) option dbu list 4, 0 -2 700 16, size list 1, 0 4 700 16, size text "", 2, 510 6 45 16, center text "", 3, 510 10 39 11, center } on *:dialog:toolbar:init:0: { mdx MarkDialog $dname mdx SetDialog $dname style mdx SetFont $dname 1 Turkish 13 800 Cyrillic mdx SetColor $dname 1,2,3,4 background $rgb(80,80,80) mdx SetColor $dname 3 text $rgb(0,0,0) mdx SetFont $dname 3 +a 20 600 arial mdx SetColor $dname 2,3 textbg $rgb(80,80,80) rebar HideToolbar . rebar Dock $dialog(toolbar).hwnd > bottom mdx SetControlMDX $dname 1,3,4 Progressbar smooth > $ctl mdx SetControlMDX $dname 1,4 ToolBar flat wrap arrows nodivider > $bars ; mdx SetControlMDX $dname 1,4 ToolBar flat arrows nodivider wrap > $aux.mdx(bars) mdx SetBorderStyle 1 did -i $dname 1 1 setscheme $rgb(163,163,163) $rgb(163,163,163) did -i $dname 1 1 bmpsize 20 20 did -i $dname 1 1 setimage icon large Bin\icon\baglan.ico did -i $dname 1 1 setimage icon large Bin\icon\kes.ico did -i $dname 1 1 setimage icon large Bin\icon\Ayarlar.ico did -i $dname 1 1 setimage icon large Bin\icon\kanal.ico did -i $dname 1 1 setimage icon large Bin\icon\korumalar.ico did -i $dname 1 1 setimage icon large Bin\icon\black.ico did -i $dname 1 1 setimage icon large Bin\icon\forum.ico did -i $dname 1 1 setimage icon large Bin\icon\liste.ico did -i $dname 1 1 setimage icon large Bin\icon\mp3.ico did -i $dname 1 1 setimage icon large Bin\icon\ccl.ico did -i $dname 1 1 setimage icon large Bin\icon\yardım.ico did -i $dname 1 1 setimage icon large Bin\icon\radyo.ico did -i $dname 1 1 setimage icon large Bin\icon\ev.ico did -i $dname 1 1 setimage icon large Bin\icon\theme.ico did -a $dname 1 +a - did -a $dname 1 +a 1 $chr(32) Server Bağlan $chr(9) $+ IRC Servere Bağlantı Kurar. did -a $dname 1 +a - did -a $dname 1 +a 3 $chr(32) Bağlantı $chr(9) $+ Bağlantı Ayarlarını Yapar. did -a $dname 1 +a - did -a $dname 1 +a 4 $chr(32) Kanallar $chr(9) $+ Kanallara Giriş Penceresini Açar. did -a $dname 1 +a - did -a $dname 1 +a 5 $chr(32) Kontrol Paneli $chr(9) $+ Kanal ve Kişisel Korumaları Nick, Away, Script Ayarlarını Açar. did -a $dname 1 +a - did -a $dname 1 +a 6 $chr(32) Eğlence $chr(9) $+ Burc yorumcusu, Rüya Tabirleri, Arkadasımın Telefonu, İddia Sonuçları, Tv Rehberi vb.. Menüsünü Açar . did -a $dname 1 +a - did -a $dname 1 +a 7 $chr(32) Forumlar $chr(9) $+ [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Forumlarına Giriş Yapabilirsiniz. did -a $dname 1 +a - did -a $dname 1 +a 8 $chr(32) Listeler $chr(9) $+ Scriptinizdeki Notify, Düşman Listesi Gibi Ayarları Açar. did -a $dname 1 +a - did -a $dname 1 +a 9 $chr(32) Mp3 Player $chr(9) $+ Scriptinizin Mp3 Çalarını Açar. did -a $dname 1 +a - did -a $dname 1 +a 10 $chr(32) Plus Menü $chr(9) $+ Scriptin tüm özelliklerinin bir araya getirildiği Genel Menüyü Açar. did -a $dname 1 +a - did -a $dname 1 +a 11 $chr(32) Yardım $chr(9) $+ Scriptinizin Yardım Dosyasını Açar. did -a $dname 1 +a - did -a $dname 1 +a 12 $chr(32) Sevilir FM $chr(9) $+ [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Sevilir FM Radyomuzu Dinleyebilirsiniz. did -a $dname 1 +a - did -a $dname 1 +a 13 $chr(32) Siteler $chr(9) $+ [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Sitelerine Giriş Yapabilirsiniz. did -a $dname 1 +a - did -a $dname 1 +a 14 $chr(32) Themes $chr(9) $+ Scriptinizi Temasını Değiştirebilirsiniz.. 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) { sendkeys $+($chr(37),o) } if ($did($dname,1).sel = 7) { list sendkeys $+($chr(37),j) } if ($did($dname,1).sel = 9) { .remote on | dialog -m alperoin alperoin } if ($did($dname,1).sel = 11) { eglence } if ($did($dname,1).sel = 13) { run [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] } if ($did($dname,1).sel = 15) { sendkeys $+($chr(37),n) } if ($did($dname,1).sel = 17) { mp3player } if ($did($dname,1).sel = 19) { plusmenu } if ($did($dname,1).sel = 21) { helper howcanihelpyou } if ($did($dname,1).sel = 23) { radyo } if ($did($dname,1).sel = 25) { denizgozlum | sevilir } if ($did($dname,1).sel = 27) { .theme } } } }


 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet reklamver