procedure TFrmCalc.BtnPlusClick(Sender:

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 не пробовал .

Задать свой вопрос
Степан Шляков
В Паскале не секу, но мэйби есть какое-то объявление стринг (типа как в С++ include )?
1 ответ
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;     

Пробуйте так, мне сейчас не на чем проверить, но обязано получиться =)
Иван
Да , я дурачина , присваивал строке элементов целое число -.-При этом понял сам , чуть позднее , но все-одинаково спасибо , только учусь работать в Лазарусе. :D
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт