salida abrupta...

[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

[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,,,

[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/viewtopic.php?t=6687&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

[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

[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

[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