func doMessage(_data)
  println('MessageBox(', isset(WIN_PARENT) ? (WIN_PARENT + '.Handle') : '0', ', PChar(', Text, '), ', 'PChar(\'hiasm msg\'), MB_OK);')
  event(onMessage)
end