I am experimenting with tasks. The creation of virtual tables in the database for a full text search takes a bit of time. I would like to start the database operation as a new task to keep the program responsive for user interaction. But I got stuck and I have no idea why. The task in class MyTask_FTS simply doesn't start.

Here is what I have so far:
FMain.class


MyTask_FTS.class

Hmm, as I said already above the function Main() in class MyTask_FTS does not start. Does anyone know why?

 the function Main() only applies to Startup classes to use the function in your normal class you should change the name Main() to a command name.

then after
  If $hTask = Null Then $hTask = New MyTask_FTS As "MyTask_FTS"

you can use $hTask.CommandName()

also you can use

Public Sub _new()
' Startup code here
End

any code within _new() is run when you create the object.

If you are looking for task examples have a look on the Farm for InFile, it has 2 tasks and TaskExample.

You might find this thread interesting, we maxed out all 8 cores of a CPU using Task.

BruceSteers said

then after
  If $hTask = Null Then $hTask = New MyTask_FTS As "MyTask_FTS"

you can use $hTask.CommandName()

Cheers, it works and it speeds up the program in case of a complex DB operation. I have now an idea how tasks could work. BUT - what I don't understand yet - when I changed the name of the function from Main() to commandname() as proposed a runtime error occurred (Unable to find method Main in class MyTask_FTS.class). So I renamed it back to Main() and changed the $hTask.CommandName() into $hTask.Main().
The following sub TaskRun() is part of the FMain.class which might be the reason to name function Main() - ?

01McAc said

BruceSteers said

then after
  If $hTask = Null Then $hTask = New MyTask_FTS As "MyTask_FTS"

you can use $hTask.CommandName()

Cheers, it works and it speeds up the program in case of a complex DB operation. I have now an idea how tasks could work. BUT - what I don't understand yet - when I changed the name of the function from Main() to commandname() as proposed a runtime error occurred (Unable to find method Main in class MyTask_FTS.class). So I renamed it back to Main() and changed the $hTask.CommandName() into $hTask.Main().
The following sub TaskRun() is part of the FMain.class which might be the reason to name function Main() - ?

Code (gambas)

1. Private Sub TaskRun()  
2.  
3. ' Create a new task object - Object name = Object-Event-Name: MyTask_FTS
4.   If $hTask = Null Then $hTask = New MyTask_FTS As "MyTask_FTS"
5.   $hTask.Main
6.   Repeat
7.     Wait 0.001
8.   Until $hTask <> Null  
9.   Application.Priority = 10 ' Prozess-Priorität für den Task
10.    
11. End ' TaskRun()

aah , I have little experience using Tasks so it's possible i am mistaken as tasks actually work like startup classes?
Cogier has much more experience using tasks.

His InFile app might be a much better place to get help on this than me.

Ps. sometimes when using classes you have to hit the "Compile All" button in the ide to re-compile the classes to use.

glad you got it working

 I'll have a look into the InFile project

Solved:
https://forum.gambas.o…pic.php?f=13&p=4070#p4070