Çözebilecek olan var mı ? Delphi

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
masalkutusu
Üye
Mesajlar: 2
Kayıt: 06 Oca 2017 12:17

Çözebilecek olan var mı ? Delphi

Mesaj gönderen masalkutusu »

1 - Form1 üzerinde edtS1, edtS2 ve edtS3 isimli 3 EDIT nesnesi, lbxToplamlar isimli 1 LISTBOX nesnesi, lblTurSayisi, lblBuyukSayi, lblToplam, lblCiftTek ve lblListeToplami isimli 5 LABEL nesnesi, btnAnaliz isimli 1 BUTTON vardır. Buttona her basıldığında tıklandığında, aşağıdaki işlemlerin hepsi, aşağıdaki sırayla tek prosedür içinde yapılacak:
  • • lblTurSayisi’nin üzerindeki rakam 1 arttırılacak.
  • • lblTurSayisi’nin üzerindeki rakam 11 olunca btnAnaliz buttonu pasif (tıklanamaz) edilecek..
  • • edtS1, edtS2 ve edtS3 değerlerinin toplamı lblToplam’a yazılacak ve lbxToplamlar’a eklenecek
  • • Editlere girilen bu üç değerden hangisinin büyük olduğunu bulup, büyük olanı “1. Sayı büyük sayıdır” şeklinde yazacak…
  • • lbxToplamlar’ın toplamı her defasında yeniden hesaplanıp lblListeToplami etiketine yazılacak.
  • • lblListeToplami etiketindeki değer tek ise lblCiftTek etiketine “Son Toplam TEK SAYIdır”
    çift ise “Toplam ÇİFT SAYIdır” yazacak.

2 -puanlar.txt” isimli text dosyasında noktalı virgül ile ayrılmış NUMARA;DERSKODU;NOTU;SONUC bilgilerini içeren satırlar bulunmaktadır. SONUC bilgisi 1 olanlar başarılı, 0 olanlar ise başarısız demektir. Başarılı ve Başarısız olanların NOTU bilgisinin TOPLAM, ADET ve ORTALAMAsını ayrı ayrı bulup ekrana yazan DELPHI kodunu yazınız.
Cevapla