Information générale
Titre:
Quit application when file('xxxxxxxxxx')
I Have add a timer to my main appl that checks if the file bachup.txt is there.
But the timerevent or the quit-command doesn't works untill I click several times on the window.
My goal is the add a poss. the quit an applic. from a command at the server. file=Fcreate('t:\backup.txt')
this is the code
_screen.AddObject('mytimer','itstime')
DEFINE CLASS mytimer AS TIMER && Create timerevent
interval=1000
PROCEDURE timer
if file('t:\backup1.kto')
quit
endif
enddefine
Is there somebody who can help me whit this or has another solution in his mind.
Thanks.
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement