Показать сообщение отдельно
  #2  
Старый 02.01.2010, 22:31
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,036
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Код:
if ((SpinEdit1.Value mod 9) = 0) And ((SpinEdit1.Value mod 11) = 0) 
  then  showmessage('Делится')
  else showmessage('Не делится');
Ответить с цитированием