Показать сообщение отдельно
  #10  
Старый 08.04.2012, 23:34
nixel nixel вне форума
Начинающий
 
Регистрация: 12.12.2011
Адрес: Москва
Сообщения: 150
Версия Delphi: XE2-U4
Репутация: 131
По умолчанию

Цитата:
Сообщение от LorDHeLeGaL
Код:
Label10.CleanupInstance;
   x1:=46875*5*StrToInt(Edit1.Text);
   x2:=9375*5* StrToInt(Edit2.Text);
   x3:=1875*5*StrToInt(Edit3.Text);
   x4:=375*5* StrToInt(Edit4.Text);
   x5:=75*5* StrToInt(Edit5.Text);
   x6:=15*5*StrToInt(Edit6.Text);
   x7:=5*5* StrToInt(Edit7.Text);
   x8:=5*StrToInt(Edit8.Text);
   y:= x1+x2+x3+x4+x5+x6+x7+x8;
   Label10.Caption :=
   (Inttostr(y))+' !';
Вот расчет рейтинга...И в поле label2 выводит : Ваш рейтинг:.....
А в поле label3 не чего не выводит....

Так у Вас код выводит в 10ый лэйбл...
Ответить с цитированием