object SnakeApp: TSnakeApp
  OnCreate = FormCreate
end