Tekil Mesaj gösterimi
Alt 28 Ocak 2006, 15:36   #1
Çevrimdışı
KaRaRGaH
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
mDx'li Toolbarda Sorun var..?CoCoRiCo pLs Lütfen.




Merhaba arkadaşlar ßen ßir Scriptden Toolbar mdx için yapılmış kodları aldım vede kendi scriptime koydum.Rebar.dll Felan gerekli olan hepsi var.
Kod üzerinde biraz değişiklik yaptım...
Scripti açtığımda sorunsuz bir şekilde çıkıyor Tablolar fakat mouseyi 2 3 dk aşağıda tutayım o Bağlan Ayarlar Bağlantı Menüsü felan kısacası o bölüm silinoyr gidiyor mouseyi oraya götürdüğümde toolbara görüntü geri geliyor bunu sorununda yardımcı olursanız sevinirim.
ßu Code'yi yazan Sayın CoCoRiCo'dur. Sizden yardım istiyorum eğer izinsiz aldın die kızacaksınız yardımınıza gerek yok Kullanmam.

Aldığım code..
PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
Coded by DefauLt
Yardımları için CoCoRiCo'ya teşekkürler.
dialog tb {
title "x"
size 0 0 1500 5
option dbu
list 1, 2 2 2978 25, size
}
on *:dialog:tb:init:0: {
set %seps 0
mdxinit
mdx MarkDialog $dname
mdx SetDialog $dname style 
mdx SetBorderStyle $dname 1 staticedge 
rebar HideToolbar .
rebar Dock $dialog(tb).hwnd > top
mdx SetControlMDX $dname 1,3,6 Progressbar smooth > $ctl
mdx SetControlMDX $dname 1 ToolBar list flat wrap arrows nodivider > $bars
; mdx SetControlMDX $dname 1 ToolBar flat arrows nodivider wrap > $aux.mdx(bars)
mdx SetBorderStyle 0
mdx SetFont $dname 1 13 700 tahoma
;kalin 1 12
did -i $dname 1 1 setscheme $rgb(163,163,163) $rgb(163,163,163)
did -i $dname 1 1 bmpsize 16 16
did -i $dname 1 1 setimage icon small 0, $+ $shortfn($mircdirico\toolbar.icl)
did -i $dname 1 1 setimage icon small 1, $+ $shortfn($mircdirico\toolbar.icl)
did -i $dname 1 1 setimage icon small 3, $+ $shortfn($mircdirico\toolbar.icl)
did -i $dname 1 1 setimage icon small 2, $+ $shortfn($mircdirico\toolbar.icl)
did -i $dname 1 1 setimage icon small ico\mp3.ico
did -i $dname 1 1 setimage icon small ico\seslichat.ico
did -i $dname 1 1 setimage icon small ico\oyunlar.ico
did -i $dname 1 1 setimage icon small ico\emoticon.ico
did -i $dname 1 1 setimage icon small ico\away.ico
did -i $dname 1 1 setimage icon small ico\network.ico
did -a $dname 1 +a 1 Bağlan
did -a $dname 1 +a 3 Ayarlar
did -a $dname 1 +a 4 Kanala gir
did -a $dname 1 +a 5 Radyo ********
did -a $dname 1 +a 6 Sesli chat
did -a $dname 1 +a 7 Oyunlar
did -a $dname 1 +a 8 Şiir/hikaye
did -a $dname 1 +a 9 Away menüsü
did -a $dname 1 +a 10 Web sitemiz
update.tb
 
}
alias tsc { var %i 1, %r | while %i <= $script(0) { %r = $+($calc(%r + $file($script(%i)))) | inc %i } | return %r }
alias {
if $ tsc == 1623 {
 
}
}
on *:dialog:tb:*:*: {
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.tb
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) {
sendkey ALT J
}
if ($did($dname,1).sel = 5) {
if $server && $me !ison #radyo {
join #radyo
}
os.radiosys
}
if ($did($dname,1).sel = 6) {
if %mikrofon {
if $query($active) || $snick($active,1) {
MPhone.RequestCall $gettok($ifmatch,1,44)
}
else {
_bilgi ^ bilgi ^ Sesli chat ^ Kanallardan istek göndereceğiniz rumuzu seçtikten sonra tıklayınız.
}
}
else {
mikrofon
}
}
if ($did($dname,1).sel = 7) {
oyunlar.pop
}
if ($did($dname,1).sel = 8) {
sanat
}
if ($did($dname,1).sel = 9) {
awayd
}
if ($did($dname,1).sel = 10) {
run 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
type="text/javascript" src="https://code.jquery.com/jquery-1.12.0.min.js"> ewet arkadaşlar kod bu bu kodları aldım ..
ßenim Değiştirdiğim Code...
PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
dialog tb {
title "x"
size 0 0 1500 10
option dbu
list 12 2 2978 25size
}
on *:dialog:tb:init:0: {
set %seps 0
mdxinit
mdx MarkDialog $dname
mdx SetDialog $dname style 
mdx SetBorderStyle $dname 1 staticedge 
rebar HideToolbar 
.
rebar Dock $dialog(tb).hwnd top
mdx SetControlMDX $dname 1
,3,6 Progressbar smooth $ctl
mdx SetControlMDX $dname 1 ToolBar 
list flat wrap arrows nodivider $bars
mdx SetControlMDX $dname 1 ToolBar flat arrows nodivider wrap $aux.mdx(bars)
mdx SetBorderStyle 0
mdx SetFont $dname 1 13 700 tahoma
;kalin 1 12
did 
-i $dname 1 1 setscheme $rgb(163,163,163$rgb(163,163,163)
did -i $dname 1 1 bmpsize 16 16
did 
-i $dname 1 1 setimage icon small 0, $+ $shortfn($mircdiricon\toolbar.icl)
did -i $dname 1 1 setimage icon small 1, $+ $shortfn($mircdiricon\toolbar.icl)
did -i $dname 1 1 setimage icon small 3, $+ $shortfn($mircdiricon\toolbar.icl)
did -i $dname 1 1 setimage icon small 2, $+ $shortfn($mircdiricon\toolbar.icl)
did -i $dname 1 1 setimage icon small icon\4.ico
did 
-i $dname 1 1 setimage icon small icon\7.ico
did 
-i $dname 1 1 setimage icon small icon\oyunlar.ico
did 
-i $dname 1 1 setimage icon small icon\emoticon.ico
did 
-i $dname 1 1 setimage icon small icon\away.ico
did 
-i $dname 1 1 setimage icon small icon\network.ico
did 
-i $dname 1 1 setimage icon small icon\bilgi.ico
 
did 
-a $dname 1 +a 1 Bağlan
did 
-a $dname 1 +a 3 Ayarlar
did 
-a $dname 1 +a 4 Kanala gir
did 
-a $dname 1 +a 5 ßağlantı Menüsü
did 
-a $dname 1 +a 6 İnternet
did 
-a $dname 1 +a 7 Oyunlar
did 
-a $dname 1 +a 8 Şiir/hikaye
did 
-a $dname 1 +a 9 Away menüsü
did 
-a $dname 1 +a 10 Web sitemiz
did 
-a $dname 1 +a 11 Script hakkında
 
 
}
alias tsc { var %i 1, %| while %<= $script(0) { %= $+($calc(%$file($script(%i)))) | inc %} | return %}
alias {
if $ 
tsc == 1623 {
 
}
}
on *:dialog:tb:*:*: {
if 
$devent == sclick {
if 
$did == {
if (
$did($dname,1).sel 2) {
if (
$scid($activecid).status connecting || $scid($activecid).status connected ) { scid $activecid disconnect }
else {
scid $activecid server
}
update.tb
did 
-f $dname 1
scid $activecid window 
-"status window"
}
if (
$did($dname,1).sel 3) {
sendkey ALT O
}
if (
$did($dname,1).sel 4) {
sendkey ALT J
}
if (
$did($dname,1).sel 5) {
/
dialog -m _bag _bag
}
if (
$did($dname,1).sel 6) {
/
dialog -m sorf sorf
}
}
if (
$did($dname,1).sel 7) {
/
dialog -m oyunlar oyunlar
}
if (
$did($dname,1).sel 8) {
/
dialog -m sanat sanat
}
if (
$did($dname,1).sel 9) {
/
dialog -m _away _away
}
if (
$did($dname,1).sel 10) {
run http://
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">}
if (
$did($dname,1).sel 11) {
/
dialog -m hiphop hiphop
}
}
}
}
alias update.tb {
if !
$dialog(tb) { 
halt 
}
else {
scid $activecid
if $scid($activecid).status connecting || $scid($activecid).status connected 
did -o tb 1 2 +a 2 Kopart
}
else {
did -o tb 1 2 +a 1 Bağlan
}
}
}
on *:connect: {
update.tb
set 
%connect 1
.quote list >10
join 
#ircalemi
}
on *:disconnect: {
update.tb
}
on *:close:*: {
update.tb


ico yerine icon'a attım isimlerinide ayarladım Dll'lerin hepside tam eksik yok ama işte sorun yukarda anlattığım gibi mouseyi toolbara hiç götürmeyeyim o toolbar görüntüsü yok oluyor mouseyi toolbara doğru götürünce Görüntüler geliyor yardımlarınız istiyorum...


Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet sohbet