VisualFBEditor - IDE for FreeBasic

User projects written in or related to FreeBASIC.
Post Reply
Xusinboy Bekchanov
Posts: 782
Joined: Jul 26, 2018 18:28

Re: VisualFBEditor - IDE for FreeBasic

Post by Xusinboy Bekchanov »

Avata wrote: Mar 18, 2023 12:58 I think some code need to be change if we compile with FBC 1.10.
In my opinion, we have made all the necessary changes in the new version that has not yet been released.
Avata
Posts: 102
Joined: Jan 17, 2021 7:27

Re: VisualFBEditor - IDE for FreeBasic

Post by Avata »

It is amazing the following code can not compile with FBC 1.10 but it is ok compiling with FBC 1.09. Maybe Is it a bug in FBC 1.10?
PS.
I testing again. It is amazing the following code can compile with FBC 1.10!!!!!!!!

Code: Select all

#cmdline "-s console"
Sub LoadHelp
	Enum Paragraph
		parStart
		parSyntax
		parUsage
		parParameters
		parReturnValue
		parDescription
		parExample
		parDifferencesFromQB
		parSeeAlso
	End Enum
	Dim As Paragraph Parag
	Parag = Paragraph.parUsage
	Print Parag
End Sub

LoadHelp
Sleep

Last edited by Avata on Mar 21, 2023 10:13, edited 1 time in total.
fxm
Moderator
Posts: 12081
Joined: Apr 22, 2009 12:46
Location: Paris suburbs, FRANCE

Re: VisualFBEditor - IDE for FreeBasic

Post by fxm »

Remove the last line 'End Sub'.
PeterHu
Posts: 146
Joined: Jul 24, 2022 4:57

Re: VisualFBEditor - IDE for FreeBasic

Post by PeterHu »

Xusinboy Bekchanov wrote: Feb 26, 2023 5:21
srvaldez wrote: Feb 26, 2023 4:11 hello Xusinboy Bekchanov :)
are you working on your Editor to make it compatible with FB version 1.10 ?
I started out trying to compile a project with FB 1.10 and it gave me many errors
btw, I like your Editor :D
Fixed: Compiling with fbc 1.10.0:
https://github.com/XusinboyBekchanov/Vi ... 2f36666a26

Fixed: Compiling with fbc 1.10.0:
https://github.com/XusinboyBekchanov/My ... 16699a7993
srvaldez wrote: Feb 26, 2023 4:11 [edit]
viewtopic.php?p=278539#p278539
srvaldez wrote: Dec 20, 2020 19:12 changing the font size of a TextBox and command button shows in the designer form but when compiled it defaults to size 8
I have the same problem again, am I missing something?
I have now checked the font size is working.
Hi,the bass example and DataGrid example won't compile due to can't find -lbass or mising file mmf/sysutils.bas in 1.3.4 but ok in 1.3.3.Was I missing something?For 1.3.4,I just got it from github,your post.

BTW,noticed fbc 1.1.0 was mentioned quite a while in the forum,and also here.So may I ask where can I get FBC1.1.0?
Thank you.
Xusinboy Bekchanov
Posts: 782
Joined: Jul 26, 2018 18:28

Re: VisualFBEditor - IDE for FreeBasic

Post by Xusinboy Bekchanov »

PeterHu wrote: Mar 23, 2023 2:50 Hi,the bass example and DataGrid example won't compile due to can't find -lbass or mising file mmf/sysutils.bas in 1.3.4 but ok in 1.3.3.Was I missing something?For 1.3.4,I just got it from github,your post.
When compiling the bass example, I didn't find the problem. Dll files are in their folders:
VisualFBEditor.1.3.4\Examples\Bass\release32\bass.dll
And
VisualFBEditor.1.3.4\Examples\Bass\release64\bass.dll.

GridData example fixed:
Update frmGridDataTest.vfp:
https://github.com/XusinboyBekchanov/Vi ... 7907772279

Fixed: Compiling Panel without Form:
https://github.com/XusinboyBekchanov/My ... 753afd284a
PeterHu wrote: Mar 23, 2023 2:50 BTW,noticed fbc 1.1.0 was mentioned quite a while in the forum,and also here.So may I ask where can I get FBC1.1.0?
Thank you.
fbc version 1.10.0 is located here:
https://freebasic.net/forum/viewtopic.php?t=19095
St_W
Posts: 1618
Joined: Feb 11, 2009 14:24
Location: Austria
Contact:

