type NeuesGUI_OBJECT EXTENDS TGUI '<- Extends TGUI und schon ist das neue Gadged für die gui eingerichtet :)

function create:TGUI()

 local neues_Object:TGUI
 neues_object = new NeuesGui_Object

 Neues_object.ADD ' <---  Hier wird es in die GUI controlroutinen    implementiert und wird nun auch von der GUI abgearbeitet :)

endfunction

endtype

'OBJECT_SET
'----------

   Include "Gadgets\TArea.bmx"

   Include "Gadgets\TOutlines.bmx"

   Include "Gadgets\THeadline.bmx"

   Include "Gadgets\TButton.bmx"

   Include "Gadgets\TScrollBar.bmx"

   Include "Gadgets\TTabBox.bmx"

   Include "Gadgets\TTextArea.bmx"

   Include "Gadgets\TTextBOX.bmx"

   Include "Gadgets\TConsole.bmx"

   Include "Gadgets\Tinfobox.bmx"

   Include "Gadgets\TTab.bmx"

   Include "Gadgets\TResource.bmx"

   Include "Gadgets\TFileRequest.bmx"

   Include "Gadgets\TCheckBox.bmx"

   Include "Gadgets\TRadioButton.bmx"

   Include "Gadgets\TRadioList.bmx"

   Include "Gadgets\TLabel.bmx"

   Include "Gadgets\TMenu.bmx"
                                                                                                   
   Include "Gadgets\THeadmenue.bmx"

   Include "Gadgets\TNumReq.bmx"

   Include "Gadgets\TMSGBOX.bmx"

   Include "Gadgets\TText.bmx"

   Include "Gadgets\TGuiText.bmx"