': 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, "ClockPatience", 800, 800, 0, 0, 0) __UI_RegisterResult = 0 SetCaption __UI_NewID, "Clock Patience" Control(__UI_NewID).Font = SetFont("segoeui.ttf", 12) Control(__UI_NewID).BackColor = _RGB32(0, 141, 0) Control(__UI_NewID).HasBorder = False __UI_NewID = __UI_NewControl(__UI_Type_Button, "ExitBT", 80, 23, 710, 768, 0) __UI_RegisterResult = 0 SetCaption __UI_NewID, "Exit" Control(__UI_NewID).HasBorder = False Control(__UI_NewID).CanHaveFocus = True __UI_NewID = __UI_NewControl(__UI_Type_Button, "NewGameBT", 80, 23, 710, 736, 0) __UI_RegisterResult = 0 SetCaption __UI_NewID, "New Game" Control(__UI_NewID).HasBorder = False Control(__UI_NewID).CanHaveFocus = True END SUB SUB __UI_AssignIDs ClockPatience = __UI_GetID("ClockPatience") ExitBT = __UI_GetID("ExitBT") NewGameBT = __UI_GetID("NewGameBT") END SUB