Показать сообщение отдельно
Старый 18.09.2015, 17:31   #4
Местный
 
Аватар для ScythLab
 
Регистрация: 24.10.2014
Сообщений: 190
Сказал Спасибо: 4
Имеет 42 спасибок в 40 сообщенях
ScythLab пока неопределено
По умолчанию

До конца в сакральный смыл вникать нет желания, но задачу можно решить кучей способов, выбери подходящий для себя и доработай.
Код:
  if (i = 100) then
  begin
    Inc(b);
    i := 0;
  end;
  Write(...)
Код:
  if (i = 100) then
    Inc(b);
  Write(...);
  if (i = 100) then
    i := 0;
Код:
  WriteS('menu_select?ask='+IntTosTr(i div 100)+'&reply='+IntTosTr(i mod 100));
__________________
Хобби: разработка бота для Lineage.
ScythLab вне форума   Ответить с цитированием