Çevrimdışı

arkadaşlar, aşağıdaki kodlamamda update toolbar kısmında ( kırmız ile belirttim) bağlan ve kes dediğimde iconların değişmesini yapmadım hatam nerede. nasıl yapmalıyım did -i değilde did -o mu olmalı.

teşekkürler




on *:start: { 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 -i $dname 1 2 setimage icon large 0, $+ icon\kes.ico

}
else {
did -i $dname 1 2 setimage icon large 0, $+ icon\baglan.ico

}
}
}
dialog toolbar {
title ""
size 5 5 5 18
option dbu

list 2, 5 4 33 17, size
list 3, 25 4 53 17, size
list 4, 70 4 53 17, size
list 5, 108 4 33 17, size
list 6, 142 4 33 17, size
list 7, 168 4 33 17, size
list 8, 200 4 33 17, size
list 9, 229 4 35 17, size
list 11, 289 7 17 8, size
list 12, 304 7 17 8, size
list 13, 320 7 17 8, size
list 14, 335 7 17 8, size
text "TutkuyuzFM", 15, 289 0 45 7
}
on *:dialog:toolbar:init:0: {
mdx MarkDialog $dname
mdx SetDialog $dname style
mdx SetFont $dname 1 11 700 Verdana
rebar HideToolbar .
rebar Dock $dialog(toolbar).hwnd > top
mdx SetControlMDX $dname 1 Progressbar smooth > $ctl
mdx SetControlMDX $dname 1 ToolBar flat wrap arrows nodivider > $bars
mdx SetControlMDX $dname 2,3,4,5,6,7,8,9,11,12,13,14,15 Toolbar flat wrap arrows nodivider > $bars
mdx SetControlMDX $dname 2,3,4,5,6,7,8,9,11,12,13,14,15 Progressbar smooth > $ctl
mdx SetBorderStyle $dname 2,3,4,5,6,7,8,9,11,12,13,14,15
mdx SetFont 1,2,3,4,5,6,7,8,9,11,12,13,14,15 -8 700 Tahoma
mdx SetDialog [ $dname ] bgcolor $rgb(210,210,210)
mdx SetColor $dname 1,2,3,4,5,6,7,8,9,15 background $rgb(210,210,210)
mdx SetColor $dname 11,12,13,14 background $rgb(116,125,140)
mdx SetColor $dname 15 text $rgb(0,51,255)
mdx SetColor $dname 2,3,4,5,6,7,8,9,15 background $rgb(210,210,210)
mdx SetColor $dname 15 textbg $rgb(210,210,210)


did -i $dname 2 1 bmpsize 32 32
did -i $dname 2 1 setimage icon large 0, $+ icon\baglan.ico
did -a $dname 2 1 Bağlan
did -i $dname 3 1 bmpsize 32 32
did -i $dname 3 1 setimage icon large 0, $+ icon\bgmenu.ico
did -a $dname 3 1 Bağlantı Menüsü
did -i $dname 4 1 bmpsize 32 32
did -i $dname 4 1 setimage icon large 0, $+ icon\avay.ico
did -a $dname 4 1 Away Menüsü
did -i $dname 5 1 bmpsize 32 32
did -i $dname 5 1 setimage icon large 0, $+ icon\ozkb.ico
did -a $dname 5 1 Özel Kabul
did -i $dname 6 1 bmpsize 32 32
did -i $dname 6 1 setimage icon large 0, $+ icon\ktpnl.ico
did -a $dname 6 1 Ayarlar
did -i $dname 7 1 bmpsize 32 32
did -i $dname 7 1 setimage icon large 0, $+ icon\nik.ico
did -a $dname 7 1 Nick Değiş
did -i $dname 8 1 bmpsize 32 32
did -i $dname 8 1 setimage icon large 0, $+ icon\op.ico
did -a $dname 8 1 Op OL
did -i $dname 9 1 bmpsize 32 32
did -i $dname 9 1 setimage icon large 0, $+ icon\deop.ico
did -a $dname 9 1 Deop OL
did -i $dname 11 1 bmpsize 27 27
did -i $dname 11 1 setimage icon large 0, $+ icon\cal.ico
did -a $dname 11 1 Çal
did -i $dname 12 1 bmpsize 27 27
did -i $dname 12 1 setimage icon large 0, $+ icon\dur.ico
did -a $dname 12 1 Dur
did -i $dname 13 1 bmpsize 27 27
did -i $dname 13 1 setimage icon large 0, $+ icon\art.ico
did -a $dname 13 1 Arttır
did -i $dname 14 1 bmpsize 27 27
did -i $dname 14 1 setimage icon large 0, $+ icon\eksi.ico
did -a $dname 14 1 Azalt
}

on *:dialog:toolbar:sclick:*: {

if $did == 2 { if ($scid($activecid).status = connecting || $scid($activecid).status = connected ) { scid $activecid disconnect } | else { scid $activecid server } scid $activecid window -a "status window" }


if $did == 3 { baglantıayarları }
if $did == 5 { qblock }
if $did == 7 { degis }


}
alias mdx { return $dll(icon\DLL\mdx.dll,$1,$2-) }
alias mdxdll { return $dll(icon\DLL\mdx.dll,$1,$2-) }
alias rebar { dll icon\DLL\rebar.dll $$1- }
alias bars { return icon\DLL\bars.mdx }

 

Çevrimdışı

biraz kurcaladım beğenirsen eksik yerleri tamamlarsın

 

Çevrimdışı

hocam yine imdadıma sen yetiştin. Çok teşekkur ediyorum.
benim daha onceki kodlama şeklimde öyleydi. Onda sorun yaşıyorum o yuzden herbirine tek tek list oluşturup yeniden yapmışıtım. Diğer türlü id leri karıştırıyorum. oyuzden eski kodu yapmaya çalışıcam. yinede ellerine sağlık