Como imprimir un grafico
que onda como stan? soy nuevo en Visual fox, e creado un programa para hacer graficos en un form, pero no se como imprimirlos directamente del form, o si hay alguna forma de seleccionar la grafica y pegarla en una hoja de excel, uso la instruccion de MSgrap.8. Podrian ayudarme?
crear un reporte, y coloca el campo que hace referencia a la imagen ya sea tipo memo o general
en maestro de projecto
create un tabla llama foxfeliz.dbf
coloca los campos que quieras....
pero create un campo llamado
imagen tipo memo con logitud 4
si lo creas tipo MEMO debes recordar que lo que se guarda es la ruta y no la imagen como tal....
si desea guardar la imagen create el mismo compo pero tipo GENERAL
LUEGO CREATE un boton llamado imprimir y haz UNA SENTENCIA SQL, COMO por ejemplo; un SELECT
SELECT campo1,campo2,campo3,imagen;
from nbtabla;
where Condicion; (la condicion la colocas si es necesario)
into cursor verimagen;
IF !EMPTYverimagen.campo1)
WAIT WIND 'preparando para imprimir' TIMEOUT 2 &&NOWAIT
SELECT verimagen
GO TOP IN verimagen
WAIT CLEAR
PRINTJOB()
REPORT FORM nombrereporte NOCONSOLE TO PRINTER PROMPT PREVIEW NOEJECT&&NOCON TO PRINT PROMPT
ENDPRINTJOB()
ELSE
=MESSAGEBOX("No hay campo para imprimir",64,"Atención")
endif
luego create el reporte:
en el maestro del projecto
crea un reporte nuevo
coloca los campos que haz elejido en el select a hora debes tener cuidado al colocar la imagen, en la barra de control del reporte escoje el boton de OLE, SELECIONA FILE, file porque tu campo que contiene la imagen en tipo memo, si fuera tipo general escoje, LUEGO EN LA CAJA DE TEXTO ESCRIBE EL NOMBRE DEL CURSOR SEGUIDO POR EL CAMPO EJ:
VERIMAGEN.IMAGEN
PRECIONA EL BOTON OK
Y LISTO
SUERTE....
create un tabla llama foxfeliz.dbf
coloca los campos que quieras....
pero create un campo llamado
imagen tipo memo con logitud 4
si lo creas tipo MEMO debes recordar que lo que se guarda es la ruta y no la imagen como tal....
si desea guardar la imagen create el mismo compo pero tipo GENERAL
LUEGO CREATE un boton llamado imprimir y haz UNA SENTENCIA SQL, COMO por ejemplo; un SELECT
SELECT campo1,campo2,campo3,imagen;
from nbtabla;
where Condicion; (la condicion la colocas si es necesario)
into cursor verimagen;
IF !EMPTYverimagen.campo1)
WAIT WIND 'preparando para imprimir' TIMEOUT 2 &&NOWAIT
SELECT verimagen
GO TOP IN verimagen
WAIT CLEAR
PRINTJOB()
REPORT FORM nombrereporte NOCONSOLE TO PRINTER PROMPT PREVIEW NOEJECT&&NOCON TO PRINT PROMPT
ENDPRINTJOB()
ELSE
=MESSAGEBOX("No hay campo para imprimir",64,"Atención")
endif
luego create el reporte:
en el maestro del projecto
crea un reporte nuevo
coloca los campos que haz elejido en el select a hora debes tener cuidado al colocar la imagen, en la barra de control del reporte escoje el boton de OLE, SELECIONA FILE, file porque tu campo que contiene la imagen en tipo memo, si fuera tipo general escoje, LUEGO EN LA CAJA DE TEXTO ESCRIBE EL NOMBRE DEL CURSOR SEGUIDO POR EL CAMPO EJ:
VERIMAGEN.IMAGEN
PRECIONA EL BOTON OK
Y LISTO
SUERTE....
