obj = luacom_CreateObject("TEST.Test")
event_sink = {}
function event_sink:KeyPress(keynumber)
print(keynumber)
end
event_obj = luacom_ImplInterface(
event_sink, "TEST.Test", "ITestEvents")
result = luacom_addConnection(obj, event_obj)
if result == nil then
print("Error!")
exit(1)
end