Роман (Все сообщения пользователя)

Добрый день! Подскажите пожалуйста, где ошибка. вроде по учебнику все делаю. но по клику не появляется message

local stopped = false;
function OnStop()
   stopped = true;
   return 3000;
end

--data table
local data_table;


--main
-----------------------------------------------------------------------
function main()


--create window and table
data_table = AllocTable();

AddColumn(data_table, 1, 'Колонка №1', true,QTABLE_STRING_TYPE,14)
AddColumn(data_table, 2, 'Колонка №2', true,QTABLE_CACHED_STRING_TYPE,14)
AddColumn(data_table, 3, 'Колонка №3', true,QTABLE_STRING_TYPE,14)

SetTableNotificationCallback(data_table, OnTableEvent)

CreateWindow(data_table);
SetWindowCaption(data_table, 'Table 1');
SetWindowPos(data_table, 1000, 150, 400, 200);
InsertRow(data_table, -1);


SetCell(data_table, 1, 1, 'Клик 1 1');
SetCell(data_table, 1, 2, 'Клик 1 2');
SetCell(data_table, 1, 3, 'Клик 1 3');
InsertRow(data_table, 2);
SetCell(data_table, 2, 1, 'Клик 2 1');
SetCell(data_table, 2, 2, 'Клик 2 2');
SetCell(data_table, 2, 3, 'Клик 2 3');



end
--main end
-----------------------------------------------------------------------

-- Функция обрабатывает события в таблице
function OnTableEvent(data_table, msg, par1, par2)
   -- Если был клик левой кнопкой
   if msg == QTABLE_LBUTTONDBLCLK then
       -- Если это общий стоп
       if par1 == 1 -- Номер строки
           and par2 == 1 then -- Номер колонки
           -- Вызываем необходимую функцию
           message('message 1')
       else        
           if par2 == 2 then
               -- Вызываем необходимую функцию
               message('message 2')
           end
       end
   end
end