Timer Function

[TheButcheryInc]

Hello

I am trying to run this code:

////////////////////////////////////////////////////////////////
// Event delegate for 'timer' event
proc page1_Section1_field1_timer()
// insert your code here
if ComForm.PortOpen=.T.
Do Case
Case m_sent=.T.
If ComForm.Inbuffercount=15 && Data is wating in the input buffer
ret=ComForm.Input
m_sent=.F.
Endif
Case m_sent=.F.
ComForm.Output=Chr(87)+Chr(13)
m_sent=.T.
Endcase
Endif
endproc

I can't get the timer to run. Any help would be greatly appreciated.

[barrymavin]

Timers only fire in runtime mode.

Switch you app into runtime mode to test them.

[TheButcheryInc]

Hello
How do i run an app in Runtime mode ?

[HankFay]

[barrymavin]

See the doc.
https://www.lianja.com/doc/index.php...g_Live_Preview

[TheButcheryInc]

Got it working. is there any way to set the timer below 1 second ?

[barrymavin]

I’m afraid not no.

Polling like this using a timer is going to affect the UI performance.

The serialport class in the next release has compatibility with many of the MSCOMM properties and methods.

It fires a readyread event when there is data in the buffer to read.

You may want to look at that.
https://www.lianja.com/doc/index.php/Serialport

You can find details on how to use the framework classes at:
https://www.lianja.com/doc/index.php...mework_Classes