Delphi – İki Sayıyı Toplatma

Merhaba arkadaşlar,

Bugün sizlere delphide iki sayıyı toplatmayı göstereceğim.

İşlemimizi yapmak için formumuzu açıyoruz ve 2 Tane Edit, 1 Tane Button ve toplamı göstermek için 1 tane label ekliyoruz.

Ekledikten sonra butona çift tıklayarak içine aşağıdaki kodları yazıyoruz.

Burada yaptırdığımız işlemler sırasıyla şöyle önce say1, say2 ve top diye değişken tanımlıyoruz, tanımladığımız değişkenlerin değerlerini nereden alacaklarını gösteriyoruz ve işlemi yaptırıyoruz.

 
procedure TForm1.Button1Click(Sender: TObject);
var
say1,say2,top:integer;
//değişkenlerimizi burada tanımladık.
begin
say1:=strtoint(edit1.Text);
say2:=strtoint(edit2.Text);
//sayıları nereden alacaklarını belirtip stringten, integere çevirdik.
top:=say1+say2;
label2.Caption:=inttostr(top);
//işlemi yaptırıp toplamı labelde integerden stringe çevirerek gösterdik.

end; 

Ve ekran çıktımız aşağıdaki gibi oldu.

 

 

Etiketler: delphi, delphi dersleri, delphi girilen iki sayıyı toplatma, delphi iki sayı toplamı, delphi toplama işlemi, delphi xe7, girilen iki sayıyı toplatma, iki sayı toplatma, programlama, yazılım
Eklenme Tarihi: 10 Ocak 2017