alias tb if $dialog(mircdb_toolbar) { dialog -c mircdb_toolbar mircdb_toolbar } | else { dialog -m mircdb_toolbar mircdb_toolbar }
alias mircdb_toolbar {
}
alias hos dll $shortfn(mrtoolbar/hos.dll) $1-
alias mtbdll return $dll($shortfn(mrtoolbar/mtoolbar.dll),$1,)
alias mtb dll $shortfn(mrtoolbar/mtoolbar.dll) $1-
dialog mircdb_toolbar {
title "Unuttum"
size 0 0 472 25
option dbu
}
on *:dialog:mircdb_toolbar:init:*: {
if ($mtbdll(IsTreeBar) == $true) mtb KillTreeBar
if ($mtbdll(IsToolbar) == $true) mtb KillToolbar
hos Dock $dname top 0
hos DockSize $dname 68
mtb Toolbar Create 68 $dname
mtb Toolbar ShowBgColor $true
mtb Toolbar BgColor 16777088 16744448 16711680
mtb Toolbar ShowBgPicture $false
mtb Toolbar BgPicture > none
mtb Toolbar BgGradStyle ReflectedH
mtb Toolbar BgGradShift 0
mtb Toolbar BgGradRotation 0
mtb Toolbar ShowBgTooltip $false
mtb Toolbar BgTooltip > $chr(32)
mtb Toolbar BgDrawBorder $false
mtb Toolbar AddButton 1 4 3 115 65 > Baglan
mtb Toolbar ButtonIcon 1 > MrToolbar\baglan.ico
mtb Toolbar ButtonColors -i 1 16777088 16711680 8421504 13029334 15463415 16771022 15697005 13562879 38631
mtb Toolbar ButtonEnabled -i 1 $true
mtb Toolbar ButtonIconSize 1 32 32
mtb Toolbar ButtonShowTooltip -i 1 $false
mtb Toolbar ButtonShowFocusRect -i 1 $false
mtb Toolbar ButtonTooltip 1 >
mtb Toolbar ButtonIconPos -i 1 top
mtb Toolbar ButtonGradientStyle -i 1 Butterfly
mtb Toolbar ButtonFont -i 1 8 +b 0 > Tahoma
mtb Toolbar ButtonShowHotTrack 1 $false
mtb Toolbar ButtonText 1 > Baglan
mtb Toolbar AddButton 2 125 3 115 65 > Ayarlar
mtb Toolbar ButtonIcon 2 > MrToolbar\ayarlar.ico
mtb Toolbar ButtonColors -i 2 16777088 16711680 8421504 13029334 15463415 16771022 15697005 13562879 38631
mtb Toolbar ButtonEnabled -i 2 $true
mtb Toolbar ButtonIconSize 2 32 32
mtb Toolbar ButtonShowTooltip -i 2 $false
mtb Toolbar ButtonShowFocusRect -i 2 $false
mtb Toolbar ButtonTooltip 2 >
mtb Toolbar ButtonIconPos -i 2 top
mtb Toolbar ButtonGradientStyle -i 2 Butterfly
mtb Toolbar ButtonFont -i 2 8 +b 0 > Tahoma
mtb Toolbar ButtonShowHotTrack 2 $false
mtb Toolbar ButtonText 2 > Baglanti Menusu
mtb Toolbar AddButton 3 246 3 115 65 > Web Radyo
mtb Toolbar ButtonIcon 3 > MrToolbar\internet.ico
mtb Toolbar ButtonColors -i 3 16777088 16711680 8421504 13029334 15463415 16771022 15697005 13562879 38631
mtb Toolbar ButtonEnabled -i 3 $true
mtb Toolbar ButtonIconSize 3 32 32
mtb Toolbar ButtonShowTooltip -i 3 $false
mtb Toolbar ButtonShowFocusRect -i 3 $false
mtb Toolbar ButtonTooltip 3 >
mtb Toolbar ButtonIconPos -i 3 top
mtb Toolbar ButtonGradientStyle -i 3 Butterfly
mtb Toolbar ButtonFont -i 3 8 +b 0 > Tahoma
mtb Toolbar ButtonShowHotTrack 3 $false
mtb Toolbar ButtonText 3 > Web Radyo
mtb Toolbar AddButton 4 369 2 115 65 > Korumalar
mtb Toolbar ButtonIcon 4 > MrToolbar\korumalar.ico
mtb Toolbar ButtonColors -i 4 16777088 16711680 8421504 13029334 15463415 16771022 15697005 13562879 38631
mtb Toolbar ButtonEnabled -i 4 $true
mtb Toolbar ButtonIconSize 4 32 32
mtb Toolbar ButtonShowTooltip -i 4 $false
mtb Toolbar ButtonShowFocusRect -i 4 $false
mtb Toolbar ButtonTooltip 4 >
mtb Toolbar ButtonIconPos -i 4 top
mtb Toolbar ButtonGradientStyle -i 4 Butterfly
mtb Toolbar ButtonFont -i 4 8 +b 0 > Tahoma
mtb Toolbar ButtonShowHotTrack 4 $false
mtb Toolbar ButtonText 4 > Korumalar
mtb Toolbar AddButton 5 490 2 115 65 > Control Panel
mtb Toolbar ButtonIcon 5 > MrToolbar\oyunlar.ico
mtb Toolbar ButtonColors -i 5 16777088 16711680 8421504 13029334 15463415 16771022 15697005 13562879 38631
mtb Toolbar ButtonEnabled -i 5 $true
mtb Toolbar ButtonIconSize 5 32 32
mtb Toolbar ButtonShowTooltip -i 5 $false
mtb Toolbar ButtonShowFocusRect -i 5 $false
mtb Toolbar ButtonTooltip 5 >
mtb Toolbar ButtonIconPos -i 5 top
mtb Toolbar ButtonGradientStyle -i 5 Butterfly
mtb Toolbar ButtonFont -i 5 8 +b 0 > Tahoma
mtb Toolbar ButtonShowHotTrack 5 $false
mtb Toolbar ButtonText 5 > Away Sistemi
mtb Toolbar AddButton 6 611 2 115 65 > Help
mtb Toolbar ButtonIcon 6 > MrToolbar\yardìm.ico
mtb Toolbar ButtonColors -i 6 16777088 16711680 8421504 13029334 15463415 16771022 15697005 13562879 38631
mtb Toolbar ButtonEnabled -i 6 $true
mtb Toolbar ButtonIconSize 6 32 32
mtb Toolbar ButtonShowTooltip -i 6 $false
mtb Toolbar ButtonShowFocusRect -i 6 $false
mtb Toolbar ButtonTooltip 6 >
mtb Toolbar ButtonIconPos -i 6 top
mtb Toolbar ButtonGradientStyle -i 6 Butterfly
mtb Toolbar ButtonFont -i 6 8 +b 0 > Tahoma
mtb Toolbar ButtonShowHotTrack 6 $false
mtb Toolbar ButtonText 6 > Help
mtb Toolbar AddButton 7 611 2 115 65 >Radyo
mtb Toolbar ButtonIcon 7 > MrToolbar\gorunum.ico
mtb Toolbar ButtonColors -i 7 16777088 16711680 8421504 13029334 15463415 16771022 15697005 13562879 38631
mtb Toolbar ButtonEnabled -i 7 $true
mtb Toolbar ButtonIconSize 7 32 32
mtb Toolbar ButtonShowTooltip -i 7 $false
mtb Toolbar ButtonShowFocusRect -i 7 $false
mtb Toolbar ButtonTooltip 7 >
mtb Toolbar ButtonIconPos -i 7 top
mtb Toolbar ButtonGradientStyle -i 7 Butterfly
mtb Toolbar ButtonFont -i 7 8 +b 0 > Tahoma
mtb Toolbar ButtonShowHotTrack 7 $false
mtb Toolbar ButtonText 7 > Radyo Player
}
on *:start: dialog -m mircdb_toolbar mircdb_toolbar
on *:signal:mToolbar:{
if $1 == sclick {
;echo -a $1-
if $4 == 1 { if ($scid($activecid).status = connecting || $scid($activecid).status = connected ) { scid $activecid disconnect } | else { scid $activecid server } scid $activecid window -a "status window" }
if $4 == 2 { }
if $4 == 3 { }
if $4 == 4 { }
if $4 == 5 { }
if $4 == 6 { }
if $4 == 7 { }
}
}
Bu Kodu Scriptim icin deniyorum ve sadece 6 icon gosteriliyor. Burda 7. iconu kendim ekledim ama bu sefer 6. icon yokmus gibi ensondakini gosteriyor.
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.