FNXBasic

Can I please ask you to consider adding "Com Interop" capability to the next release of FNXBasic?

Please see the following for an explanation of "Com Interop"

http://msdn.microsoft.com/en-us/library/kew41ycz.aspx

Many thanks in advance!!!

Also, can you please add the function "FileCopy".

This would work in a similar way to "Rename", except that the original file will be kept.

The function would be something like...

FileCopy OldName, NewName

ok i added to the todo list.

in the meantime you can use the solotion i mentioned in the general board, i hope.
best regards

Can you please add "instrrev" to the next release?

This will work similar to "instr" except that it will start at the "end" of the string and work "backwards".

So therefore instrrev("hello world", "o") will return 4

Many thanks!!!

The following code performs this function.
`code
Object frmForm As Form
  Caption="frmForm"
  Center
  Object btnButton As Button
    Tag=0
    Top=10
    Left=10
    Caption="Instrrev"
    Hint="This is a button"
    Showhint=True
    Onclick=button_OnClick
  End Object
End Object
frmForm.Showmodal
`=============================================
Sub button_OnClick
  Dim cadena As String, funcInstrrev As Integer
  cadena="Hello world"
  FuncInstrrev=instrrev(cadena,"o")
  Showmessage FuncInstrrev
End Sub
`=============================================
Function instrrev (strString As String,SubString As String) as Integer
  Dim posi As Integer
  posi=0
  posi=Rinstr(strString,SubString)
  Result= (Len(strString)-posi)+1
End Function