PureBasic Forums - English

Code: Select all

If OpenWindow(0, 0, 0, 330, 390, "ScintillaGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
  ScintillaGadget(0, 5, 5, 320, 380,0)
  ScintillaSendMessage(0, #SCI_SETMARGINTYPEN,0,#SC_MARGIN_NUMBER)
  ScintillaSendMessage(0, #SCI_SETMARGINWIDTHN, 0, 25)
  ScintillaSendMessage(0, #SCI_SETMARGINTYPEN, 1,#SC_MARGIN_TEXT)
  ScintillaSendMessage(0, #SCI_SETMARGINWIDTHN, 1, 150)
  ScintillaSendMessage(0, #SCI_SETMARGINMASKN, 1, #SC_MASK_FOLDERS)
  ScintillaSendMessage(0, #SCI_SETFOLDMARGINCOLOUR,1,RGB(0, 255, 255))
  ScintillaSendMessage(0, #SCI_STYLESETBACK,#STYLE_LINENUMBER, RGB(172, 212, 204))
  ScintillaSendMessage(0, #SCI_STYLESETBACK,#STYLE_DEFAULT, RGB(255, 255, 0))
  ScintillaSendMessage(0, #SCI_SETTEXT,0, UTF8("text1"+#LF$+"text2"+#LF$+"text3"+#LF$+"text4"))
  ScintillaSendMessage(Gadget, #SCI_SETMARGINSENSITIVEN, 1, #True)
  ;ScintillaSendMessage(0, #SCI_MARGIN , 0, UTF8(":Batch 1"))
  ScintillaSendMessage(0, #SCI_MARGINSETTEXT, 0, UTF8("line1"))
  ScintillaSendMessage(0, #SCI_MARGINSETTEXT, 1, UTF8("line2"))
  ScintillaSendMessage(0, #SCI_MARGINSETTEXT, 2, UTF8("line3"))
  ScintillaSendMessage(0, #SCI_MARGINSETTEXT, 3, UTF8("line4"))
  Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf

Code: Select all

#STYLE_CYAN = 1

If OpenWindow(0, 0, 0, 330, 390, "ScintillaGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
  ScintillaGadget(0, 5, 5, 320, 380,0)
                       
  ScintillaSendMessage(0, #SCI_SETMARGINTYPEN,0,#SC_MARGIN_NUMBER)
  ScintillaSendMessage(0, #SCI_SETMARGINWIDTHN, 0, 25)
  ScintillaSendMessage(0, #SCI_SETMARGINTYPEN, 1,#SC_MARGIN_TEXT)
  ScintillaSendMessage(0, #SCI_SETMARGINWIDTHN, 1, 150)
  ScintillaSendMessage(0, #SCI_SETMARGINMASKN, 1, #SC_MASK_FOLDERS)
  ScintillaSendMessage(0, #SCI_SETFOLDMARGINCOLOUR,1,RGB(0, 255, 255))
  ScintillaSendMessage(0, #SCI_STYLESETBACK,#STYLE_LINENUMBER, RGB(172, 212, 204))
  ScintillaSendMessage(0, #SCI_STYLESETBACK, #STYLE_DEFAULT, RGB(255, 255, 0))
  ScintillaSendMessage(0, #SCI_STYLESETBACK, #STYLE_CYAN, RGB(0, 255, 255))
  
  ScintillaSendMessage(0, #SCI_SETTEXT,0, UTF8("text1"+#LF$+"text2"+#LF$+"text3"+#LF$+"text4"))
  ScintillaSendMessage(0, #SCI_STARTSTYLING, 0)
  ScintillaSendMessage(0, #SCI_SETSTYLING, ScintillaSendMessage(0, #SCI_GETLENGTH), #STYLE_DEFAULT)
  
  ScintillaSendMessage(0, #SCI_SETMARGINSENSITIVEN, 1, #True)
  ;ScintillaSendMessage(0, #SCI_MARGIN , 0, UTF8(":Batch 1"))
  ScintillaSendMessage(0, #SCI_MARGINSETTEXT, 0, UTF8("line1"))
  ScintillaSendMessage(0, #SCI_MARGINSETSTYLE, 0, #STYLE_CYAN)
  ScintillaSendMessage(0, #SCI_MARGINSETTEXT, 1, UTF8("line2"))
  ScintillaSendMessage(0, #SCI_MARGINSETSTYLE, 1, #STYLE_CYAN)
  ScintillaSendMessage(0, #SCI_MARGINSETTEXT, 2, UTF8("line3"))
  ScintillaSendMessage(0, #SCI_MARGINSETSTYLE, 2, #STYLE_CYAN)
  ScintillaSendMessage(0, #SCI_MARGINSETTEXT, 3, UTF8("line4"))
  ScintillaSendMessage(0, #SCI_MARGINSETSTYLE, 3, #STYLE_CYAN)
  Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf