Imports XCCLibrary
Public Class AppForm
    Public Shared fillMode As Boolean

    Sub AppForm_Load() Handles MyBase.Load
        Me.Width = 1400
        Me.Height = 800
        Me.Top = 20
        Me.Left = 50

        Panel_Start.Controls.Clear()
        Main_Menu.TopLevel = False
        Panel_Start.Controls.Add(Main_Menu)
        Main_Menu.Show()

        ' Get floor gratings database
        Database.Retrive_Database()

        ' Initialize DataTables, Measurments and more
        Data.Init_Data()

        ' Initialize DrawingPanel
        Draw_Grating.Load_DrawingPanel()

        ' Load XCC settings
        adminClass.loadSettings(Settings.filesFolder, Settings.HLCtFolder, "SolidWorks")

        Individual.ComboBox_Type.Items.Add("Pressure Welded")
        Individual.ComboBox_Type.Items.Add("Type A")
    End Sub

End Class