Teknoloji Haberleri
Aşağı Git
Tüm Forumlar
Web Tasarım - Programlama
Yazılım Geliştirme
Delphi / C++ /Vb
Delphi 7 hesap makinesi ödevi
Bu konudaki kullanıcılar: 1 misafir
4
Cevap 7847
Tıklama 0
Öne Çıkarma
Cevap 7847
Tıklama 0
Öne Çıkarma
1. sayfa
-
Delphi 7 hesap makinesi ödevi
Teşekkürler. Fakat daha delphide yeniyim. Hoca 1 ders işledi yarım bir hesap makinesi yaptı devamını da siz araştırın yapın dedi. Kodları yukardaki gibi ona benzer nasıl yapabilirim? Bunlardan pek bişey anlamadım da  |
Bu mesaja 1 cevap geldi.
| ordak kodları incele, temel şeyler aynı zaten, işine yarayacaklarını indir ve incele.. |
Bu mesaja 1 cevap geldi.
Konuya hort 2 yıl okulda miğde bulandırıca C# dan sonra DELPHI öğrenmeye karar verdim.Çok gelişmiş bir hesap makınası yapmaya çalışıyorum.Karekök ve yüzde de alması gerekiyor pozitif sayılar için karekök kodunu var ama aynı işlemde negatif değerde sayılara uygulamalı.sqrt komutu işime yaramaz.Ayrıca "sıfırla"butonu da koyacagım.Şu 3 kodu bilen bana gösterebilir mi? |
< Bu mesaj bu kişi tarafından değiştirildi kacaksevgilim -- 2 Ekim 2012; 11:35:56 >
1. sayfa
DH Mobil uygulaması ile devam edin.
Mobil tarayıcınız ile mümkün olanların yanı sıra, birçok yeni ve faydalı özelliğe erişin.
Gizle ve güncelleme çıkana kadar tekrar gösterme.
Çarpma butonu için girdiğim kodlar:
islem:=3;
Sonuc := Sonuc * StrToInt(Edit1.Text);
Edit1.Text:=IntToStr(Sonuc);
toplama için girdiğim kodlar:
islem:=1;
Sonuc := Sonuc + StrToInt(Edit1.Text);
Edit1.Text:=IntToStr(Sonuc);
If SayiGirildi=1 Then
Begin
Edit1.Text:= '0' ; SayiGirildi:=0;
End;
eşittir için girdiğim kodlar:
If islem = 1 Then Sonuc := Sonuc + StrToInt(Edit1.Text);
If islem = 2 Then Sonuc := Sonuc - StrToInt(Edit1.Text);
If islem = 3 Then Sonuc := Sonuc * StrToInt(Edit1.Text);
Edit1.Text := IntToStr(Sonuc);
SayiGirildi := 1 ; Sonuc := 0 ;
Nerde yanlışım var? Çalışması için ne yapmam lazım? Ayrıca trigonometrik hesaplar ve integral, türev hesaplarını nasıl eklerim? teşekkürler...
DH forumlarında vakit geçirmekten keyif alıyor gibisin ancak giriş yapmadığını görüyoruz.
Üye Ol Şimdi DeğilÜye olduğunda özel mesaj gönderebilir, beğendiğin konuları favorilerine ekleyip takibe alabilir ve daha önce gezdiğin konulara hızlıca erişebilirsin.