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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   Dialog denemesi calismadi (https://www.ircforumlari.net/mirc-scripting-sorunlari/498002-dialog-denemesi-calismadi.html)

oGuZ83 29 Temmuz 2012 13:00
Dialog denemesi calismadi
 
Kod:
alias bilgiler { dialog -a bilgiler bilgiler }
dialog bilgiler {
  title "Sozler Menusu"
  size -1 -1 137 136
  option dbu
  list 1, 5 7 127 53 size
  edit ", 2 29 74 71 10
  button "Ekle", 3, 8 87 25 12
  button "Sil", 4, 89 87 25 12
  button "Gonder", 5, 42 98 37 12
  box "Sozler", 6 1 0 135 63
  box "Fonksiyonlar", 7, 3 67 130 52
  button "Tamam", 8, 48 121 37 12
}
on *:dialog:bilgiler:init:* {
  var %i 1
  while (%i <= $lines(bilgiler.txt) ) (
  did -a bilgiler 1 $read(bilgiler.txt,%i)
  inc %i
}
}
on *:dialog:bilgiler:sclick:*: (
if ($did == 3) ( write bilgiler.txt $did(2) | did -a bilgiler 1 $did(2) )
if ($did == 4) ( write -d bilgiler.txt $did(1). seltext | did -d bilgiler 1 $did(1).sel }
if ($did == 5) ( /msg $active $did(1).seltext }
}
arkadaşlar dialog-studio programı dersi izledim -----lu ve ----- anlatanın yaptığı gibi bir dialog yapmaya çalıştım sanırım beceremedim dialogun amacı mrc klasorunde bilgiler.txt dosyası var içinde bilgiler var bunu kanala yansitmak mesela mrc de sag tik yaparak cikan dialogda yazının ustune tikladigim salonda yada ozelde nerede aktif pencere varsa oraya yansıtmak istedim ama dialogu beceremedim sonrada mrc de sag tık eklemeyi beceremedim popus'a /dialog -a bilgiler bilgiler ekledim sanirim diaolog bozuk oldugu için acmadı yardimlarınızı bekliyorum dialog da yazı eklem silmede mevcuttur

Krieq 29 Temmuz 2012 17:39
Cevap: Dialog denemesi calismadi
 
Kod:
;Kod
alias bilgiler { dialog -m bilgiler bilgiler }
dialog bilgiler {
  title "Sozler Menusu"
  size -1 -1 137 136
  option dbu
  list 1, 5 7 127 53, size
  edit "", 2, 29 74 71 10
  button "Ekle", 3, 8 87 25 12
  button "Sil", 4, 89 87 25 12
  button "Gonder", 5, 42 98 37 12
  box "Sozler", 6, 1 0 135 63
  box "Fonksiyonlar", 7, 3 67 130 52
  button "Tamam", 8, 48 121 37 12, ok
}
on *:dialog:bilgiler:init:*: {
  mdx MarkDialog $dname
  mdx SetDialog $dname bgcolor $rgb(132,112,255)
  mdx SetFont $dname 1,2,3,4,5,6,7,8 +b Turkish 10 600 Arial
  mdx SetColor $dname 1,2,3,4,5,6,7,8 textbg $rgb(132,112,255)
  mdx SetColor $dname 1,2,3,4,5,6,7,8 background $rgb(132,112,255)
  mdx SetColor $dname 1,2,3,4,5,6,7,8 text $rgb(0,0,0)
  var %i 1
  while (%i <= $lines(bilgiler.txt)) {
    did -a bilgiler 1 $read(bilgiler.txt,%i)
    inc %i
  }
}
on *:dialog:bilgiler:sclick:*: {
  if ($did == 3) { write bilgiler.txt $did(2) | did -a bilgiler 1 $did(2) }
  if ($did == 4) { write -d bilgiler.txt $did(1).seltext | did -d bilgiler 1 $did(1).sel }
  if ($did == 5) { /msg $active $did(1).seltext }
}

Renklendirme istediğin gibi yapabilirsin.Tekrar düzenledim isteğin gibi. @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

oGuZ83 29 Temmuz 2012 18:01
Cevap: Dialog denemesi calismadi
 
hocam saolasın oldu dialog acıldı ama biraz sorun var mesela dialogda Ekle Sil Gonder var bunlardan dialogun icindeki yazilari Gonder tusu ile gonderme yapiyor aktif pencereye ama Ekle kelimesi icin ekleme yapilacak bosluk yok normalde bosluk vardi bosluga kelime yaziyorduk ve oda mrc klasorundeki bilgiler.txt atiyordu ve dialogda bile gosteriyordu ve diger bir sorunda bilgiler.txt icindeki yazilar gozukuyor ama Sil tiklanildigi zaman silme yapmiyor normalde dialog icindeki kelimeleri cumleleri Sil tkladgim zaman silme yapmasi lazimdi

Entrance 29 Temmuz 2012 18:02
Cevap: Dialog denemesi calismadi
 
Kod:
;Kod
alias bilgiler { dialog -m bilgiler bilgiler }
dialog bilgiler {
  title "Sozler Menusu"
  size -1 -1 137 136
  option dbu
  list 1, 5 7 127 53, size
  edit "", 2, 29 74 71 10
  button "Ekle", 3, 8 87 25 12
  button "Sil", 4, 89 87 25 12
  button "Gonder", 5, 42 98 37 12
  box "Sozler", 6, 1 0 135 63
  box "Fonksiyonlar", 7, 3 67 130 52
  button "Tamam", 8, 48 121 37 12, ok
}
on *:dialog:bilgiler:init:*: {
  var %i 1
  while (%i <= $lines(bilgiler.txt)) {
    did -a bilgiler 1 $read(bilgiler.txt,%i)
    inc %i
  }
}
on *:dialog:bilgiler:sclick:*: {
  if ($did == 3) { write bilgiler.txt $did(2) | did -a bilgiler 1 $did(2) }
  if ($did == 4) { write -d bilgiler.txt $did(1).seltext | did -d bilgiler 1 $did(1).sel }
  if ($did == 5) { /msg $active $did(1).seltext }
}

oGuZ83 29 Temmuz 2012 18:04
Cevap: Dialog denemesi calismadi
 
Entrance senin yazdigin kodda sorunlar cozulmus Tsk ederim :)

Krieq 29 Temmuz 2012 18:23
Cevap: Dialog denemesi calismadi
 
Alıntı:
oGuZ83 Nickli Üyeden Alıntı (Mesaj 1041183124)
hocam saolasın oldu dialog acıldı ama biraz sorun var mesela dialogda Ekle Sil Gonder var bunlardan dialogun icindeki yazilari Gonder tusu ile gonderme yapiyor aktif pencereye ama Ekle kelimesi icin ekleme yapilacak bosluk yok normalde bosluk vardi bosluga kelime yaziyorduk ve oda mrc klasorundeki bilgiler.txt atiyordu ve dialogda bile gosteriyordu ve diger bir sorunda bilgiler.txt icindeki yazilar gozukuyor ama Sil tiklanildigi zaman silme yapmiyor normalde dialog icindeki kelimeleri cumleleri Sil tkladgim zaman silme yapmasi lazimdi
pek bakmamıştım senin dialog yanlış yaptığını sanmıştım sadece.yukardaki mesajımdaki kodu tekrar düzenledim istediğin gibi.ekleme silme yapabilirsin tekrar al kodu.


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 20:09.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2026, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk