[BUG] Пропадает текст в таблицах

 while f do          -- бесконечный цикл до остановки скрипта
  if m>2 then DestroyTable(t);m=m-3;end;
  if m==1 then u();end;      -- рисуем или убираем всплывающее меню
  if m==2 then          -- при открытом контекстном меню
 ...

SetColor(id, -1, -1, b_color, f_color, -1, -1)

local SetColor_ = SetColor
function SetColor(t_id, row, col, b_color, f_color, sel_b_color, sel_f_color)
  if row == -1 and col == -1 and (b_color == -1 or f_color == -1 or sel_b_color == -1 or sel_f_color == -1) then
    message(debug.traceback(), 3)
    return nil
  else
    return SetColor_(t_id, row, col, b_color, f_color, sel_b_color, sel_f_color)
  end
end

local run, id = true
function OnStop()
  run = nil
  DestroyTable(id)
  return 100
end

function main()
  id = AllocTable()
  AddColumn(id, 1, "", true, QTABLE_STRING_TYPE, 20)
  CreateWindow(id)
  SetTableNotificationCallback(id, function (id, event)
    if event == QTABLE_CLOSE then
      run = false
    elseif event == QTABLE_VKEY then
      for row = 1, 2 do
         SetColor(id, row, QTABLE_NO_INDEX, 0x0000FF, QTABLE_DEFAULT_COLOR, 0x0000FF, QTABLE_DEFAULT_COLOR)
      end
    end
  end)
  for row = 1, 2 do
    InsertRow(id, row)
    SetCell(id, row, 1, tostring(row))
  end
  while run do sleep(500) end
end