; Module/File: TG_SetMarkups.pb ; Function: Set Markups for a TextGadget- Linux ; Author: Omi ; Date: May 22, 2015 ; Version: 0.2 (08-2017) ; Target Compiler: PureBasic 5.22/5.31/5.40/5.5/5.6 ; Target OS: Linux: (X/K/L)ubuntu, Mint, 32/64, Ascii/Uni ;-------------------------------------------------------------- EnableExplicit ImportC "" gtk_label_set_markup(*label.GtkWidget, markup.p-utf8) EndImport ; Object constants #MainWin= 0 #Text1 = 0 #Text2 = 1 #Text3 = 2 #Text4 = 3 #Text5 = 4 #Text6 = 5 #Text7 = 6 #Text8 = 7 #Text9 = 8 #Text10 = 9 #Text11 = 10 Global.i gEvent, gQuit Global.s gS If OpenWindow(#MainWin, 300, 200, 300, 340, "TextGadget - text markups", #PB_Window_SystemMenu | #PB_Window_ScreenCentered) gS= "Label with a fat word." TextGadget(#Text1, 5, 5, 240, 25, gS, #PB_Text_Border) gtk_label_set_markup(GadgetID(#Text1), gS) gtk_label_set_use_markup_(GadgetID(#Text1), #True) gS= "Label with a " + "blue word." TextGadget(#Text2, 5, 35, 240, 25, gS, #PB_Text_Border) gtk_label_set_markup(GadgetID(#Text2), gS) gtk_label_set_use_markup_(GadgetID(#Text2), #True) gS= "Label with a " + "big word." TextGadget(#Text3, 5, 65, 240, 25, gS, #PB_Text_Border) gtk_label_set_markup(GadgetID(#Text3), gS) gtk_label_set_use_markup_(GadgetID(#Text3), #True) gS= "Label with a underlined word." TextGadget(#Text4, 5, 95, 240, 25, gS, #PB_Text_Border) gtk_label_set_markup(GadgetID(#Text4), gS) gtk_label_set_use_markup_(GadgetID(#Text4), #True) gS= "Label with a striked out word." TextGadget(#Text5, 5, 125, 240, 25, gS, #PB_Text_Border) gtk_label_set_markup(GadgetID(#Text5), gS) gtk_label_set_use_markup_(GadgetID(#Text5), #True) gS= "Label with a monospaced word." TextGadget(#Text6, 5, 155, 240, 25, gS, #PB_Text_Border) gtk_label_set_markup(GadgetID(#Text6), gS) gtk_label_set_use_markup_(GadgetID(#Text6), #True) gS= "Label with Superscript like x-2." TextGadget(#Text7, 5, 185, 240, 25, gS, #PB_Text_Border) gtk_label_set_markup(GadgetID(#Text7), gS) gtk_label_set_use_markup_(GadgetID(#Text7), #True) gS= "Label with Subscript like x4." TextGadget(#Text8, 5, 215, 240, 25, gS, #PB_Text_Border) gtk_label_set_markup(GadgetID(#Text8), gS) gtk_label_set_use_markup_(GadgetID(#Text8), #True) gS= "Label with a small word." TextGadget(#Text9, 5, 245, 240, 25, gS, #PB_Text_Border) gtk_label_set_markup(GadgetID(#Text9), gS) gtk_label_set_use_markup_(GadgetID(#Text9), #True) gS= "Label with a small word." TextGadget(#Text9, 5, 245, 240, 25, gS, #PB_Text_Border) gtk_label_set_markup(GadgetID(#Text9), gS) gtk_label_set_use_markup_(GadgetID(#Text9), #True) gS= "Label with a italic word." TextGadget(#Text10, 5, 275, 240, 25, gS, #PB_Text_Border) gtk_label_set_markup(GadgetID(#Text10), gS) gtk_label_set_use_markup_(GadgetID(#Text10), #True) gS= "Label with a " + " marked word." TextGadget(#Text11, 5, 305, 240, 25, gS, #PB_Text_Border) gtk_label_set_markup(GadgetID(#Text11), gS) gtk_label_set_use_markup_(GadgetID(#Text11), #True) Repeat gEvent= WaitWindowEvent() Select gEvent Case #PB_Event_CloseWindow gQuit= #True EndSelect Until gQuit EndIf ; IDE Options = PureBasic 5.44 LTS (Linux - x86) ; CursorPosition = 7 ; FirstLine = 4 ; EnableUnicode ; EnableXP