thinBASIC 1.9.16.X

[ErosOlmi]

Ciaooooo Michael

Thanks for reporting, as Petr said, it is important to try to fix thinBasic as much as possible and have a super stable version asap.
I will have a look in the week-end.

Cheers
Eros

[ErosOlmi]

I am testing the newest version and getting errors with some sample scripts.
#1: I am getting this error in Excel/Excel_Test_SingleWorkBook.tbasic
#2: Similar in Excel/Excel_Test.tbasic

Regarding this problem, it is related to the Operating System Regional settings configuration regarding "List separator".
In the sample code I've used ; as list separator. You need to check if in your operating system list separator is ; or something else like , comma.
Check image of where to find regional settings

  '---Working with sheet.range
  Dim sRange As String
  sRange = "A1:B3;D1:F10"   '<---Change to "A1:B3,D1:F10" based on your OS regional settings
  
  out("Working with range: " & sRange)
  xRange = xSheet.Range(sRange)

Let me know if this fix the problem.

[Michael Hartlef]

Hi Eros,

no it didn't change anything.

Error_TB_20151129.PNG

The error looks either like a parser problem or classes need to be created via the NEW keyword.

[ErosOlmi]

What version of MS Excel do you have installed?

[Michael Hartlef]

Actually I am using LibreOffice. I apologize if you have to have Excel installed to make it work. I thought you need only a excel file for it.

[ErosOlmi]

No problem Michael,

new Excel module is for COM Automation of Excel so, in order to work, Excel is needed.
I will add a few functions in order to test if instantiated components are valid objects.

Ciao
Eros

[ErosOlmi]

Almost ready for the next beta update

Uses "Console"

Type tWithDynamicArrays
  lLong1  As Long
  lLong2  As Long
  
  aLong() As Long
  aExt()  As Ext
End Type

Dim MyT As tWithDynamicArrays

ReDim MyT.aLong(15)
ReDim MyT.aExt (10)

MyT.aLong( 1) = 1
MyT.aLong(10) = 10
MyT.aLong(15) = 15

MyT.aExt ( 1) = 1.1
MyT.aExt (10) = 10.1

ReDim Preserve MyT.aExt (15)
MyT.aExt (15) = 15.1

PrintL "---Press a key to finish---"
WaitKey

All numeric types already handled.

I'm working on:

• how to automatically released allocated memory on instantiated type de-allocation
• making some utility internal functions
• handling arrays of dynamic strings
• change UBound/LBound/SizeOf/Parse/, ... and all other functions working with data/arrays
• checking bounds
• handling up to 3 dimensions (actually just one)

Maybe I will release before developing all whet is needed in order to have your feedback.

[ReneMiner]

That's great news.
I think it could be possible then for fixed-size String & fixed-size Udts (such that don't contain any dynamic udt-elements) to become dynamic udt-subarrays too - when it works with numeric types

Dynamic subarrays of dynamic strings - it's quite easy already to store their keys or ptrs in an array of numbers and use dictionary-module or heap for the data. Dynamic String for me were less important and also for multidimensional data there are ways to calculate the Indexes from 1-dimensional arrays to almost unlimited count of dimensions - only have to know the bounds. And in urgent cases one could always place virtual a multidimensional array up to 3 dimensions without any calculations onto a 1-dimensional.

Ubound/SizeOf and release of (local) data seem to me the most important points then.

[ErosOlmi]

Yes, at the end is just a a matter of pointers to something

The complex part is to keep track constantly at run-time of what is what, its state and where is located.

[Petr Schreiber]

If I ever get a tatoo, it will be a few words in english:

"at the end is just a a matter of pointers to something"

Petr