IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Programları (https://www.ircforumlari.net/mirc-scripting-programlari/)
-   -   Toolbar Tasarımı [Güncellendi] (https://www.ircforumlari.net/mirc-scripting-programlari/18540-toolbar-tasarimi-guncellendi.html)

StanteaR 12 Ağustos 2007 20:51

Cevap: Toolbar Tasarımı [Güncellendi]
 
Bırsey Sorucam Sımdı Mırcda 2 Tane Tollbar Olabılır Degılmı Hem Ustte Hem Altta Ben Bunu Denedım Beceremedım Usttekkı Toolbar Duruyor Asagıyada 1 Tane Boyle 5 Tane Menusu Olan Toolbar Yapmak Istıyorum Ama Olmuyor Nasıl Yapabılırım Yardımcı Olabılırmısınız ?

McKruGer 12 Ağustos 2007 22:24

Cevap: Toolbar Tasarımı [Güncellendi]
 
Hem üstte hem altta yer alıyor. Alt tarafta 5 menü demişssin. Buyur:

Kod:

on *:start: {
  dialog -m altbar altbar
  dialog -m toolbar toolbar
}

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 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) 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 "x"
  size 0 0 550 $iif($temabul,14,17)
  option dbu
  list 4, 0 -2 600 17, size
  list 1, 0 4 600 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 Turkish 14 800 Cyrillic
  mdx SetColor $dname 1,2,3,4 background $rgb(113,188,255)
  mdx SetColor $dname 3 text $rgb(0,0,0)
  mdx SetFont $dname 3 +a 20 600 arial
  mdx SetColor $dname 2,3 textbg $rgb(113,188,255)
  .timersaat 0 1 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\baglan.ico
  did -i $dname 1 1 setimage icon large icon\kes.ico
  did -i $dname 1 1 setimage icon large icon\Ayarlar.ico
  did -i $dname 1 1 setimage icon large icon\kanal.ico
  did -i $dname 1 1 setimage icon large icon\korumalar.ico
  did -i $dname 1 1 setimage icon large icon\kontrolpanel.ico
  did -i $dname 1 1 setimage icon large icon\gorunum.ico
  did -i $dname 1 1 setimage icon large icon\liste.ico
  did -i $dname 1 1 setimage icon large icon\oyunlar.ico
  did -i $dname 1 1 setimage icon large icon\internet.ico
  did -i $dname 1 1 setimage icon large icon\yardım.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) Korumalar $chr(9) $+ Kanal ve Kişisel Korumaları Açar.
  did -a $dname 1 +a -
  did -a $dname 1 +a 6 $chr(32) Kontrol Panel $chr(9) $+ Scriptinizle İlgili Tüm Ayarları Açar.
  did -a $dname 1 +a -
  did -a $dname 1 +a 7 $chr(32) Görünümler $chr(9) $+ Scriptinizin Görünümüyle İlgili Ayarları Açar.
  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) Oyunlar $chr(9) $+ Scriptinizin Oyunlarıyla İlgili Diyalogu Açar.
  did -a $dname 1 +a -
  did -a $dname 1 +a 10 $chr(32) Internet $chr(9) $+ Internet Adreslerinin Olduğu Diyalogu 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 -
}

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) {
        Ayarlar
      }
      if ($did($dname,1).sel = 7) {
        Kanallar
      }
      if ($did($dname,1).sel = 9) {
        Korumalar
      }
      if ($did($dname,1).sel = 11) {
        kontrolpanel
      }
      if ($did($dname,1).sel = 13) {
        gorunumler
      }
      if ($did($dname,1).sel = 15) {
        listeler
      }
      if ($did($dname,1).sel = 17) {
        oyunlar
      }
      if ($did($dname,1).sel = 19) {
        internet
      }
      if ($did($dname,1).sel = 21) {
        yardim
      }
    }
  }
}

