Показать сообщение отдельно
  #2  
Старый 27.05.2010, 14:04
Аватар для T-dayne
T-dayne T-dayne вне форума
Начинающий
 
Регистрация: 26.01.2010
Сообщения: 180
Репутация: 31
По умолчанию

Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
label1.Caption:=inttostr(strtoint(label1.Caption)+10);
end;

это?
Ответить с цитированием