Çevrimdışı

elimdeki toolbar bu bu toolbara mp3 ve web toolbar eklemek istiorm



on *:start: { title | titletime | dialog -m toolbar toolbar }

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 2 +a 2 $chr(32) Disconnect $chr(9) $+ Disconnect
}
else {
did -o toolbar 1 2 +a 1 $chr(32) Bağlantı $chr(9) $+ Bağlantı
}
}
}

dialog toolbar {
title "x"
size 0 0 1500 13
option dbu
list 1, 1 1 600 10, size
}
on *:dialog:toolbar:init:0: {
set %seps 0
mdx MarkDialog $dname
mdx SetDialog $dname style
mdx SetBorderStyle $dname 2 staticedge
mdx SetFont $dname 1 Turkish 13 800 Tahoma
mdx SetColor $dname 5,7,9,11,13,15,17,19 text $rgb(0,10,100)
mdx SetColor $dname 5,7,9,11,13,15,17,19 textbg $rgb(200,200,200)
rebar HideToolbar .
rebar Dock $dialog(toolbar).hwnd > top
mdx SetControlMDX $dname 1,3,6 Progressbar smooth > $ctl
mdx SetControlMDX $dname 1 ToolBar flat wrap arrows nodivider > $bars
mdx SetControlMDX $dname 1 ToolBar flat arrows nodivider wrap > $aux.mdx(bars)
mdx SetBorderStyle 1
did -i $dname 1 1 setscheme $rgb(212,208,200) $rgb(212,208,200)
did -i $dname 1 1 bmpsize 30 30
did -i $dname 1 1 setimage icon large icon\1.ico
did -i $dname 1 1 setimage icon large icon\2.ico
did -i $dname 1 1 setimage icon large icon\3.ico
did -i $dname 1 1 setimage icon large icon\4.ico
did -i $dname 1 1 setimage icon large icon\5.ico
did -i $dname 1 1 setimage icon large icon\6.ico
did -i $dname 1 1 setimage icon large icon\7.ico
did -i $dname 1 1 setimage icon large icon\8.ico
did -i $dname 1 1 setimage icon large icon\log.ico
did -i $dname 1 1 setimage icon large icon\mirc.ico
did -i $dname 1 1 setimage icon large icon\windows.ico
did -i $dname 1 1 setimage icon large icon\al.ico
did -i $dname 1 1 setimage icon large icon\adresdefteri.ico
did -i $dname 1 1 setimage icon large icon\gaz.ico
did -i $dname 1 1 setimage icon large icon\12.ico
did -i $dname 1 1 setimage icon large icon\korumalar.ico
did -a $dname 1 +a 1 Bağlan
did -a $dname 1 +a 3 Ayarlar
did -a $dname 1 +a 4 Temalar
did -a $dname 1 +a 5 Kanallar
did -a $dname 1 +a 6 Servisler
did -a $dname 1 +a 7 Away Menu
did -a $dname 1 +a 8 Radyo
did -a $dname 1 +a 9 Loglar
did -a $dname 1 +a 10 Arkadaş List
did -a $dname 1 +a 11 Win İşlemler
did -a $dname 1 +a 12 Mp3 Çalar
did -a $dname 1 +a 13 İnternet
did -a $dname 1 +a 14 Özel Paneli
did -a $dname 1 +a 15 Yazı Stil
did -a $dname 1 +a 16 Korumalar
rebar Dock $dialog(toolbar).hwnd > top
}

on *:dialog:toolbar:*:*: {
if $devent == sclick {
if $did == 1 {
if ($did($dname,1).sel = 2) {
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 = 3) {
sendkey ALT O
}
if ($did($dname,1).sel = 4) {
tema
}
if ($did($dname,1).sel = 5) {
_k
}
if ($did($dname,1).sel = 6) {
_serv
}
if ($did($dname,1).sel = 7) {
_away
}
if ($did($dname,1).sel = 8) {
mradyo
}
if ($did($dname,1).sel = 9) {
kayitgosterici
}
if ($did($dname,1).sel = 10) {
nlist
}
if ($did($dname,1).sel = 11) {
program
}
if ($did($dname,1).sel = 12) {
SjnPlayer
}
if ($did($dname,1).sel = 13) {
explorer
}
if ($did($dname,1).sel = 14) {
quas
}
if ($did($dname,1).sel = 15) {
yazim
}
if ($did($dname,1).sel = 16) {
dialog -m koru koru
}
}
}
}

 

Çevrimdışı

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
-
kilit