Re: VisualFBEditor - IDE for FreeBasic

Post by St_W »

Xusinboy Bekchanov wrote: Mar 23, 2023 14:11 fbc version 1.10.0 is located here:
https://freebasic.net/forum/viewtopic.php?t=19095
Just a small disclaimer: version 1.10.0 is not officially released yet, so any such version you can get as-of now represents a preliminary, non-final development version which may and very likely will change until the final 1.10 release.
PeterHu
Posts: 146
Joined: Jul 24, 2022 4:57

Re: VisualFBEditor - IDE for FreeBasic

Post by PeterHu »

Xusinboy Bekchanov wrote: Mar 23, 2023 14:11
PeterHu wrote: Mar 23, 2023 2:50 Hi,the bass example and DataGrid example won't compile due to can't find -lbass or mising file mmf/sysutils.bas in 1.3.4 but ok in 1.3.3.Was I missing something?For 1.3.4,I just got it from github,your post.
When compiling the bass example, I didn't find the problem. Dll files are in their folders:
VisualFBEditor.1.3.4\Examples\Bass\release32\bass.dll
And
VisualFBEditor.1.3.4\Examples\Bass\release64\bass.dll.

GridData example fixed:
Update frmGridDataTest.vfp:
https://github.com/XusinboyBekchanov/Vi ... 7907772279

Fixed: Compiling Panel without Form:
https://github.com/XusinboyBekchanov/My ... 753afd284a
PeterHu wrote: Mar 23, 2023 2:50 BTW,noticed fbc 1.1.0 was mentioned quite a while in the forum,and also here.So may I ask where can I get FBC1.1.0?
Thank you.
fbc version 1.10.0 is located here:
https://freebasic.net/forum/viewtopic.php?t=19095
Thank you!
PeterHu
Posts: 146
Joined: Jul 24, 2022 4:57

Re: VisualFBEditor - IDE for FreeBasic

Post by PeterHu »

St_W wrote: Mar 23, 2023 14:51
Xusinboy Bekchanov wrote: Mar 23, 2023 14:11 fbc version 1.10.0 is located here:
https://freebasic.net/forum/viewtopic.php?t=19095
Just a small disclaimer: version 1.10.0 is not officially released yet, so any such version you can get as-of now represents a preliminary, non-final development version which may and very likely will change until the final 1.10 release.
Appreciated for letting us know!
PeterHu
Posts: 146
Joined: Jul 24, 2022 4:57

Re: VisualFBEditor - IDE for FreeBasic

Post by PeterHu »

Xusinboy Bekchanov wrote: Mar 23, 2023 14:11
PeterHu wrote: Mar 23, 2023 2:50 Hi,the bass example and DataGrid example won't compile due to can't find -lbass or mising file mmf/sysutils.bas in 1.3.4 but ok in 1.3.3.Was I missing something?For 1.3.4,I just got it from github,your post.
When compiling the bass example, I didn't find the problem. Dll files are in their folders:
VisualFBEditor.1.3.4\Examples\Bass\release32\bass.dll
And
VisualFBEditor.1.3.4\Examples\Bass\release64\bass.dll.

GridData example fixed:
Update frmGridDataTest.vfp:
https://github.com/XusinboyBekchanov/Vi ... 7907772279

Fixed: Compiling Panel without Form:
https://github.com/XusinboyBekchanov/My ... 753afd284a
PeterHu wrote: Mar 23, 2023 2:50 BTW,noticed fbc 1.1.0 was mentioned quite a while in the forum,and also here.So may I ask where can I get FBC1.1.0?
Thank you.
fbc version 1.10.0 is located here:
https://freebasic.net/forum/viewtopic.php?t=19095
Dear,I've just downloaded the updated package of both IDE & MyFrameWork to overwrite my local copy.Testing bass/DataGrid example,the result is as below:
Bass example:32 bit ok,64bit missing -lbass
DataGrid example: both 32 & 64 bit compiles and runs,but console log information shows:
OPEN SQLiteDB Failure.
bad parameter or other API misuse

--using fbc1.09
Xusinboy Bekchanov
Posts: 782
Joined: Jul 26, 2018 18:28

Re: VisualFBEditor - IDE for FreeBasic

Post by Xusinboy Bekchanov »

