3 adet editbox ve bir adette buton yardımıyla iki sayı toplama işlemi yapan delphi örneği:

sizde delphi kod ekranında bu tasarımı hazırlayın ve ardından topla ismini verdiğiniz butona girerek:


procedure TForm1.Button1Click(Sender: TObject);
begin
edit3.text:=inttostr(strtoint(edit1.text)+strtoint(edit2.text));
end;


bu kodları ekleyin.

Bu arada:

InttoStr(numeric değer): Numeric değeri stringe çevirir.
StrtoInt(string değer): String bir değeri nümeriğe çevirir.

programı RUN çalıştırdığınızda edit kutucuklara toplamak istediğiniz degerleri girin topla butonuna tıklandığında sonucu edit3.text kutucuğuna yazacaktır. (tabi edit kutucukların name özelliğiyle oynamadıysanız. )