It is currently Wed Jul 24, 2019 9:55 am

All times are UTC + 1 hour




Post new topic Reply to topic  [ 5 posts ] 
Author Message
 Post subject: Visual Board version 1.0 beta 3
PostPosted: Fri Jul 12, 2019 3:30 pm 
Offline
Enthusiast
Enthusiast
User avatar

Joined: Fri Jun 13, 2014 9:38 am
Posts: 130
Hello all,

This is a module for displaying nodes and links,

I have lot of work for finish it.

(I make some help, but it's not available at the moment)

TO GITHUB
User help

Version history:
  • Beta 2 -> Fixed -> x86 fatal bug
  • Beta 3 -> Added -> Class Triangle


Image

Image

How testing :
  • Run you editor PureBasic
  • Past and save this below code in your personal directory
  • Run it compilation
  • Agree to download this package
  • Run "EXAMPLE/EX_01.pb"
  • Or comment loadPackage() and uncomment "EXAMPLE/EX_01.pb"

Note: At each new version, run again loadPackage()

Code:
; ******************************************************************************
; AUTHOR  : MicrodevWeb
; MODULE  : TreeView
; PROCESS : load package
; ******************************************************************************
EnableExplicit
Procedure loadPackage()
  Protected zipName.s = "PACKAGE.zip"
  If MessageRequester("Download Package","Do you agree to download the tree view package form github?",#PB_MessageRequester_YesNo) = #PB_MessageRequester_No
    End
  EndIf
  If Not InitNetwork()
    MessageRequester("Network error","Cannot connect to internet",#PB_MessageRequester_Error)
    End
  EndIf
  If Not ReceiveHTTPFile("https://github.com/microdevweb/VISUAL_BOARD/archive/master.zip",zipName)
    MessageRequester("Download error","Cannot download the package",#PB_MessageRequester_Error)
    End
  EndIf
  #PACKER = 0
  CreateDirectory("BOARD")
  CreateDirectory("BOARD/CLASSES")
  CreateDirectory("BOARD/CLASSES/IMG")
  CreateDirectory("EXAMPLE")
  CreateDirectory("EXAMPLE/IMG")
  UseZipPacker()
  OpenPack(#PACKER,zipName)
  If ExaminePack(#PACKER)
    While NextPackEntry(#PACKER)
      Protected dirName.s = StringField(PackEntryName(#PACKER),2,"/")
      If PackEntryType(#PACKER) = #PB_Packer_File
        Protected fileName.s = RemoveString(PackEntryName(#PACKER),"VISUAL_BOARD-master/")
        If Not UncompressPackFile(#PACKER,fileName)
          MessageRequester("Download error","Cannot unzip file "+fileName,#PB_MessageRequester_Error)
          End
        EndIf
      EndIf
    Wend
  EndIf
  ClosePack(#PACKER)
  DeleteFile(zipName)
EndProcedure

loadPackage()

; XIncludeFile "EXAMPLE/EX_01.pb"

_________________
Use Pb 5.60 lst and Windows 10

my mother-language isn't english, in advance excuse my mistakes.


Last edited by microdevweb on Sun Jul 14, 2019 9:24 am, edited 2 times in total.

Top
 Profile  
Reply with quote  
 Post subject: Re: Visual Board version 1.0 beta 2
PostPosted: Sat Jul 13, 2019 11:25 am 
Offline
Enthusiast
Enthusiast
User avatar

Joined: Fri Jun 13, 2014 9:38 am
Posts: 130
Hello Guys,

The user help is available

_________________
Use Pb 5.60 lst and Windows 10

my mother-language isn't english, in advance excuse my mistakes.


Top
 Profile  
Reply with quote  
 Post subject: Re: Visual Board version 1.0 beta 2
PostPosted: Sat Jul 13, 2019 1:59 pm 
Offline
PureBasic Team
PureBasic Team
User avatar

Joined: Fri Apr 25, 2003 6:14 pm
Posts: 1696
Location: Germany (Saxony, Deutscheinsiedel)
Not tested yet, but your project looks very interesting. Keep up the good work! :D

_________________
Bye,
...André
(PureBasicTeam::Docs & Support - PureArea.net | Order:: PureBasic | PureVisionXP)


Top
 Profile  
Reply with quote  
 Post subject: Re: Visual Board version 1.0 beta 2
PostPosted: Sat Jul 13, 2019 6:21 pm 
Offline
Enthusiast
Enthusiast

Joined: Mon Apr 10, 2017 6:17 pm
Posts: 220
Location: Germany
It definately looks interesting and would be of good use in a project. I also keep watching it closely to make use of it once its mature and the license allows it.

Reminds me a lot on other visual programming languages that have been mostly forgotten.


Top
 Profile  
Reply with quote  
 Post subject: Re: Visual Board version 1.0 beta 2
PostPosted: Sun Jul 14, 2019 8:50 am 
Offline
Enthusiast
Enthusiast
User avatar

Joined: Fri Jun 13, 2014 9:38 am
Posts: 130
@Bitblazer,

Don't worry for use it, its licence it's creative common.

The final destination for use it, is for a visual scripting designer.

_________________
Use Pb 5.60 lst and Windows 10

my mother-language isn't english, in advance excuse my mistakes.


Top
 Profile  
Reply with quote  
Display posts from previous:  Sort by  
Post new topic Reply to topic  [ 5 posts ] 

All times are UTC + 1 hour


Who is online

Users browsing this forum: No registered users and 8 guests


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum

Search for:
Jump to:  

 


Powered by phpBB © 2008 phpBB Group
subSilver+ theme by Canver Software, sponsor Sanal Modifiye