Clipper/FiveWin - Problema sysrefresh fivewin

 
Vista:

Problema sysrefresh fivewin

Publicado por Renan (4 intervenciones) el 10/11/2003 06:28:52
Cuando se compila el siguente codigo

#include "FiveWin.ch"
#include "fileio.ch"
STATIC oWnd
STATIC oMsgItem

function Main()
DEFINE WINDOW oWnd ;
TITLE "Ventana de prueba" ;
FROM 10, 10 TO 14, 56 ;
NOZOOM
SET MESSAGE OF oWnd TO "" CLOCK DATE KEYBOARD
DEFINE MSGITEM oMsgItem OF oWnd:oMsgBar PROMPT "Esperando !!" SIZE 200
ACTIVATE WINDOW oWnd ;
ON INIT WDLG(@oWnd )
return nil

FUNCTION WDLG(oWnd)
SYSWAIT(2) && OJO sobre esto se trata OJO sobre esto se trata
return .T.

y se pulsa sobre la X de la esq sup derecha, la aplicacion cierra bien y
totalmente.- Si cambiamos el 2 de la penultima linea por 20 o mas, y
repetimos el proceso, la aplicacion no cierra totalmente.- Al volver a
invocar el programa, aparece "no se pueden invocar dos copias del
programa".- En W98, Ctrl+Alt+Del, muestra un proceso Fvewin sin cerrar, en W2000 o XP, aparece el programa aun corriento aunque la ventana cerro.

Puede alguien explicarme el por que de este fenomeno.- Tengo una
aplicacion que requiere de varios puntos de espera, funciona bien, hasta que tocamos el bendito botoncito X

Saludos
Renan
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Problema sysrefresh fivewin

Publicado por Elias Esquivel (55 intervenciones) el 12/11/2003 04:38:29
Cambia la ventana WINDOWS por DIALOG, este permanecera activo hasta que termine el proceso. De preferencia utiliza un objeto TIMER en lugar del SYSWAIT
suerte
Elias
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar