Page 1 of 1

PB BOARD

Posted: Mon Jul 08, 2019 9:23 am
by microdevweb
Hello guys,

For prepare a crazy project about a visual scripting for PureBasic, i've developed a special module for displaying of visual boxes. We have two packages, the first about the main classes (BOARD) and the second (BOX) with some personal classes in accord with my crazy project.

This module isn't finished, it going to advance step by step with my master project.

Sorry but at this moment i don't make help, maybe later.

To Github

Look this test

Image

Code: Select all

; ***********************************************************************************************
; AUTHOR        : microDevWeb
; PROJECT       : PB BOARD
; TEST          : main.pb
; VERSION       : 1.0
; DESIGNED WITH : PB 5.71
; DATE          : 2019/07/04
; ***********************************************************************************************
XIncludeFile "BOARD\PACKAGES\BOARD\BOARD.pbi"
XIncludeFile "BOARD\PACKAGES\BOX\BOX.pbi"

#FORM = 0
#CONTAINER = 0
Define flags = #PB_Window_SystemMenu|#PB_Window_ScreenCentered|#PB_Window_SizeGadget|
               #PB_Window_MaximizeGadget|#PB_Window_MinimizeGadget
OpenWindow(#FORM,0,0,800,600,"Test",flags)
ContainerGadget(#CONTAINER,0,0,800,600,#PB_Container_BorderLess)
CloseGadgetList()
Global myBoard.BOARD::BOARD = BOARD::newBoard(#CONTAINER)
Global c.BOX::ClassBox = BOX::newClassBox("Contact",300,200)
Global ca.BOX::ClassBox = BOX::newClassBox("Person",50,100,1)
Global cs.BOX::ClassBox = BOX::newClassBox("Divers",500,300,2)


c\addMeToBoard(myBoard)
ca\addMeToBoard(myBoard)
cs\addMeToBoard(myBoard)

myBoard\build()

Repeat
  WaitWindowEvent()
Until Event() = #PB_Event_CloseWindow

Re: PB BOARD

Posted: Mon Jul 08, 2019 9:26 am
by RSBasic
Looks very good. 8)

Re: PB BOARD

Posted: Mon Jul 08, 2019 9:34 am
by microdevweb
Thanks RsBasic

Re: PB BOARD

Posted: Mon Jul 08, 2019 10:54 am
by Lord
This module looks very interesting and seem to have a large potential. :wink:

Re: PB BOARD

Posted: Mon Jul 08, 2019 9:32 pm
by STARGÅTE
Your project looks very similar to my project:
https://www.purebasic.fr/german/viewtop ... 11&t=31251

I also want to write a visual scripting language usable in Pure Basic, similar to LabView
It would be very interesting if we can exchange experiences.

Re: PB BOARD

Posted: Tue Jul 09, 2019 9:09 am
by microdevweb
Hello STARGÅTE,

Your project looks very nice, you've be very in advance than me, yes if you want we can share our experience. Personally i dirige my project to a oop concept, when i'll more advanced i shared some code.

Re: PB BOARD

Posted: Wed Jul 10, 2019 8:11 am
by Kwai chang caine
Waooouuuh amazing !!! :shock:
A professional look, and works very well here on W7 X86
Thanks for sharing the code, it's very interesting to learn how you have make this nice effect 8)