dialog altbar {
  title "x"
  size 0 0 550 $iif($temabul,14,17)
  option dbu
  list 4, 0 -2 550 17, size
  list 1, 0 4 550 17, size
}
on *:dialog:altbar:init:0: {
  mdx MarkDialog $dname
  mdx SetDialog $dname style
  mdx SetFont $dname 1 Turkish 14 800 Cyrillic
  mdx SetColor $dname 1,4 background $rgb(113,188,255)


  rebar Dock $dialog(altbar).hwnd > bottom
  mdx SetControlMDX $dname 1,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\ayarlar.ico
  did -i $dname 1 1 setimage icon large icon\ayarlar.ico
  did -i $dname 1 1 setimage icon large icon\ayarlar2.ico
  did -i $dname 1 1 setimage icon large icon\kanal.ico
  did -i $dname 1 1 setimage icon large icon\korumalar.ico
  did -i $dname 1 1 setimage icon large icon\kontrolpanel.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) Korumalar $chr(9) $+ Kanal ve Kişisel Korumaları Açar.
  did -a $dname 1 +a -
  did -a $dname 1 +a 6 $chr(32) Kontrol Panel $chr(9) $+ Scriptinizle İlgili Tüm Ayarları Açar.
  did -a $dname 1 +a -


}

on *:dialog:altbar:*:*: {
  if $devent == sclick {
    if $did == 1 {
      if ($did($dname,1).sel = 3) {
        dialog -m ayarlar ayarlar
      }
      if ($did($dname,1).sel = 5) {
        dialog -m digerayarlar digerayarlar
      }
      if ($did($dname,1).sel = 7) {
        dialog -m kanallar kanallar
      }
      if ($did($dname,1).sel = 9) {
        dialog -m korumalar korumalar
      }
      if ($did($dname,1).sel = 11) {
        cpanel
      }

    }
  }
}


StanteaR 12 Ağustos 2007 22:34

Cevap: Toolbar Tasarımı [Güncellendi]
 
Supersın Dostum :)

ircpolice35 20 Ağustos 2007 20:06

Yanıt: Toolbar Tasarımı [Güncellendi]
 
merhabalar
kodu duzenledim hersey tamam ancak servere baglan butonuna basınca sunucuya baglanmıyor ama manuel olarak baglanınca baglantıyı kes butonuna basınca baglantıyı kesiyor sorun ne olabilir bağlantıyı nasıl saglayabilirim yardımlarınız için simdiden tşkler

McKruGer 22 Ağustos 2007 19:35

Cevap: Toolbar Tasarımı [Güncellendi]
 
ircpolice kodları doğru olarak yerleştirdiğine emin ol. çünkü kodlarda bahsettiğin tarzda bir sorun yoktur.

goKhaN` 07 Ekim 2007 19:20

Cevap: Toolbar Tasarımı [Güncellendi]
 
McKruger dAi Su dLL.zip'ine bi bakıver bea Sana zahmet Calismior.

McKruGer 08 Ekim 2007 02:31

Cevap: Toolbar Tasarımı [Güncellendi]
 
Alıntı:

goKhaN` Nickli Üyeden Alıntı (Mesaj 271255)
McKruger dAi Su dLL.zip'ine bi bakıver bea Sana zahmet Calismior.

dll dosyaları zipi download: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

StanteaR 22 Aralık 2007 14:36

Cevap: Toolbar Tasarımı [Güncellendi]
 
merhaba sımdı ben bırsey sorcam ben senın verdıgın bu mp3 lü toolbari yaptım sonra altbar kısmınıda aldım ekledım amcadı onu ust mp3 lü olan acılıyor ama alttakı 5 ıconlu kısım acılmıyor ben hem ust toolbar ıconlu kısım acılsın hemde alttakı 5 ıconlu kısım acılsın ıstıyorum yardımcı olabılırmısın bırde bu mp3 yerı ıcın durdur forward o ıconları nerden bulabılırım yardım edebılırmısın..

johndoe 25 Aralık 2007 13:35

Cevap: Toolbar Tasarımı [Güncellendi]
 
murat resimler ölmüş, bi güncelle istersen onları

McKruGer 25 Aralık 2007 20:34

Cevap: Toolbar Tasarımı [Güncellendi]
 
Alıntı:

SenSizBen Nickli Üyeden Alıntı (Mesaj 312518)
merhaba sımdı ben bırsey sorcam ben senın verdıgın bu mp3 lü toolbari yaptım sonra altbar kısmınıda aldım ekledım amcadı onu ust mp3 lü olan acılıyor ama alttakı 5 ıconlu kısım acılmıyor ben hem ust toolbar ıconlu kısım acılsın hemde alttakı 5 ıconlu kısım acılsın ıstıyorum yardımcı olabılırmısın bırde bu mp3 yerı ıcın durdur forward o ıconları nerden bulabılırım yardım edebılırmısın..

alttaki 5.iconlu kısım derken?


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 22:03.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk