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
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,,,
Francisco,
Si no lo llamas desde la vtaskbar no cierra el programa ?
Por favor comprueba si en disco se genera un fichero error.log
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
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
