Forum
Aktif konular
Üyeler
Kurallar
Arama
Tahribat.com Forumları 
Delphi - Pascal 
[Beyaz Tahribat] Delphi"De 4 İşlem (+ - * /) Ve Değişken Kullanımı [Beyaz Tahribat] Delphi"De 4 İşlem (+ - * /) Ve Değişken Kullanımı
-
Daha çok yeni başlayanlar için uygun bir projeyi adım adım yapacağız, Delphi'de 4 ana işlemi uygulamalı olarak inceleyeceğiz.
Hemen yeni bir proje oluşturuyoruz. Karşımıza Şekildeki gibi boş bir form gelecek.
Ardından forma gerekli bileşenleri ekleyerek şekildeki duruma getiriyoruz.
Görüldüğü gibi 3 adet Edit, 1 RadioGroup, ve 1 Button yerleştirdik, formu istediğiniz gibi dizayn edebilirsiniz. İlk 2 edite sayılar girilecek ve 3. editte işlemin soucu gösterilecek.
Dizayn işlemi bittikten sonra şimdi sıra kodlamaya geldi. Butonumuzun OnClick event ine giriyoruz, butona çift tıkalyarakta aynı şeyi yapabilirsiniz. ve çıkan yere şu kodları giriyoruz;
case RadioGroup1.ItemIndex of
0 : Edit3.Text:=IntToStr(StrToInt(Edit1.Text)+StrToInt(Edit2.Text));
1 : Edit3.Text:=IntToStr(StrToInt(Edit1.Text)-StrToInt(Edit2.Text));
2 : Edit3.Text:=IntToStr(StrToInt(Edit1.Text)*StrToInt(Edit2.Text));
3 : Edit3.Text:=IntToStr(StrToInt(Edit1.Text) div StrToInt(Edit2.Text));
end;
Şimdi kodları açıklayalım;- case .. of yapısıyla RadioGroup ta seçil olan işleme göre hesap yaptırıyoruz.
Toplama işlemini ayrıntılı inceleyelim, zaten diğerlerinde de mantık aynı..
- StrToInt ile edit1.text teki değeri integer e çevirioyruz, artık üzerinde matematiksel işlem yapılabilir.
- Aynı işlemi 2. edit içinde uyguluyoruz.
- İşlemi yaptırdıktan sonra ortaya integer bir sonuç çıkıyor
- Fakat 3. editte bu sonucu gösteremeyiz, çünkü edit1.text string bir değer.
- O yüzden Sonucu IntToStr ile string e çeviriyoruz.
- ve çıkan sonucu Edit3 te gösteriyoruz.
Ve ufak programımız bitiyor. Fakat proje geliştirilmeye açık, daha da güzelleştirilmek istenirse edit1 ve edit2 den sadece sayı girilmesini sağlayabiliriz. Bu haliyle editlere harf te girilebilir. ve eğer harf girilirse program hata verip kapanır. Fakat şidilik için bu bizimi için yeterli,..
Bir dahaki makalede görüşmek üzere... Hoşçakalın, kafanıza takılan soruları sormaktan çekinmeyin, ve yorumlarınızıda eksik etmeyin..Kendi bölogumdan alıntı;
-
beyaz tahribat projesi tutmuşa benziyor :)
aferim lan hodbod :C
bu arada nerde la klima :|
beyaz tahribat klima yapımı diye bi başlık bekliyorum senden :D
-
FOXXLY bunu yazdı:
-----------------------------beyaz tahribat projesi tutmuşa benziyor :)
aferim lan hodbod :C
bu arada nerde la klima :|
beyaz tahribat klima yapımı diye bi başlık bekliyorum senden :D
-----------------------------abi klima fiyaskoyla sonuçlandı, yoksa unuttuğumdan değil. ama genede yapımıın anlatsammı bilmiyorum, bildiğin buzlu klima mantığı işte, fan havayı alıyor, içinde buz dolu bi tünele üflüyor, tünelin diğer ucundan serin ve temiz hava çıkıyor. ama 3-4 gün sonra iğrenç, akvaryum gibi kokan bir hava üflüyor, ve çöpe atılıyor, günde 3-4 kez suyunu buzunu değiştirmeme rağmen genede pis kokuyordu, ve gitgide daha kötü kokmaya başladı bende kaldırdım ger eski fanımı taktım, kuru ve tozlu bir hava üflüyor suratıma ve suratımdaki terin daha hızlı buharlaşmasını sağlıyor şu yazıyı yazdığım anda. eğer o kokuyu yok etme şansımız olsa tekrar kullanırım onu...
-
ya ben büyük bi motor bulamadım :/ bendekiler küçük kalıyo. usb nin enerjiside düşük olduğundan kasadan çıkardığuım fan çalışmıyor :-/
-
teşekkürler dostum.. nostalci yaptım delphi kodlarına bakıp.. ne güzel bir syntax tır bu ya, c# ebemi körüklüyor :)
-
FOXXLY bunu yazdı:
-----------------------------ya ben büyük bi motor bulamadım :/ bendekiler küçük kalıyo. usb nin enerjiside düşük olduğundan kasadan çıkardığuım fan çalışmıyor :-/
-----------------------------en yakın elektronikçide var. ben burda 6cm x 6cm 12 volt 0.15 A fanı 2 ytl ye aldım, şimdi o bana hava üflüyor. power supply den gücünü alıyor.
edittttt: eğer şartlar böyle gerektiriyorsa ve yapamıyorsan şunlara bak;
http://urun.gittigidiyor.com/USB-FAN-usb-pervane-2-YIL-GARANTILI-HEDIYE_W0QQidZZ11185106
http://urun.gittigidiyor.com/USB-FAN-ISIKLI-DUGMELI-VE-2-YIL-GARANTILI-HEDIYE_W0QQidZZ11185084
-
Sağolasın kardeş delphiye başlıcaktım ama böyle kaynakları bulamıyordum pascal işine dönmesin benim için buda :) Lütfen beyaz tahribata ara vermeyin ve delphi konularını atlamayın...
-
ZoRKaYa bunu yazdı:
-----------------------------Sağolasın kardeş delphiye başlıcaktım ama böyle kaynakları bulamıyordum pascal işine dönmesin benim için buda :) Lütfen beyaz tahribata ara vermeyin ve delphi konularını atlamayın...
-----------------------------reklam gibi olacak ama amaç reklam deil, bilgilendirmek
http://www.whosayin.com adresini 1 haftadır açtım, kişisel blogum, orda bu tür makaleler yayınlayacağım sık sık. istersen arada sırada bakabilirsin. -
güzel olmuş diyecem ama delphi hiç bilmediğimden bir yorumda bulanamıyorum.(ama güzel olmuştur;))
tavsiye edeceğiniz delphi kitabı var mı?
-
Esquire bunu yazdı:
-----------------------------güzel olmuş diyecem ama delphi hiç bilmediğimden bir yorumda bulanamıyorum.(ama güzel olmuştur;))
tavsiye edeceğiniz delphi kitabı var mı?
-----------------------------marco cantu
edit: marco cantu derken, kitabın yazarı marco cantu, kitabın adı .. :S pek çok kitabı var, internetten e book olarak bulabilirsin www.marcocantu.com/ kendi sitesindede faydalı şeyler var.
-
Esquire bunu yazdı:
-----------------------------güzel olmuş diyecem ama delphi hiç bilmediğimden bir yorumda bulanamıyorum.(ama güzel olmuştur;))
tavsiye edeceğiniz delphi kitabı var mı?
-----------------------------
İçindekiler:
KONU 01: delphi’ YE GİRİŞ
KONU 02: delphi’ NİN TEMELLERİKONU 03: delphi’ DE ATAMA İŞLEMLERİ & OPERATÖRLER
KONU 04: delphi’ DE DALLANMA & DÖNGÜ KOMUTLARI
KONU 05: delphi’ DE FONKSİYON & PROSEDÜRLER
KONU 06: BİLGİLENDİRME PENCERELERİ
KONU 07: delphi’ DE HATA YAKALAMA
KONU 08: delphi’ DE UNIT KAVRAMI
KONU 09: delphi’ DE CLASS YAPISI
KONU 10: İŞARETÇİLER & KATARLAR
KONU 11: DLL DOSYALARI OLUŞTURMAK
KONU 12: delphi FONKSİYONLARI
KONU 13: delphi KONTROLLERİ
KONU 14: delphi YORDAMLARI
KONU 15: delphi’ DE DRAG & DROP
KONU 16: delphi’ DE KONTROL ve YORDAMLARI KODLA OLUŞTURMAK
KONU 17: delphi’ DE VERİ TABANI
KONU 18: REGISTRY İŞLEMLERİ
KONU 19: KONTROL OLUŞTURMAK
KONU 20: delphi’ DE .NET TEKNOLOJİSİ
KONU 21: delphi’ DE UZMANLAR İÇİN ÖRNEK KODLAR
KONU 22: SETUP PROJESİ OLUŞTURMAKhttp://rapidshare.com/files/30802226/delphi.rar.html
By_Gizemli
Kısayol
Şikayet
Özel Mesaj
Alıntı yap
Cevapla