Timer Property (OpenInsight 64-bit) [Revelation On-Line Wiki]

This page is read only. You can view the source, but not change it. Ask your administrator if you think this is wrong.
{{tag>category:"OpenInsight 64-bit" author:"Mark Glicksman" author:"Andrew McAuley" author:"Carl Pates" author:"Donald Bakke" author:"Barry Stevens"}}

[[https://www.revelation.com/the-works|Join The Works program to have access to the most current content, and to be able to ask questions and get answers from Revelation staff and the Revelation community]]


==== Timer Property (OpenInsight 64-bit) ====
=== At 26 MAY 2022 11:19:51AM Mark Glicksman wrote: ===
 
 
<QUOTE>
In OI 10.x is there any substitute for the Timer property in a form?
</QUOTE>
----

=== At 26 MAY 2022 11:38AM Andrew McAuley wrote:  ===

<QUOTE>You don't need a substitute - as the docs say



"Remarks

In previous versions of OpenInsight only forms supported a TIMER property and a 

TIMER event. In this version all GUI objects support them"



The Timer event is exposed in the IDE but not the property. I assume this is an oversight.



[url=https://www.sprezzatura.com]The Sprezzatura Group[/url]

[url=https://www.sprezzatura.com/blog]The Sprezzatura Blog[/url]

[i]World leaders in all things RevSoft[/i]

[img]https://www.sprezzatura.com/zz.gif[/img]

</QUOTE>

----

=== At 26 MAY 2022 11:48AM Mark Glicksman wrote:  ===

<QUOTE>Thanks, Andrew. Is there an example on how to use it? I want to execute a procedure once per second as long as the form is running.

</QUOTE>

----

=== At 26 MAY 2022 12:14PM Andrew McAuley wrote:  ===

<QUOTE>[url=https://revdevx.files.wordpress.com/2022/01/080-common-gui-object-api.pdf]From the docs[/url]




<code>
// Execute the TIMER event once and only once after n millseconds

Call Set_Property_Only( CtrlEntID, "TIMER", 0 : @Fm : n )

// Execute the TIMER event every n millseconds starting after n

// millseconds

Call Set_Property_Only( CtrlEntID, "TIMER", n )

// Execute the TIMER event every n millseconds starting immediately

Call Set_Property_Only( CtrlEntID, "TIMER", n : @Fm : 0 )

// Stop generating TIMER events

Call Set_Property_Only( CtrlEntID, "TIMER", 0 )
</code>








[url=https://www.sprezzatura.com]The Sprezzatura Group[/url]

[url=https://www.sprezzatura.com/blog]The Sprezzatura Blog[/url]

[i]World leaders in all things RevSoft[/i]

[img]https://www.sprezzatura.com/zz.gif[/img]

</QUOTE>

----

=== At 26 MAY 2022 01:57PM Mark Glicksman wrote:  ===

<QUOTE>Thanks so much, Andrew

</QUOTE>

----

=== At 26 MAY 2022 04:22PM Mark Glicksman wrote:  ===

<QUOTE>When I implement a timer event on my start form, I cannot open any other application. Every time the timer event "clicks", it forces focus back to Openinsight. It doesn't matter what the timer event is - even an event that does nothing. Is there any way to overcome this?

</QUOTE>

----

=== At 30 MAY 2022 06:35AM Carl Pates wrote:  ===

<QUOTE>Hi Mark,



I can't reproduce this - the IDE itself uses TIMER events which don't have this issue.  Can you give me steps to reproduce it please?  



Regards



[email=cpates@revsoft.co.uk]Carl Pates[/email]

</QUOTE>

----

=== At 31 MAY 2022 11:16AM Mark Glicksman wrote:  ===

<QUOTE>I added a timer event to the initial form of my app. It fires once per second to read a short text from an operating system file to determine if the text has changed. I intended this as a substitute for the now defunct DDE capability. Each time the event fires, it grabs the focus away from any other app. This prevents me from doing anything in the CAD app because every second the focus snaps back to the initial form.

</QUOTE>

----

=== At 31 MAY 2022 11:23AM Donald Bakke wrote:  ===

<QUOTE>
<QUOTE>I added a timer event to the initial form of my app. It fires once per second to read a short text from an operating system file to determine if the text has changed. I intended this as a substitute for the now defunct DDE capability. Each time the event fires, it grabs the focus away from any other app. This prevents me from doing anything in the CAD app because every second the focus snaps back to the initial form.</QUOTE>



I concur with Carl, this is very odd and unexpected behavior. It seems to me that something else is at work here.



However, you might get better success using the [url=https://revdevx.com/2021/12/30/the-dirwatcher-control/]DIRWATCHER control[/url].



[url=mailto:dbakke@srpcs.com]Don Bakke[/url]

[url=http://www.srpcs.com]SRP Computer Solutions, Inc.[/url]

</QUOTE>

----

=== At 31 MAY 2022 02:18PM Mark Glicksman wrote:  ===

<QUOTE>Thanks, I'll take a look at DIRWATCHER.

</QUOTE>

----

=== At 31 MAY 2022 03:36PM Mark Glicksman wrote:  ===

<QUOTE>Don, I added a DIRWATCH control to my startup form. This is what I put into the Create event: Retval = Exec_Method(@Window:".DIRWATCH_1", "WATCHDIR", "C:\bgmapwin\dirwatch", 0, "") Does that look OK?

I am not clear on how to use the CHANGED event for this control. Are there any examples?

Thanks for your help.



</QUOTE>

----

=== At 31 MAY 2022 05:55PM Barry Stevens wrote:  ===

<QUOTE>Post removed by author

</QUOTE>

----

=== At 31 MAY 2022 06:10PM Barry Stevens wrote:  ===

<QUOTE>
<QUOTE>Don, I added a DIRWATCH control to my startup form. This is what I put into the Create event: Retval = Exec_Method(@Window:".DIRWATCH_1", "WATCHDIR", "C:\bgmapwin\dirwatch", 0, "") Does that look OK?

I am not clear on how to use the CHANGED event for this control. Are there any examples?

Thanks for your help.

</QUOTE>





As per the document that Don pointed you to.

The changed event in the @Window:".DIRWATCH_1" control.

Process the 'newdata' values that are passed:



This event is raised when changes have been detected in the monitored directories.



bForward = CHANGED( NewData )

This event passes a single parameter called NewData which contains an @vm-delimited list of changed items (i.e. notifications). Each item in the list comprises an “action code” and the name and path of the affected file, delimited by an @svm.



Action codes are defined in the MSWIN_FILENOTIFY_EQUATES insert record like so:



   equ FILE_ACTION_ADDED$               to 0x00000001   

   equ FILE_ACTION_REMOVED$             to 0x00000002   

   equ FILE_ACTION_MODIFIED$            to 0x00000003   

   equ FILE_ACTION_RENAMED_OLD_NAME$    to 0x00000004   

   equ FILE_ACTION_RENAMED_NEW_NAME$    to 0x00000005 

</QUOTE>

----

=== At 01 JUN 2022 12:17PM Mark Glicksman wrote:  ===

<QUOTE>It worked! Thank you all.

</QUOTE>


[[https://www.revelation.com/revweb/oecgi4p.php/O4W_HANDOFF?DESTN=O4W_RUN_FORM&INQID=WORKS_READ&SUMMARY=1&KEY=9E71549C33D5D444840339A15A5A2A99|View this thread on the Works forum...]]