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

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - (dialog) acil Yardım Lütfen (https://www.ircforumlari.net/mirc-scripting-sorunlari/31612-dialog-acil-yardim-lutfen.html)

(dialog) acil Yardım Lütfen

Kod:

dialog goster {

  title "New Project"

  size -1 -1 150 169

  option dbu

  list 1, 0 20 150 150, size hsbar vsbar

  edit "", 2, 25 5 50 10

  text "Text No", 3, 0 5 25 8

  button "Tamam", 4, 75 5 37 10

}

arkadaşlar mesela text noya 1 girildigi ve tamam butonuna basıldıgı zaman 1.txt dosyasını dialogta göstermek istiyorum nasıl yapabilirim yardımcı olursanız sevinirim.(txt içerisinde en az 5 satır olacak)

Cevap: (dialog) acil Yardım Lütfen

Yanlı$ yere konuyu açmışsın; [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Cevap: (dialog) acil Yardım Lütfen

Kod:

alias goster { dialog -m goster goster }

Kod:

dialog goster {

  title "New Project"

  size -1 -1 150 169

  option dbu

  list 1, 0 20 150 150, size hsbar vsbar

  edit "", 2, 25 5 50 10

  text "Text No", 3, 0 5 25 8

  button "Tamam", 4, 75 5 37 10

}

on *:dialog:goster:*:*: {

  if $devent == edit && $did == 2 { set -e %n $did($did).text } 

  if $devent == sclick && $did == 4 { var %d = $+(%n,.,txt) | var %' 0 |  while %' < $lines(%d) { inc %' | did -a $dname 1 $read(%d,%') }  }

}

/goster

Cevap: (dialog) acil Yardım Lütfen

Tşk mikrop hallettim şu şekilde daha iyi oldu paylaşayım dedim

Kod:

dialog canoku {

  title " ..:: | CaN Coded | ::.."

  size -1 -1 175 153

  option dbu

  edit "", 1, 68 19 30 10, autohs

  text "Adı", 12, 13 39 50 8

  text "Soyadı", 13, 13 46 50 8

  text "Adres", 14, 13 53 50 8

  text "Müşteri No", 11, 13 20 50 8

  text "Telefon", 15, 13 60 50 8

  text "Giriş Tarihi", 16, 13 67 50 8

  text "Teslim Tarihi", 17, 13 74 50 8

  text "Yıkama Türü", 18, 13 81 50 8

  text "Alınacak ücret", 19, 13 88 50 8

  text "Müşteri no girip tamam butonuna basınız.", 20, 35 7 100 8

  edit "CaN Coded", 23, 71 139 35 10, read

  button "Tamam", 10, 105 19 53 10

  box "", 21, 3 1 167 151

  box "", 22, 9 32 156 90

  button "Yeni Kayıt", 25, 36 103 107 13

  list 2, 64 38 99 59, size

  button "Kapat", 3, 36 125 107 12, cancel

}

Kod:

on *:dialog:canoku:sclick:10: {

  if $did(1) == $null { uyari }

  else {

    oku

  }

}

alias oku {

  if ($isfile($shortfn($+($did(1),.txt))) == $true) { did -r $dname 2 | loadbuf -o $dname 2 $shortfn($+($did(1),.txt)) }

}

Senin yazdıgında 2. bir arama için sayfayı temizlemen gerekiyor bu daha iyi