PeterHu wrote: Mar 24, 2023 6:21 Dear,I've just downloaded the updated package of both IDE & MyFrameWork to overwrite my local copy.Testing bass/DataGrid example,the result is as below:
Bass example:32 bit ok,64bit missing -lbass
It compiles fine for me in 64 bit too. Show all error messages.
PeterHu wrote: Mar 24, 2023 6:21 DataGrid example: both 32 & 64 bit compiles and runs,but console log information shows:
OPEN SQLiteDB Failure.
bad parameter or other API misuse

--using fbc1.09
Fixed: GridData example:
https://github.com/XusinboyBekchanov/Vi ... f5f81fdccc
Avata
Posts: 102
Joined: Jan 17, 2021 7:27

Re: VisualFBEditor - IDE for FreeBasic

Post by Avata »

You can try the light version GRID. Griddata is not updated to the newest version mff.

frmGrid.frm

Code: Select all

'#Region "Form"
	#if defined(__FB_MAIN__) AndAlso Not defined(__MAIN_FILE__)
		#define __MAIN_FILE__
		#ifdef __FB_WIN32__
			#cmdline "Form1.rc"
		#endif
		Const _MAIN_FILE_ = __FILE__
	#endif
	#include once "mff/Form.bi"
	#include once "mff/Grid.bi"
	
	Using My.Sys.Forms
	
	Type Form1Type Extends Form
		Declare Constructor
		
		Dim As Grid Grid1
	End Type
	
	Constructor Form1Type
		' Form1
		With This
			.Name = "Form1"
			.Text = "Form1"
			.Designer = @This
			.SetBounds 0, 0, 350, 300
		End With
		' Grid1
		With Grid1
			.Name = "Grid1"
			.Text = "Grid1"
			.TabIndex = 0
			.Anchor.Right = AnchorStyle.asAnchor
			.Anchor.Bottom = AnchorStyle.asAnchor
			.Anchor.Top = AnchorStyle.asAnchor
			.Anchor.Left = AnchorStyle.asAnchor
			.SetBounds 10, 20, 320, 240
			.Columns.Add "Column 1", , 150
			.Columns.Add "Column 2", , 150
			.Columns[1].Tag = @"0"
			.Rows.Add "Row 1 Column 1"
			.Rows.Add "Row 2 Column 1"
			.Rows.Add "Row 3 Column 1"
			.Rows.Add "Row 4 Column 1"
			Grid1[0][1].Text = "Row 1 Column 2"
			Grid1[1][1].Text = "Row 2 Column 2"
			.Rows[2][1].Text = "Row 3 Column 2"
			.Cell(3, 1)->Text = "Row 4 Column 2"
			.Rows[3].Tag = @"1"
			.Designer = @This
			.Parent = @This
		End With
	End Constructor
	
	Dim Shared Form1 As Form1Type
	
	#if _MAIN_FILE_ = __FILE__
		App.DarkMode = True
		Form1.MainForm = True
		Form1.Show
		App.Run
	#endif
'#End Region


PeterHu
Posts: 146
Joined: Jul 24, 2022 4:57

Re: VisualFBEditor - IDE for FreeBasic

Post by PeterHu »

Xusinboy Bekchanov wrote: Mar 24, 2023 15:28
PeterHu wrote: Mar 24, 2023 6:21 Dear,I've just downloaded the updated package of both IDE & MyFrameWork to overwrite my local copy.Testing bass/DataGrid example,the result is as below:
Bass example:32 bit ok,64bit missing -lbass
It compiles fine for me in 64 bit too. Show all error messages.
PeterHu wrote: Mar 24, 2023 6:21 DataGrid example: both 32 & 64 bit compiles and runs,but console log information shows:
OPEN SQLiteDB Failure.
bad parameter or other API misuse

--using fbc1.09
Fixed: GridData example:
https://github.com/XusinboyBekchanov/Vi ... f5f81fdccc
Dear,GridData example now works in 1.3.4 both 32 bit and 64bit.
For Bass example,managed to copy bass.a libbass.a from /release64 to bass root and now 64 bit compiles ok,but don't know why,in version 1.3.3 this example compiles directly without any modification.
Xusinboy Bekchanov
Posts: 782
Joined: Jul 26, 2018 18:28

Re: VisualFBEditor - IDE for FreeBasic

Post by Xusinboy Bekchanov »

PeterHu wrote: Mar 25, 2023 7:04 For Bass example,managed to copy bass.a libbass.a from /release64 to bass root and now 64 bit compiles ok,but don't know why,in version 1.3.3 this example compiles directly without any modification.
If I change the compiler path to another one, it didn't compile for me either. Turns out I put the 64 bit libbass.dll.a in my compiler folder: VisualFBEditor\Compilers\FreeBASIC-1.09.0-winlibs-gcc-9.3.0\lib\win64.

