Procedure tfrmcalc.btnplusclick(sender: tobject); begin frmcalc.lblplus.visible: =true; frmcalc.lblminus.visible: =false; frmcalc.lbldel.visible: =false; frmcalc.lblumn.visible: =false; frmcalc.lbla.caption: =(strtoint(frmcalc.edtch1.text)+strtoint(frmcalc.edtch2.text)); end; выдает ошибку : error: incompatible type for arg no. 1: got "longint", expected "ttranslatestring" подскажите кто-нибудь , в чем ошибка ставил inttostr , только тип float не пробовал .

Procedure TFrmCalc.BtnPlusClick(Sender: TObject);
begin 
       FrmCalc.LblPlus.Visible:=True; 
       FrmCalc.LblMinus.Visible:=False;  
       FrmCalc.LblDel.Visible:=False; 
       FrmCalc.LblUmn.Visible:=False; 
       FrmCalc.LblA.Caption:=IntToStr(StrToInt(FrmCalc.EdtCh1.Text)+StrToInt(FrmCalc.EdtCh2.Text));
end;     

Попробуйте так, мне сейчас не на чем проверить, но должно получиться =)