Neler yeni
MEGAForum - Teknoloji Forumu

Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı yada giriş yapmalısınız. Forum üye olmak tamamen ücretsizdir.

  • Web sitemizin içeriğine ve tüm hizmetlerimize erişim sağlamak için Web sitemize kayıt olmalı ya da giriş yapmalısınız. Web sitemize üye olmak tamamen ücretsizdir.
  • Sohbetokey.com ile canlı okey oynamaya ne dersin? Hem sohbet et, hem mobil okey oyna!
  • Soru mu? Sorun mu? ''Bir Sorum Var?'' sistemimiz aktiftir. Paylaşın beraber çözüm üretelim.

Small Basic Kapatma Yazılımı

Rinnar

MFC Üyesi
  • Üyelik Tarihi
    17 Haz 2015
  • Mesajlar
    68
  • MFC Puanı
    0
Size daha önce yazılımı geriye doğru sayarak kapatma kodlarını vermiştim. Bu sefer onu biraz daha geliştirerek programların sonlarında kullanabileceğimiz hale getireceğiz. Kodumuz şu ;

Kod:
TextWindow.WriteLine("Kapatmak istiyorsan eğer ")
TextWindow.ForegroundColor = "Blue"
TextWindow.Write("kapat ")
TextWindow.ForegroundColor = "Gray"
TextWindow.Write("yazman yeterli.")
TextWindow.WriteLine("")
TextWindow.WriteLine("")
cevap = TextWindow.Read()
If cevap = ("kapat") Then
  Goto kapat
EndIf
kapat:
TextWindow.WriteLine("")
TextWindow.WriteLine("")
TextWindow.Write("Program ")
Program.Delay(325)
TextWindow.Write("kapatılıyor")
Program.Delay(250)
TextWindow.Write(".")
Program.Delay(250)
TextWindow.Write(".")
Program.Delay(250)
TextWindow.Write(".")
TextWindow.WriteLine("")
TextWindow.WriteLine("")
Program.Delay(750)
TextWindow.ForegroundColor = "Red"
TextWindow.WriteLine("Geri sayım başlıyor...")
TextWindow.ForegroundColor = "Gray"
TextWindow.WriteLine("")
TextWindow.WriteLine("")
TextWindow.WriteLine("5")
Program.Delay(1000)
TextWindow.WriteLine("4")
Program.Delay(1000)
TextWindow.WriteLine("3")
Program.Delay(1000)
TextWindow.WriteLine("2")
Program.Delay(1000)
TextWindow.WriteLine("1")
Program.Delay(1000)
Program.End()

Bu sefer bunun biraz daha gelişmiş olmasının sebebi şu, textwindowa başta şunu yazdırdım;

Kapatmak istediğine emin misin?

Kapatmak istiyorsan kapat yazman yeterli.

Böylelikle programa kapat yazdığımızda , şu yazıyı vericek;

Program kapatılıyor.

(Ve biraz daha renklendirdim bu cümleyi kırmızı yaptım)

Geri sayım başlıyor...

Ardından geri sayımı 5'ten geriye doğru başlatarak programı otomatik kapattırdım. Böylelikle bunu bazı yazılımlarınızda kullanabilirsiniz. :)
 
Üst Alt