Both 1.3.3 and 1.3.4 couldn't compile 64-bit either.

I have now indicated in the sources the correct path for 32-bit and 64-bit.

Fixed: Compiling Bass Example:
https://github.com/XusinboyBekchanov/Vi ... 5b08940c53
PeterHu
Posts: 146
Joined: Jul 24, 2022 4:57

Re: VisualFBEditor - IDE for FreeBasic

Post by PeterHu »

Xusinboy Bekchanov wrote: Mar 25, 2023 15:41
PeterHu wrote: Mar 25, 2023 7:04 For Bass example,managed to copy bass.a libbass.a from /release64 to bass root and now 64 bit compiles ok,but don't know why,in version 1.3.3 this example compiles directly without any modification.
If I change the compiler path to another one, it didn't compile for me either. Turns out I put the 64 bit libbass.dll.a in my compiler folder: VisualFBEditor\Compilers\FreeBASIC-1.09.0-winlibs-gcc-9.3.0\lib\win64.

Both 1.3.3 and 1.3.4 couldn't compile 64-bit either.

I have now indicated in the sources the correct path for 32-bit and 64-bit.

Fixed: Compiling Bass Example:
https://github.com/XusinboyBekchanov/Vi ... 5b08940c53
Dear,now it works great.
Thank you!
Avata
Posts: 102
Joined: Jan 17, 2021 7:27

Re: VisualFBEditor - IDE for FreeBasic

Post by Avata »

The light version of GRID has been updated to allow cells to be edited in both Linux and Windows.

frmGridTest.frm

Code: Select all

