Run Program only once

[Otto]

How to control that a program only runs once.

Regards,
Otto

[Enrico Maria Giordano]

Code: Select all  Expand view  RUN

#include "Fivewin.ch"


FUNCTION MAIN()

    IF ISEXERUNNING( CFILENOEXT( HB_ARGV( 0 ) ) )
        ? "The app is already running"
        RETURN NIL
    ENDIF

    ? "This is the app's main loop"

    RETURN NIL

EMG

[Otto]

Thank you.
Otto