Тема: помогите решить проблемку
Показать сообщение отдельно
  #1  
Старый 17.02.2009, 21:56
ApxaHGe1 ApxaHGe1 вне форума
Активный
  
Регистрация: 08.04.2008
Адрес: Нижний новгород
Сообщения: 311
Репутация: 38
По умолчанию
var
str:integer;
begin
str:=StrToInt(Edit1.Text)-StrToInt(Edit2.Text);
Edit1.Text:=IntToStr(str);
Ответить с цитированием