Selamlar;
bir önceki yazımızda merhaba dünya yazmayı öğrenmiş olup Delphi IDE ile çalışmayı öğrenmeye başlamıştık.Önceki yazımızda tool palette ve diğerlerini anlattığımız için burada uzun uzun yazmıyoruz.
Şimdi ekranımıza 3 tane edit.Text kutusu ve bir adet button bırakalım ve Button tıklama eventina
toplama işlemimiz için kodumuzu yazalım.(Tool paletteki Tedit olan compenant)
Amacımız iki text ten alacağımız sayıları toplayıp 3. text yazmak.Yani Edit1.Text ve Edit2.Text teki sayıları toplayıp Edit3.Text' e yazalım.
button 1 in click evintina şunları yazmalısınız.
Kodun açıklaması söyle.Önce edit1 ve edit2 deki stringleri integer'a çeviriyoruz (karekterden tamsayıya) sonra iki tamsayıyı topluyoruz.Oluşan tam sayıyı tekrar stringe çevirip edit3.text'e yazıyoruz.
Evet yeni bir komut daha öğrendik.stringi integere convert (çevirme) StrToInt ve diğer
komudumuzda integerı stringe çevimre IntToStr.
Programı f9 ile çalıştırıp edit1.text e 5 ve edit2.text' 4 değerlerini girip button1 tıklarsınız
edit3.Textte 9 yazacaktır.
Peki tam sayı değil de gerçek sayı ile bu işlemi yaparsak ne olur.? girdiğiniz değer için bu bir int değildir yazacaktır.Bir sonraki yazımızda bu konuyu anlatacağız.
bir önceki yazımızda merhaba dünya yazmayı öğrenmiş olup Delphi IDE ile çalışmayı öğrenmeye başlamıştık.Önceki yazımızda tool palette ve diğerlerini anlattığımız için burada uzun uzun yazmıyoruz.
Şimdi ekranımıza 3 tane edit.Text kutusu ve bir adet button bırakalım ve Button tıklama eventina
toplama işlemimiz için kodumuzu yazalım.(Tool paletteki Tedit olan compenant)
Amacımız iki text ten alacağımız sayıları toplayıp 3. text yazmak.Yani Edit1.Text ve Edit2.Text teki sayıları toplayıp Edit3.Text' e yazalım.
button 1 in click evintina şunları yazmalısınız.
edit3.Text:=InttoStr(strtoint(edit1.Text)+strtoint(edit2.Text));
Kodun açıklaması söyle.Önce edit1 ve edit2 deki stringleri integer'a çeviriyoruz (karekterden tamsayıya) sonra iki tamsayıyı topluyoruz.Oluşan tam sayıyı tekrar stringe çevirip edit3.text'e yazıyoruz.
Evet yeni bir komut daha öğrendik.stringi integere convert (çevirme) StrToInt ve diğer
komudumuzda integerı stringe çevimre IntToStr.
Programı f9 ile çalıştırıp edit1.text e 5 ve edit2.text' 4 değerlerini girip button1 tıklarsınız
edit3.Textte 9 yazacaktır.
Peki tam sayı değil de gerçek sayı ile bu işlemi yaparsak ne olur.? girdiğiniz değer için bu bir int değildir yazacaktır.Bir sonraki yazımızda bu konuyu anlatacağız.
