import gui
$include "guih.icn"
class dialogabout : Dialog(text_button_1, text_list_1)
   method handle_text_button_1(ev)
	dispose()
   end

   method handle_text_list_1(ev)
   end

   method handle_default(ev)
   end

   method dialog_event(ev)
      case ev.get_component() of {
         text_button_1 : handle_text_button_1(ev)
         text_list_1 : handle_text_list_1(ev)
         default : handle_default(ev)
      }
   end

   method init_dialog()
   end

   method end_dialog()
   end

   method handle_v2_events(ev)
      dialog_event(V2TOV1(ev))
   end

   method setup()
      self.set_attribs("size=250,150", "bg=pale gray")
      text_button_1 := TextButton()
      text_button_1.set_pos("122", "123")
      text_button_1.set_align("c", "t")
      text_button_1.connect(self, "handle_v2_events", &null)
      text_button_1.clear_toggles()
      text_button_1.set_label("Okay")
      text_button_1.set_internal_alignment("c")
      self.add(text_button_1)
      text_list_1 := TextList()
      text_list_1.set_pos("26", "5")
      text_list_1.set_size("200", "75%")
      text_list_1.set_draw_border()
      text_list_1.connect(self, "handle_v2_events", &null)
      text_list_1.set_select_many()
      text_list_1.set_contents(["Blasteroids ", "by Jared Kuhn and Clint Jeffery", "Version 2.0", ""])
      self.add(text_list_1)
      self.connect(self, "handle_v2_events", &null)
   end

   method component_setup()
      self.setup()
   end

   initially
      self.Dialog.initially()
end

### Ivib-v2 layout ##
#class|Canvas|17|Name Table|table|integer|0|2|string|text_button|intege
#r|1|string|text_list|integer|1|SuperClass Name|string|Dialog|Import Na
#me|string|gui|Button Groups|class|ButtonGroupSet|2|Parent Canvas|1|Box
#es|list|0|Checkbox Groups|class|CheckBoxGroupSet|2|Parent Canvas|1|Box
#es|list|0|Gen Indent|integer|3|Gen Main|integer|1|Gen Component Setup|
#integer|1|Gen Init Dialog|integer|1|Gen Initially|integer|1|Dialog Str
#uct|class|CDialog|4|Min Width|null|Min Height|null|Ticker Rate|null|At
#tribs|list|1|string|bg=pale gray|Name|string|dialogabout|Width|integer
#|250|Height|integer|150|Items|list|2|class|CanvasTextButton|36|Parent 
#Canvas|1|Name|string|text_button_1|Class Name|string|TextButton|Import
# Name|string|gui|X Fix|null|Y Fix|null|W Fix|null|H Fix|null|W Default
#|integer|1|H Default|integer|1|X Spec|string|122|Y Spec|string|123|W S
#pec|integer|48|H Spec|integer|23|X Align|string|c|Y Align|string|t|Is 
#shaded|null|Is Button Subclass|integer|1|Draw Border|null|Attribs|list
#|0|Tooltip|null|Accel|null|Event Handlers|list|1|list|2|string|&null|s
#tring|handle_v2_events|Class Variable|integer|1|Parent Component|1|Lab
#el|string|Okay|No Keyboard|null|Img Up|null|Img Down|null|Img Width|nu
#ll|Img Height|null|Is Checked Flag|null|Is Checkbox Flag|null|Parent C
#heckBoxGroup|null|Parent Button Group|null|Internal Align|string|c|cla
#ss|CanvasTextList|29|Parent Canvas|1|Name|string|text_list_1|Class Nam
#e|string|TextList|Import Name|string|gui|X Fix|null|Y Fix|null|W Fix|n
#ull|H Fix|null|W Default|null|H Default|null|X Spec|string|26|Y Spec|s
#tring|5|W Spec|string|200|H Spec|string|75%|X Align|string|l|Y Align|s
#tring|t|Is shaded|null|Is Button Subclass|null|Draw Border|integer|1|A
#ttribs|list|0|Tooltip|null|Accel|null|Event Handlers|list|1|list|2|str
#ing|&null|string|handle_v2_events|Class Variable|integer|1|Parent Comp
#onent|1|Select One|null|Select Many|integer|1|Checked|list|4|null|null
#|null|null|Contents|list|4|string|Blasteroids |string|by Jared Kuhn an
#d Clint Jeffery|string|Version 2.0|string||Initial Focus|null|Event Ha
#ndlers|list|1|list|2|string|&null|string|handle_v2_events|