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

- mIRC Scripting Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)

- - Mdx picture window toolbar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/1077679-mdx-picture-window-toolbar.html)

Mdx picture window toolbar

Selamlar
bugün mdx.dll ile picture window toolbar örneğini yazacağım ancak bu toolbarda kullandığım özel aliası paylaşmayacağım
bunu sadece bu yolda emek verip bir şeyler yapmaya çalışanlar için ufak bir yol gösterici olarak yazıyorum

Kod:

alias AFtoolbar { dialog $iif($dialog(AFtoolbar),-c,-m) AFtoolbar AFtoolbar }

dialog AFtoolbar { 

  title "" 

  size -1 -1 1886 60

  option pixels

  button "AFraN", 1, 0 0 1800 76

}

on *:dialog:AFtoolbar:init:0:{ 

  dll dlls\mdx.dll SetMircVersion $version 

  dll dlls\mdx.dll MarkDialog $dname 

  dll dlls\mdx.dll SetDialog $dname bgcolor %AF_bg-c

  dll dlls\mdx.dll SetBorderStyle $dname 1 border

  dll dlls\rebar.dll HideToolbar

  dll dlls\rebar.dll Dock $dialog($dname).hwnd > top

  window -phCzadB +1bn @AFpw

  dll dlls\mdx.dll SetControlMDX $dname 1 Window > dlls\dialog.mdx

  did -a $dname 1 grab $window(@AFpw).hwnd @AFpw

  drawfill -r @AFpw %AF_bg-c 1 0 0 

  AFtoolbutton @AFpw 20 7 90 46 52 11 24 24 10 mIRC.exe %ttext Tahoma 12 39 34 Baglanti

  AFtoolbutton @AFpw 130 7 90 46 162 11 24 24 11 mIRC.exe %ttext Tahoma 12 153 34 Ayarlar

  AFtoolbutton @AFpw 240 7 90 46 275 11 24 24 22 mIRC.exe %ttext Tahoma 12 253 34 Korumalar

  AFtoolbutton @AFpw 350 7 90 46 382 11 24 24 6 mIRC.exe %ttext Tahoma 12 366 34 Komutlar

  AFtoolbutton @AFpw 460 7 90 46 492 11 24 24 38 mIRC.exe %ttext Tahoma 12 480 34 Temalar

  AFtoolbutton @AFpw 570 7 90 46 602 11 24 24 8 mIRC.exe %ttext Tahoma 12 598 34 Away

  AFtoolbutton @AFpw 680 7 90 46 715 11 24 24 16 mIRC.exe %ttext Tahoma 12 696 34 Taramalar

  AFtoolbutton @AFpw 790 7 90 46 822 11 24 24 4 mIRC.exe %ttext Tahoma 12 810 34 Kanallar

  AFtoolbutton @AFpw 900 7 90 46 932 11 24 24 24 mIRC.exe %ttext Tahoma 12 925 34 Radyo

  AFtoolbutton @AFpw 1010 7 90 46 1042 11 24 24 25 mIRC.exe %ttext Tahoma 12 1021 34 Mp3 player

  AFtoolbutton @AFpw 1120 7 90 46 1152 11 24 24 2 mIRC.exe %ttext Tahoma 12 1136 34 Nick uyari

}

toolbardan bir görüntü
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Cevap: Mdx picture window toolbar

Alıntı:

AfraN Nickli Üyeden Alıntı (Mesaj 1043148410)

Kod:

alias AFtoolbar { dialog $iif($dialog(AFtoolbar),-c,-m) AFtoolbar AFtoolbar }

dialog AFtoolbar { 

  title "" 

  size -1 -1 1886 60

  option pixels

  button "AFraN", 1, 0 0 1800 76

}

on *:dialog:AFtoolbar:init:0:{ 

  dll dlls\mdx.dll SetMircVersion $version 

  dll dlls\mdx.dll MarkDialog $dname 

  dll dlls\mdx.dll SetDialog $dname bgcolor %AF_bg-c

  dll dlls\mdx.dll SetBorderStyle $dname 1 border

  dll dlls\rebar.dll HideToolbar

  dll dlls\rebar.dll Dock $dialog($dname).hwnd > top

  window -phCzadB +1bn @AFpw

  dll dlls\mdx.dll SetControlMDX $dname 1 Window > dlls\dialog.mdx

  did -a $dname 1 grab $window(@AFpw).hwnd @AFpw

  drawfill -r @AFpw %AF_bg-c 1 0 0 

  AFtoolbutton @AFpw 20 7 90 46 52 11 24 24 10 mIRC.exe %ttext Tahoma 12 39 34 Baglanti

  AFtoolbutton @AFpw 130 7 90 46 162 11 24 24 11 mIRC.exe %ttext Tahoma 12 153 34 Ayarlar

  AFtoolbutton @AFpw 240 7 90 46 275 11 24 24 22 mIRC.exe %ttext Tahoma 12 253 34 Korumalar

  AFtoolbutton @AFpw 350 7 90 46 382 11 24 24 6 mIRC.exe %ttext Tahoma 12 366 34 Komutlar

  AFtoolbutton @AFpw 460 7 90 46 492 11 24 24 38 mIRC.exe %ttext Tahoma 12 480 34 Temalar

  AFtoolbutton @AFpw 570 7 90 46 602 11 24 24 8 mIRC.exe %ttext Tahoma 12 598 34 Away

  AFtoolbutton @AFpw 680 7 90 46 715 11 24 24 16 mIRC.exe %ttext Tahoma 12 696 34 Taramalar

  AFtoolbutton @AFpw 790 7 90 46 822 11 24 24 4 mIRC.exe %ttext Tahoma 12 810 34 Kanallar

  AFtoolbutton @AFpw 900 7 90 46 932 11 24 24 24 mIRC.exe %ttext Tahoma 12 925 34 Radyo

  AFtoolbutton @AFpw 1010 7 90 46 1042 11 24 24 25 mIRC.exe %ttext Tahoma 12 1021 34 Mp3 player

  AFtoolbutton @AFpw 1120 7 90 46 1152 11 24 24 2 mIRC.exe %ttext Tahoma 12 1136 34 Nick uyari

}

toolbardan bir görüntü
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Peki mirc yeni versiyon (7.80 üstü) 2.cni bir toolbar yapmak mümkün mü? ama o toolbar asagida statusbar gibi mircin alt kisminda olacak. :-)

Cevap: Mdx picture window toolbar

bu komutun sonundaki top kelime manası üst demek
dll dlls\rebar.dll Dock $dialog($dname).hwnd > top
bottom yaparsan alt tarafa alır
left sol tarafa
right sağ tarafa dock yapar yerleştirir

bununla birlikte toolbarın ismi ayrı bir isim olmalıdır

Cevap: Mdx picture window toolbar

Alıntı:

AfraN Nickli Üyeden Alıntı (Mesaj 1043148697)

senin afran-script'deki sagbar vardi ben onu bottom yani asagiya yaptim ama yazilarin üstünü kapatiyordu kanaldaki yazilarin baslari görünmüyordu ondan sordum. :-)