Сейчас я покажу как на Delphi можно создать простой калькулятор. Бросай на форму компоненты CheckBox - 4шт. Edit - 2шт. Label и Button procedure TForm1.Button1Click(Sender: TObject); var a, b, rezult : integer; begin a := StrToInt(Edit1.Text); b := StrToInt(Edit2.Text); if CheckBox1.Checked = True then rezult := a + b; if CheckBox2.Checked = True then rezult := a - b; if CheckBox3.Checked = True then rezult := a * b; if CheckBox4.Checked = True then rezult := a div b; Label1.Caption := IntToStr(rezult); end;
