Page 1 of 1
salida abrupta...
Posted: Mon Jun 25, 2007 2:13 pm
by Francisco Horta
resulta que el programa a la hora de genrar un reporte este lo hace bien, pero cuando cierro la ventana del reporte, este me cierra todo el programa, ya estuve buscando y nada, el reporte lo tome de otro del mismo sistema y unicamente cambie la informacion que imprime, la unica diferencia es que en uno lo mando llamara desde una toolbar y el que me cierra el sistema lo mando llamar desde la vtaskbar, alguna idea por donde buscarle?
salu2
paco
Posted: Mon Jun 25, 2007 4:51 pm
by sysctrl2
Paco,
el reporte lo lanzas desde un boton de un dialogo ?
usas el metodo transparent en el dialogo ?
usas tsay dentro del dialogo ?
a mi me paso este problema, tuve que debugear linea a linea
para dar con el error,
y resulta que cuando uso el metodo TRANSPARENT y say,
es cuando sale el error
intenta quitarle el metodo transparent al dialogo
y los says hay que agregar la Data,
oSay:lTransParent := .t.
las propiedades TRANSPARENT le duele a la tprinter,,
Saludos,,,
Posted: Mon Jun 25, 2007 5:29 pm
by JoseLuis
Increible!
Mientras probaba ésto que dices, me decía "a ver si va a ser cierto", después de la cantidad de pruebas que he hecho, y nada, me ocurría lo mismo, se cerraba el programa.
Y no sólo me ocurría a mi, mira éste último post:
http://fivetechsoft.com/forums/viewtopi ... highlight=
Sera posible, !pues es cierto!, y la cantidad de horas y comidas de coco que he echado al tema.
Muchas gracias amigo!
Saludos
Jose Luis
Posted: Mon Jun 25, 2007 5:43 pm
by Antonio Linares
Francisco,
Si no lo llamas desde la vtaskbar no cierra el programa ?
Por favor comprueba si en disco se genera un fichero error.log
Posted: Mon Jun 25, 2007 7:15 pm
by sysctrl2
Jose Luis,
efectivamente es un dolor de cabeza,
pero no necesitas un gran codigo para darte cuenta
del problema,,
simplemente crea un dialogo desde resource,
ponle un say y un boton
agregale el metodo TRANSPARENT al momento de programas,
y manda llamar esta funcion. y veras que el sistema se sale
sin de decir nada.
static function _cuadricula()
local nFor
local nCol
Local oPrn
local oFnt1
PRINT oPrn TITLE 'Cuadricula' PREVIEW
DEFINE FONT oFnt1 NAME "TAHOMA" SIZE 0,-08 OF oPrn bold
oPrn:lPrvModal := .t.
page
for nFor := 1 to 26
oPrn:cmsay( nFor, 1, strzero(nFor,02), oFnt1 )
for nFor2 := 2 to 20
oPrn:cmsay( nFor, nFor2, strzero(nFor2,02), oFnt1 )
next
next
endPage
endPrint
return (.T.)
Como veras el metodo transparent le duele a la tprinter o al preview.
Saludos... Cordiales
Posted: Mon Jun 25, 2007 9:10 pm
by Francisco Horta
gracias a todos,
efectivamente cesar, omiti la clausula TRANSPARENT en mi dialogo creado desde recuros y ya no aborto el programa "FUNCIONO", por cierto Antonio esa salida del sistema no generea ningun archivo .log, me cerciore que no existiera para ver si lo generaba hice la prueba y no lo genero. Buen caso para la araña...
Salu2
Paco