': 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, "InsideOutsideTriangle", 780, 560, 0, 0, 0) __UI_RegisterResult = 0 SetCaption __UI_NewID, "Inside/Outside Triangle" Control(__UI_NewID).Font = SetFont("segoeui.ttf", 12) Control(__UI_NewID).HasBorder = False __UI_NewID = __UI_NewControl(__UI_Type_Frame, "ClickFrame", 100, 74, 670, 250, 0) __UI_RegisterResult = 0 Control(__UI_NewID).HasBorder = True Control(__UI_NewID).Align = __UI_Center Control(__UI_NewID).Value = 2 Control(__UI_NewID).BorderSize = 1 __UI_NewID = __UI_NewControl(__UI_Type_PictureBox, "PictureBox1", 650, 540, 10, 10, 0) __UI_RegisterResult = 0 Control(__UI_NewID).Stretch = True Control(__UI_NewID).HasBorder = True Control(__UI_NewID).Align = __UI_Center Control(__UI_NewID).VAlign = __UI_Middle Control(__UI_NewID).BorderSize = 1 __UI_NewID = __UI_NewControl(__UI_Type_Label, "XLB", 20, 23, 706, 17, 0) __UI_RegisterResult = 0 SetCaption __UI_NewID, "X" Control(__UI_NewID).HasBorder = True Control(__UI_NewID).Align = __UI_Center Control(__UI_NewID).VAlign = __UI_Middle Control(__UI_NewID).BorderSize = 1 __UI_NewID = __UI_NewControl(__UI_Type_Label, "YLB", 20, 23, 744, 17, 0) __UI_RegisterResult = 0 SetCaption __UI_NewID, "Y" Control(__UI_NewID).HasBorder = True Control(__UI_NewID).Align = __UI_Center Control(__UI_NewID).VAlign = __UI_Middle Control(__UI_NewID).BorderSize = 1 __UI_NewID = __UI_NewControl(__UI_Type_Label, "Pos1LB", 20, 23, 670, 50, 0) __UI_RegisterResult = 0 SetCaption __UI_NewID, "1" Control(__UI_NewID).HasBorder = True Control(__UI_NewID).Align = __UI_Center Control(__UI_NewID).VAlign = __UI_Middle Control(__UI_NewID).BorderSize = 1 __UI_NewID = __UI_NewControl(__UI_Type_Label, "Pos2LB", 20, 23, 670, 90, 0) __UI_RegisterResult = 0 SetCaption __UI_NewID, "2" Control(__UI_NewID).HasBorder = True Control(__UI_NewID).Align = __UI_Center Control(__UI_NewID).VAlign = __UI_Middle Control(__UI_NewID).BorderSize = 1 __UI_NewID = __UI_NewControl(__UI_Type_Label, "Pos3LB", 20, 23, 670, 130, 0) __UI_RegisterResult = 0 SetCaption __UI_NewID, "3" Control(__UI_NewID).HasBorder = True Control(__UI_NewID).Align = __UI_Center Control(__UI_NewID).VAlign = __UI_Middle Control(__UI_NewID).BorderSize = 1 __UI_NewID = __UI_NewControl(__UI_Type_Label, "X1LB", 32, 23, 700, 50, 0) __UI_RegisterResult = 0 Control(__UI_NewID).HasBorder = True Control(__UI_NewID).Align = __UI_Center Control(__UI_NewID).VAlign = __UI_Middle Control(__UI_NewID).BorderSize = 1 __UI_NewID = __UI_NewControl(__UI_Type_Label, "Y1LB", 32, 23, 738, 50, 0) __UI_RegisterResult = 0 Control(__UI_NewID).HasBorder = True Control(__UI_NewID).Align = __UI_Center Control(__UI_NewID).VAlign = __UI_Middle Control(__UI_NewID).BorderSize = 1 __UI_NewID = __UI_NewControl(__UI_Type_Label, "X2LB", 32, 23, 700, 90, 0) __UI_RegisterResult = 0 Control(__UI_NewID).HasBorder = True Control(__UI_NewID).Align = __UI_Center Control(__UI_NewID).VAlign = __UI_Middle Control(__UI_NewID).BorderSize = 1 __UI_NewID = __UI_NewControl(__UI_Type_Label, "Y2LB", 32, 23, 738, 90, 0) __UI_RegisterResult = 0 Control(__UI_NewID).HasBorder = True Control(__UI_NewID).Align = __UI_Center Control(__UI_NewID).VAlign = __UI_Middle Control(__UI_NewID).BorderSize = 1 __UI_NewID = __UI_NewControl(__UI_Type_Label, "X3LB", 32, 23, 700, 130, 0) __UI_RegisterResult = 0 Control(__UI_NewID).HasBorder = True Control(__UI_NewID).Align = __UI_Center Control(__UI_NewID).VAlign = __UI_Middle Control(__UI_NewID).BorderSize = 1 __UI_NewID = __UI_NewControl(__UI_Type_Label, "Y3LB", 32, 23, 738, 130, 0) __UI_RegisterResult = 0 Control(__UI_NewID).HasBorder = True Control(__UI_NewID).Align = __UI_Center Control(__UI_NewID).VAlign = __UI_Middle Control(__UI_NewID).BorderSize = 1 __UI_NewID = __UI_NewControl(__UI_Type_Button, "ExitBT", 80, 23, 680, 527, 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, "RestartBT", 80, 23, 680, 491, 0) __UI_RegisterResult = 0 SetCaption __UI_NewID, "Restart" Control(__UI_NewID).HasBorder = False Control(__UI_NewID).CanHaveFocus = True __UI_NewID = __UI_NewControl(__UI_Type_Label, "InsideOutsideLB", 100, 23, 670, 410, 0) __UI_RegisterResult = 0 Control(__UI_NewID).HasBorder = True Control(__UI_NewID).Align = __UI_Center Control(__UI_NewID).VAlign = __UI_Middle Control(__UI_NewID).BorderSize = 1 __UI_NewID = __UI_NewControl(__UI_Type_Label, "Click1LB", 80, 23, 10, 10, __UI_GetID("ClickFrame")) __UI_RegisterResult = 0 SetCaption __UI_NewID, "Click To Set" Control(__UI_NewID).HasBorder = False Control(__UI_NewID).Align = __UI_Center Control(__UI_NewID).VAlign = __UI_Middle __UI_NewID = __UI_NewControl(__UI_Type_Label, "Click2LB", 80, 23, 10, 36, __UI_GetID("ClickFrame")) __UI_RegisterResult = 0 SetCaption __UI_NewID, "Vertex 1" Control(__UI_NewID).HasBorder = False Control(__UI_NewID).Align = __UI_Center Control(__UI_NewID).VAlign = __UI_Middle __UI_NewID = __UI_NewControl(__UI_Type_PictureBox, "PictureBox2", 20, 23, 670, 170, 0) __UI_RegisterResult = 0 Control(__UI_NewID).Stretch = True Control(__UI_NewID).HasBorder = True Control(__UI_NewID).Align = __UI_Center Control(__UI_NewID).VAlign = __UI_Middle Control(__UI_NewID).BorderSize = 1 __UI_NewID = __UI_NewControl(__UI_Type_Label, "CXLB", 32, 23, 700, 170, 0) __UI_RegisterResult = 0 Control(__UI_NewID).HasBorder = True Control(__UI_NewID).Align = __UI_Center Control(__UI_NewID).VAlign = __UI_Middle Control(__UI_NewID).BorderSize = 1 __UI_NewID = __UI_NewControl(__UI_Type_Label, "CYLB", 32, 23, 738, 170, 0) __UI_RegisterResult = 0 Control(__UI_NewID).HasBorder = True Control(__UI_NewID).Align = __UI_Center Control(__UI_NewID).VAlign = __UI_Middle Control(__UI_NewID).BorderSize = 1 END SUB SUB __UI_AssignIDs InsideOutsideTriangle = __UI_GetID("InsideOutsideTriangle") ClickFrame = __UI_GetID("ClickFrame") PictureBox1 = __UI_GetID("PictureBox1") XLB = __UI_GetID("XLB") YLB = __UI_GetID("YLB") Pos1LB = __UI_GetID("Pos1LB") Pos2LB = __UI_GetID("Pos2LB") Pos3LB = __UI_GetID("Pos3LB") X1LB = __UI_GetID("X1LB") Y1LB = __UI_GetID("Y1LB") X2LB = __UI_GetID("X2LB") Y2LB = __UI_GetID("Y2LB") X3LB = __UI_GetID("X3LB") Y3LB = __UI_GetID("Y3LB") ExitBT = __UI_GetID("ExitBT") RestartBT = __UI_GetID("RestartBT") InsideOutsideLB = __UI_GetID("InsideOutsideLB") Click1LB = __UI_GetID("Click1LB") Click2LB = __UI_GetID("Click2LB") PictureBox2 = __UI_GetID("PictureBox2") CXLB = __UI_GetID("CXLB") CYLB = __UI_GetID("CYLB") END SUB