Basic language for PocketPC

[GeoTrail]

I found a really cool, and very easy to use Basic language for Pocket PC.
It's only $29 which is pretty cheap. It's called Basic4PPC, the latest version supports database using cvs and xml files.
I haven't purchased it yet, but I will as soon as I get some cash.
The trial version can't compile, but with the registered version you can compile to Device and Windows format. Yes, you can even create small and simple Windows programs hehehe

Here's a small example of a database program I wrote:

Code: Select all

Sub Globals
	Sex = ""
End Sub

Sub App_Start
	Form1.Show
	if Fileexist("data.csv") = True then
		Table1.LoadCSV ("data.csv", ",", True, True)
	else
		Table1.AddCol (cString, "Firstname", 100)
		Table1.AddCol (cString, "Lastname", 100)
		Table1.AddCol (cString, "Email", 100)
		Table1.AddCol (cString, "Sex", 20)
		Table1.TableSort("Firstname ASC, Lastname ASC")
		Table1.SaveCSV ("data.csv", "," ,True)
	end if
End Sub

Sub Delete_Click
	DeleteName=Table1.SelectedRow
	Ask=MsgBox("Are you sure you want to delete "&DeleteName, "Confirm delete", cMsgBoxYesNo,cMsgBoxYesNo)
	if Ask = cYes then
		Table1.RemoveRow(Table1.SelectedRow)
		Table1.TableSort("Firstname ASC, Lastname ASC")
		Table1.SaveCSV("data.csv", ",", True)
	else if Ask = cNo then
	
	else
		MsgBox("Error in resulting value from msgbox", "Result")
	end if
End Sub

Sub New_Click
	AddNew.Show
End Sub

Sub Exit_Click
	AppClose
End Sub






Sub SaveNew_Click
	Table1.AddRow (Firstname.Text, Lastname.Text, Email.Text, Sex)
	Table1.TableSort("Firstname ASC, Lastname ASC")
	Table1.SaveCSV ("data.csv", "," ,True)
	AddNew.Close
End Sub

Sub AbortNew_Click
	AddNew.Close
End Sub

Sub Male_Click
	Sex = "Male"
End Sub

Sub Female_Click
	Sex = "Female"
End Sub

Here's a few screenshot:



Url: http://www.basic4ppc.com/index.html

[LuCiFeR[SD]]

ooooh, that looks pretty cool Heres me with my poor lil Dell Axim X30 gathering dust... could make it interesting again

[GeoTrail]

ooooh, that looks pretty cool Heres me with my poor lil Dell Axim X30 gathering dust... could make it interesting again

Yeah go for it. I had an Axim X3 before, my Qtek S100 only has a 416 MHz CPU, but I've clocked it successfully to 520 MHz

[dracflamloc]

i have a nice x50 i might try this on