'#Region "Form"
	#if defined(__FB_MAIN__) AndAlso Not defined(__MAIN_FILE__)
		#define __MAIN_FILE__
		#ifdef __FB_WIN32__
			#cmdline "Form1.rc"
		#endif
		Const _MAIN_FILE_ = __FILE__
	#endif
	#include once "mff/Form.bi"
	#include once "mff/Grid.bi"
	#include once "mff/CommandButton.bi"
	
	Using My.Sys.Forms
	
	Type Form1Type Extends Form
		Declare Static Sub _cmdRowInsert_Click(ByRef Sender As Control)
		Declare Sub cmdRowInsert_Click(ByRef Sender As Control)
		Declare Static Sub _cmdRowDele_Click(ByRef Sender As Control)
		Declare Sub cmdRowDele_Click(ByRef Sender As Control)
		Declare Static Sub _cmdColInsert_Click(ByRef Sender As Control)
		Declare Sub cmdColInsert_Click(ByRef Sender As Control)
		Declare Static Sub _cmdColDele_Click(ByRef Sender As Control)
		Declare Sub cmdColDele_Click(ByRef Sender As Control)
		Declare Constructor
		
		Dim As Grid Grid1
		Dim As CommandButton cmdRowInsert, cmdColInsert, cmdRowDele, cmdColDele
	End Type
	
	Constructor Form1Type
		' Form1
		With This
			.Name = "Form1"
			.Text = "Form1"
			.Designer = @This
			.SetBounds 0, 0, 350, 300
		End With
		' Grid1
		With Grid1
			.Name = "Grid1"
			.Text = "Grid1"
			.TabIndex = 0
			.Hint = "Double Click or press space start edit, Enter Confirm input!"
			.Anchor.Right = AnchorStyle.asAnchor
			.Anchor.Bottom = AnchorStyle.asAnchor
			.Anchor.Top = AnchorStyle.asAnchor
			.Anchor.Left = AnchorStyle.asAnchor
			.SetBounds 10, 20, 320, 240
			.Columns.Add "No", , 50
			.Columns.Add "Column 1", , 100
			.Columns.Add "Column 2", , 100, , True
			.Columns.Add "Column 3", , 100
			.Columns.Add "Column 4", , 100
			.Columns.Add "Column 5", , 100, , True
			.Columns[1].Tag = @"0"
			
			.Rows.Add "1"
			.Rows.Add "2"
			.Rows.Add "3"
			.Rows.Add "4"
			
			'Control's Name
			Grid1[0][1].Text = "Row 1 Column 1"
			Grid1[1][1].Text = "Row 2 Column 1"
			Grid1[2][1].Text = "Row 3 Column 1"
			Grid1[3][1].Text = "Row 4 Column 1"
			'Like Array 
			.Rows[0][2].Text = "Row1Col2 AllowEdit"
			.Rows[1][2].Text = "Row2Col2 AllowEdit"
			.Rows[2][2].Text = "Row3Col2 AllowEdit"
			.Rows[3][2].Text = "Row4Col2 AllowEdit"
			
			'Cell Like ExCEL
			.Cell(0, 3)->Text = "Row 1 Column 3"
			.Cell(1, 3)->Text = "Row 2 Column 3"
			.Cell(2, 3)->Text = "Row 3 Column 3"
			.Cell(3, 3)->Text = "Row 4 Column 3"
			
			.Rows[0][5].Text = "Row1Col5 AllowEdit"
			.Rows[1][5].Text = "Row2Col5 AllowEdit"
			.Rows[2][5].Text = "Row3Col5 AllowEdit"
			.Rows[3][5].Text = "Row4Col5 AllowEdit"
			.Rows[3].Tag = @"3"
			.Designer = @This
			.Parent = @This
		End With
		' cmdRowInsert
		With cmdRowInsert
			.Name = "cmdRowInsert"
			.Text = "Insert one Row"
			.TabIndex = 0
			.SetBounds 10, 0, 75, 20
			.Designer = @This
			.OnClick = @_cmdRowInsert_Click
			.Parent = @This
		End With
		' cmdColInsert
		With cmdColInsert
			.Name = "cmdColInsert"
			.Text = "Insert one Col"
			.TabIndex = 2
			.ControlIndex = 1
			.SetBounds 170, 0, 75, 20
			.Designer = @This
			.OnClick = @_cmdColInsert_Click
			.Parent = @This
		End With
		' cmdRowDele
		With cmdRowDele
			.Name = "cmdRowDele"
			.Text = "Dele one Row"
			.TabIndex = 3
			.ControlIndex = 2
			.SetBounds 90, 0, 75, 20
			.Designer = @This
			.OnClick = @_cmdRowDele_Click
			.Parent = @This
		End With
		' cmdColDele
		With cmdColDele
			.Name = "cmdColDele"
			.Text = "Dele one Col"
			.TabIndex = 4
			.ControlIndex = 2
			.SetBounds 250, 0, 75, 20
			.Designer = @This
			.OnClick = @_cmdColDele_Click
			.Parent = @This
		End With
	End Constructor
	
	Private Sub Form1Type._cmdColDele_Click(ByRef Sender As Control)
		(*Cast(Form1Type Ptr, Sender.Designer)).cmdColDele_Click(Sender)
	End Sub
	
	Private Sub Form1Type._cmdColInsert_Click(ByRef Sender As Control)
		(*Cast(Form1Type Ptr, Sender.Designer)).cmdColInsert_Click(Sender)
	End Sub
	
	Private Sub Form1Type._cmdRowDele_Click(ByRef Sender As Control)
		(*Cast(Form1Type Ptr, Sender.Designer)).cmdRowDele_Click(Sender)
	End Sub
	
	Private Sub Form1Type._cmdRowInsert_Click(ByRef Sender As Control)
		(*Cast(Form1Type Ptr, Sender.Designer)).cmdRowInsert_Click(Sender)
	End Sub
	
	Dim Shared Form1 As Form1Type
	
	#if _MAIN_FILE_ = __FILE__
		'App.DarkMode = True
		Form1.MainForm = True
		Form1.Show
		App.Run
	#endif
'#End Region

Private Sub Form1Type.cmdRowInsert_Click(ByRef Sender As Control)
		Dim As Integer Curr = Grid1.SelectedRowIndex
	Grid1.Rows.Insert(Curr, Str(Curr))
End Sub

Private Sub Form1Type.cmdRowDele_Click(ByRef Sender As Control)
	Dim As Integer Curr = Grid1.SelectedRowIndex 
	Grid1.Rows.Remove(Curr)
End Sub

Private Sub Form1Type.cmdColInsert_Click(ByRef Sender As Control)
	Dim As Integer Curr = Grid1.SelectedColumnIndex 
	Grid1.Columns.Insert(Curr, "Column " & Curr, , 100, , True)
End Sub

Private Sub Form1Type.cmdColDele_Click(ByRef Sender As Control)
	Dim As Integer Curr = Grid1.SelectedColumnIndex 
	Grid1.Columns.Remove(Curr)
End Sub
Post Reply