': This form was generated by ': InForm - GUI library for QB64 - v1.5 ': Fellippe Heitor, 2016-2023 - fellippe@qb64.org - @fellippeheitor ': https://github.com/FellippeHeitor/InForm '----------------------------------------------------------- SUB __UI_LoadForm DIM __UI_NewID AS LONG, __UI_RegisterResult AS LONG __UI_NewID = __UI_NewControl(__UI_Type_Form, "BIN2INCLUDE", 589, 324, 0, 0, 0) __UI_RegisterResult = 0 SetCaption __UI_NewID, "BIN2INCLUDE" Control(__UI_NewID).Font = SetFont("segoeui.ttf", 12) Control(__UI_NewID).HasBorder = False Control(__UI_NewID).CenteredWindow = True __UI_NewID = __UI_NewControl(__UI_Type_TextBox, "SelectedFileTB", 567, 23, 11, 10, 0) __UI_RegisterResult = 0 SetCaption __UI_NewID, "Selected File" Control(__UI_NewID).HasBorder = True Control(__UI_NewID).CanHaveFocus = True Control(__UI_NewID).Disabled = True Control(__UI_NewID).BorderSize = 1 __UI_NewID = __UI_NewControl(__UI_Type_Button, "OpenBT", 80, 23, 11, 78, 0) __UI_RegisterResult = 0 SetCaption __UI_NewID, "Open" Control(__UI_NewID).HasBorder = False Control(__UI_NewID).CanHaveFocus = True __UI_NewID = __UI_NewControl(__UI_Type_Button, "CONVERTBT", 80, 23, 96, 78, 0) __UI_RegisterResult = 0 SetCaption __UI_NewID, "Convert" Control(__UI_NewID).HasBorder = False Control(__UI_NewID).CanHaveFocus = True Control(__UI_NewID).Disabled = True __UI_NewID = __UI_NewControl(__UI_Type_TextBox, "OutputFileTB", 567, 23, 11, 38, 0) __UI_RegisterResult = 0 SetCaption __UI_NewID, "Output File" Control(__UI_NewID).HasBorder = True Control(__UI_NewID).CanHaveFocus = True Control(__UI_NewID).Disabled = True Control(__UI_NewID).BorderSize = 1 __UI_NewID = __UI_NewControl(__UI_Type_ListBox, "ListBox1", 567, 200, 11, 114, 0) __UI_RegisterResult = 0 Control(__UI_NewID).HasBorder = True Control(__UI_NewID).CanHaveFocus = True Control(__UI_NewID).BorderSize = 1 Control(__UI_NewID).AutoScroll = True __UI_NewID = __UI_NewControl(__UI_Type_Button, "ClearLogBT", 80, 23, 498, 78, 0) __UI_RegisterResult = 0 SetCaption __UI_NewID, "Clear Log" Control(__UI_NewID).HasBorder = False Control(__UI_NewID).CanHaveFocus = True __UI_NewID = __UI_NewControl(__UI_Type_RadioButton, "BIN2BASRB", 76, 23, 189, 78, 0) __UI_RegisterResult = 0 SetCaption __UI_NewID, "BIN2BAS" Control(__UI_NewID).HasBorder = False Control(__UI_NewID).CanHaveFocus = True __UI_NewID = __UI_NewControl(__UI_Type_RadioButton, "PIC2MEMRB", 82, 23, 270, 78, 0) __UI_RegisterResult = 0 SetCaption __UI_NewID, "PIC2MEM" Control(__UI_NewID).HasBorder = False Control(__UI_NewID).CanHaveFocus = True __UI_NewID = __UI_NewControl(__UI_Type_Button, "ResetBT", 80, 23, 413, 78, 0) __UI_RegisterResult = 0 SetCaption __UI_NewID, "Reset" Control(__UI_NewID).HasBorder = False Control(__UI_NewID).CanHaveFocus = True END SUB SUB __UI_AssignIDs BIN2INCLUDE = __UI_GetID("BIN2INCLUDE") SelectedFileTB = __UI_GetID("SelectedFileTB") OpenBT = __UI_GetID("OpenBT") CONVERTBT = __UI_GetID("CONVERTBT") OutputFileTB = __UI_GetID("OutputFileTB") ListBox1 = __UI_GetID("ListBox1") ClearLogBT = __UI_GetID("ClearLogBT") BIN2BASRB = __UI_GetID("BIN2BASRB") PIC2MEMRB = __UI_GetID("PIC2MEMRB") ResetBT = __UI_GetID("ResetBT") END SUB