Iniciar sesiónCerrar
Correo:
Contraseña:
Entrar
Recordar sesión en este navegador
Iniciar sesiónIniciar sesiónCrear cuentaCrear cuenta
LWP » Preguntas/Respuestas » Preguntas Contestadas » FoxPro/Visual FoxPro

PREGUNTAS CONTESTADAS - FoxPro/Visual FoxPro

Volver
Agregar una pregunta
Buscar mis preguntas
Buscar
 Hay un total de 1456 Preguntas.<<  >> 

    Pregunta:  1061 - COMO MOVERSE POR LOS REGISTRO DE UN POPUP
Autor:  Hernan
La pregunta consiste como hacer en Foxpro 2.6 para Dos poder buscar dentro de un popup a medida que ingresamos caracteres. En este momento lo hago pero al presionar un caracter, se desplaza en la base. Lo que necesito es que actue la busqueda como en windows. (que a medida que vaya ingresando caracteres se vaya moviendo de registro en el popup)
  Respuesta:  ANTONIO JILOTH
SI AUN LO NECESITAS ENVIAME UN CORREO YO TENGO TODO UN PRG DE ESTE EJEMPLO ADEMAS TE LO BUSCA POR TELEFONO, CODIGO O POR NOMBRE

SALUDOS
ESPERO RESPUESTA
  Respuesta:  Coco
Te aconsejaria que lo hagas con un get y un popup debajo, de tal forma que cuando vas escribiendo en el get, hagas un seek(alltrim()), de tal forma que mientras el usuario va escribiendo esto se va reflejando en el popup, para el get lo unico que tienes que hacer es una funcion.

saludos

Contestar 

    Pregunta:  1062 - HERRAMIENTA CASE
Autor:  Ignacio Luis Castillo
Quisiera saber si alguno de ustedes conoce alguna herrmaienta CASE que sea compatible con la forma de trabajar el Vfp 6.0. Es decir que pueda actualizar tablas (por ejemplo) desde la herrmienta y se refleje en la base de datos de Vfp.
Si esto no existe recomiendenme Herramientas case buenas, porque tengo que invertir y deseo comprar algo interesante.
Desde ya les agradezco
  Respuesta:  Guillermo Pazos
Existe una herramienta muy buena y es latinoamericana llamada Gnexus, busca info en la red por su nombre o contactame si necesitas otros datos
  Respuesta:  Marlon
Hay un software llamado "Microsoft Visual Modeler" que trabaja con Rational Rose que he leído que es muy respetable en esta cosas del modela relacional. Sobre esto baje un software que supuestamente traí una interface para trabajar con esto pero no me trabajo por más que trate. En todo caso según lo que leí es lo que necesitas. Esto es todo lo que te puedo decir, bueno al menos tienes el nombre del software pregunta en Microsoft ya que yo no llegue a eso y tal vez ellos te puedan ayudar.
Puedes encontrar el software beta del que te hablo en http://www.fpress.com/Fich2/bin/ficheros.idc?lArea=139 el archivo que tienes que bajar es el FOXVMWIZ.EXE lo descomprimes y sigues los pasos del README. Si tienes problemas, ni modo, como te dije yo no lo pude usar, más bien si lo logras usar me avisas.
Contestar 

    Pregunta:  1076 - PASAR DE VISUAL FOXPRO A FOXPRO
Autor:  Carlos Galindez
Saludos a todos.
Estoy programando en FoxPro For Windows y creé una pantalla (scx). La pantalla funcionaba bien por el momento.
Posteriormente, ´abrí´ esta misma pantalla pero en Visual FoxPro y lo compilé. Cuando traté de abrirla de nuevo en FoxPro para windows, me dice que ´no es una tabla dbf´. ¿Existe alguna forma de re-convertir la pantalla a FoxPro para Windows o debo crearla de nuevo?.
Les agradecería alguna sugerencia. Gracias.
  Respuesta:  Marlon
Cuando conviertes algún archivo de las versiones de Fox posteriores a las 3,5,6 el Visual Fox te pregunta si deseas hacer un respaldo, si le dijiste que si en hora buena ya que en el mismo directorio donde esta la pantalla hay un carpeta con los respaldos de lo que hubieses convertido y si no hiciste el respaldo, me parece que no hay marcha atrás. Pero hay una opcíon Visual Fox crea un archivo .spr de la pantalla el cual tiene todas las funciones que programates en la versión anterior de fox, así que lo único que debes de hacer es la interface gráfica de las pantallas y pega en el postpograma las funciones tuyas.

Cualquier duda me avisas

Saludos

Contestar 

    Pregunta:  1099 - DETERMINAR SI UNA TABLA ESTA SIENDO UTILIZADA
Autor:  Javier Amoros
PARA VISUAL FOXPRO 5.0 - ¿Como puedo saber ANTES de abrirla, si una tabla esta siendo usada por otro usuario?

Tengo una aplicacion en red, y una de las utilidades es REINDEXAR tablas, para ello, necesito tener acceso EXCLUSIVO sobre ellas, y mi idea es que si la tabla ya esta siendo usada, ignorarla y pasar a la siguiente, y al final del proceso, indicar que tablas no han podido ser reindexadas por estar en uso en alguna otra maquina / usuario.
Gracias de antemano.

  Respuesta:  eye2
Hola:
UNa manera simple de saber si la tabla está siendo utilizada por otro usuario sería usar las rutinas de control de errores. por ejemplo, si no me equivoco al intertar abrir con EXCLUSIVE tiene el número de error 1705. Proba con esto:
ON ERROR DO QueHacer WITH ERROR()
USE miTabla EXCLUSIVE
ON ERROR

PROCEDURE QueHacer
LPARAMETERS nro_error

?"Este el el nº de error al querer abrir con EXCL"+STR(nro_error)

RETURN

Cualquier duda escribime, y si encontras un método más eficiente, también comunicamelo.
chau ... eye
  Respuesta:  Jose Maria Arrabal
Tienes dos formas de controlarlo:

- Primera:
Gestionando un manejador de Errores. El error 1705 te indica que la tabla no está disponible para uso exclusivo.

nErrorenTabla=.f.
ON ERROR DO gestionError WITH Error()
USE Tabla EXCLUSIVE
IF !nErrorenTabla
REINDEX
ENDIF
ON ERROR

Proc GestionError
PARAM nError
IF nError=1705
nErrorenTabla=.t.
ENDIF
RETURN

- Segunda Forma
Tener una tabla auxiliar en la cual tengamos una referencia al nombre de la tabla y el numero de usuarios conectados a ella.

Espero que te sirva de ayuda.

  Respuesta:  Nora Chauca
Hola..!

Si deseas sabes si una tabla esa en uso puedes utilizar el comando Used(´xxxxx´), donde xxxxx es el nombre de la tabla si la respuesta es .T. es que esta en uso.

Bye,BYe

Contestar 

    Pregunta:  1101 - GUARDAR IMAGENES BMP EN FORMATO JPG
Autor:  Leonardo Ramirez
Estoy desarrollando en Visual Fox Ver 5.0 actualmente utilizo un control imagen para pegar archivos bmp´s y los almaceno en un campo de tipo general en una tabla. utilizo la siguiente instruccion para hacer lo ultimo append general from class paint.picture

El problema que tengo es que ahora mi control debe de poder contener imagenes de formato jpg, asi mismo esta imagen debo de pegarla en el campo general de mi tabla. Como lo estoy utilizando actualmente es con un list (files) muestro los archivos bmp, cuando selecciono uno con el mouse automaticamente se visualiza la imagen, quiero hacer esto mismo pero para archivos jpg.

He visto las respuestas anteriores a preguntas acerca de imagenes jpg, pero ni una de ellas satisface mis necesidades.
Leyendo la ayuda de visual dice que para ver las clases que podemos utilizar con el append general debemos de buscarlas en el regedit en oleclass, alguien sabe como puedo saber cuales son las clases ?

de antemano gracias

  Respuesta:  Coco
No te compiques mucho, solo abre tu tabla, abre el campo general, y con el menu del fox inserta tu imagen JPG, al insertarla veras con que aplicacion la maneja, de esta forma ya sabras como buscar en el regedit para ver los comandos ole.

Espero te ayude.

Saludos

Contestar 

    Pregunta:  1103 - ERROR AL CORRER UN EJECUTABLE
Autor:  Flurry
No puedo generar un *.exe en VFP 5.0 ni en 6.0;Espero que no me den respuestas triviales como: genera nuevamente tu proyecto y pon la opcion generar ejecutable.En realidad es más complicado por que me sale dos mensajes luego de genero el .EXE y lo corro que dicen:Visual Foxpro cannot star.Could not load resources.

Rogaría me respondan con celeridad por ser de importancia capital para mi aplicación.

  Respuesta:  Cacho
Debés crear un set de instalación de tu programa con el "asistente para instalar", y ejecutarlo por lo menos una vez en la máquina en la que corra tu programa, para que quede instalado el runtime de vfp.
  Respuesta:  Gerardo
Me imagino que tienes el visual Fox en español y ya leiste que necesitas el archivo vfp5**n.dll (para la versión 5) donde los asteriscos significan el idioma y tú tienes el vfp5esn.dll, y ya se lo pusiste, pero sigue sin funcionar.

pues si, pero trata de cambiarel nombre del archivos vfp5esn.dll por el nombre de vfp5enu.dll. correlo nuevamente y espero que ya funcione.

  Respuesta:  Flurry
Ademas de seguir los pasos que menciona Gerardo debes generar el ejecutable con un nombre distinto al del proyecto que lo genera.ejemplo: si el proyecto de llama demo.prj debes crear un ejecutable llamado demo10.exe.De lo contrario puede pasar que el ejecutable corra sólo la primera vez y luego de salir de este el sistema colapse como pasó en mi caso.Fue mi caso particular.
  Respuesta:  Carlos M. Taborda
Que tal amigo, para correr un ejecutable debes tener primero las librerias Vfp5enu.dll y Vfp500.dll, en el directorio o carpeta donde esta tu aplicacion.

si aun sigues teniendo problemas prueba a renombrar VFP5ESN.DLL POR VFP5ENU.DLL

ESTA SOLUCION ES PARA V.FOXPRO 5.0.

EN LA VERSION 6.0 TAMBIEN NECESITAS DOS LIBRERIAS PERO DE NOMBRES DIFERENTES.

Espero que te sirva la respuesta...y me mandes un e-mail confirmando o si tienes mas dudas.

Saludos desde colombia.

  Respuesta:  Nora Chauca
Hola...!

Ese problema es que le falta algunas librerias, no me acuerdo muy bien que librerias son pero si tienes el VFP en english copia todas la VFP5*.*.

Cualquier consulta me esribes.

Contestar 

    Pregunta:  1104 - BACKUP EN VFP 5.0
Autor:  Cristobal Alberto Melara
Deseo conocer como puedo respaldar bases de datos (o cualquier tipo de archivo) a un disco flexible u otro medio desde un programa en Visual Foxpro 5.0. utilizando algun compresor de archivos.

De antemano les agradezco su valiosa ayuda.

  Respuesta:  JULIO LOMANTO
mira yo hice una pequeña rutina que me ha servido para todos mis programas y no tengo problema de copiar las tablas y los index, ademas las aseguro para que nadie las modifique y asi poder mantener un nivel de seguridad. Primero: cuando instale el programa principal en su carpeta C: SIMVER, luego dentro de esta carpta cree otra llamada REGISTER en esta carpeta guardo las bases de datos .DBF y los archivos indices .CDX para seguridad de mi sistema, pero lo bueno es que le cambie la extension y asi nadie, "bueno hablando del cliente" me las puede molestas con excel, y les puse otra extension.

1. esta rutina esta en el evento INIT del formulario 
CLOSE TABLES all

PUBLIC ARRAY gaDatabase(100,100)

PUBLIC ARRAY ARRAYPROP(100,100)

PUBLIC ARRAY eRReYPRaP(100,100)

PUBLIC ARRAY cdxarray(100,100)

PUBLIC ARRAY raylmt(100,100)

ASD = ADIR(ARRayprop, '*.DBF')  

dsa	= ADIR(eRReYPRaP, ALLTRIM(THISFORM.ruta_y)+ ALLTRIM(THISFORM.archivo)+""+"*.BAK")

CXD = ADIR(cdxarray, "*.CDX")

lmt	= ADIR(raylmt,ALLTRIM(THISFORM.ruta_y)+ ALLTRIM(THISFORM.archivo)+""+"*.LMT")



SELECT 99

USE AUDITOR

THISFORM.ruta_y		=	auditor.ruta_y

THISFORM.archivo	=	auditor.archivo

THISFORM.mes_actual	=	auditor.mes_actual

USE

gnDbcnumber = ADIR(gaDatabase, ALLTRIM(THISFORM.ruta_y)+"simver10"+"*.DBF")


2.- esta rutina esta en el boton command que lo llame "iniciar", que es cuando cliente le da click para iniciar el proceso de copiar o restaurar copia de seguridad 
thisform.label1.Enabled 	= .T.

thisform.label3.Enabled 	= .T.

thisform.PORcentaje.Enabled = .T. 

thisform.PORcentaje.Visible = .T.

thisform.origen.Enabled 	= .t.

THISFORM.ORIgen.Visible 	= .T.

thisform.destino.Enabled 	= .t.

THISFORM.destino.Visible 	= .T.



SET CURSOR OFF

CLOSE DATABASES



DO CASE

  	CASE thisform.backup.Value = 1

		gnDbcnumber = ADIR(gaDatabase, '*.DBF')  

  	CASE thisform.backup.Value = 2

		gnDbcnumber	= ADIR(eRReYPRaP, ALLTRIM(THISFORM.ruta_y)+ ALLTRIM(THISFORM.archivo)+""+"*.BAK")

 	CASE thisform.backup.Value = 3

  	CASE thisform.backup.Value = 4

ENDCASE

FOR nCount = 1 TO gnDbcnumber  

   DO CASE

	   	CASE thisform.backup.Value = 1

		   THISFORM.v_base	= ALLTRIM((gaDatabase(nCount,1)))

	   		Thisform.BACKUps(THISFORM.v_base) 

	   		THISFORM.porcentajes(1)

	   	CASE thisform.backup.Value = 2

		   THISFORM.v_base	= ALLTRIM((eRReYPRaP(nCount,1)))

	   		gnPWZ	= ASCAN(eRReYPRaP, THISFORM.v_base ) 

			IF gnPWZ	!= 0

		   		Thisform.restore(THISFORM.v_base) 

		   		THISFORM.porcentajes(1)

			ENDIF

	   	CASE thisform.backup.Value = 3

	   	CASE thisform.backup.Value = 4

   ENDCASE

ENDFOR



THISFORM.porcentaje.Caption 	= "00 %"

thisform.label1.Enabled 		= .f.

thisform.label3.Enabled 		= .f.

thisform.PORcentaje.Enabled 	= .F.

thisform.PORcentaje.Visible 	= .F.

thisform.origen.Enabled 		= .F.

THISFORM.ORIgen.Visible 		= .F.

thisform.origen.Caption 	 	= "."

thisform.destino.Enabled 		= .t.

THISFORM.destino.Visible 		= .T.

thisform.destino.Caption 	 	= "."

thisform.num_porcentaje = 0



SET CURSOR ON

THISFORM.Refresh


3. luego cree un metodo mio llamado BACKUPS donde le puse esta rutina 
PARAMETERS pa_nombre

lago	=	LEN(pa_nombre)

CDX_ARC	=	ALLTRIM(THISFORM.ruta_y) + "simver10" + LEFT(pa_nombre, (lago - 4)) + ".CDX"

CDX_BUS	=	LEFT(pa_nombre, (lago - 4)) + ".CDX"

LMT_ARC	=	ALLTRIM(THISFORM.ruta_y)+ ALLTRIM(THISFORM.archivo)+"" + LEFT(pa_nombre, (lago - 4)) + ".LMT"

a_rign	=	ALLTRIM(THISFORM.ruta_y) + "simver10" + pa_nombre

a_norg	=	ALLTRIM(THISFORM.ruta_y)+ ALLTRIM(THISFORM.archivo)+"" + LEFT(pa_nombre, (lago - 4)) + ".BAK"

COPY FILE &a_rign 	TO &a_norg

zaPWZ	= ASCAN(cdxarray, CDX_BUS) 

IF zaPWZ	!= 0

	COPY FILE &CDX_ARC 	TO &LMT_ARC

ENDIF


4.- y el otro metodo mio llamado restore donde puse esta rutina restaurar copia 
PARAMETERS pa_nombre

lago	=	LEN(pa_nombre)

CDX_ARC	=	ALLTRIM(THISFORM.ruta_y) + "simver10" + LEFT(pa_nombre, (lago - 4)) + ".CDX"

CDX_BUS	=	LEFT(pa_nombre, (lago - 4)) + ".LMT"

LMT_ARC	=	ALLTRIM(THISFORM.ruta_y)+ ALLTRIM(THISFORM.archivo)+"" + LEFT(pa_nombre, (lago - 4)) + ".LMT"

a_rign	=	ALLTRIM(THISFORM.ruta_y) + "simver10" + LEFT(pa_nombre,lago - 4) +".DBF"

a_norg	=	ALLTRIM(THISFORM.ruta_y)+ ALLTRIM(THISFORM.archivo)+"" + LEFT(pa_nombre, (lago - 4)) + ".BAK"

COPY FILE &a_norg 	TO &a_rign 

azPWZ	= ASCAN(raylmt, CDX_BUS) 

IF azPWZ	!= 0

	COPY FILE &LMT_ARC 	TO &CDX_ARC

ENDIF


5. a parte de eso le puse una rutina que muestra los datos copiado y un contador numerico para que el cliente vea lo que pasa y llame a este metodo mio PORCENTAJE 
PARAMETERS valorllega

THISFORM.num_porcentaje	= 	THISFORM.num_porcentaje   + valorllega

num_xctaje				= 	THISFORM.num_porcentaje   

NOM_HOME				=	LEFT(THISFORM.v_base, LEN(THISFORM.v_base)- 4)

THISFORM.PORcentaje.Caption = 	ALLTRIM(STR(num_xctaje))+ " %" 



DO CASE

  	CASE thisform.backup.Value = 1

		THISFORM.origen.Caption 	=	ALLTRIM(THISFORM.ruta_y)+"simver10" + ALLTRIM(UPPER(thisform.v_base)) 

		thisform.destino.Caption 	= 	ALLTRIM(THISFORM.ruta_y)+ ALLTRIM(THISFORM.archivo)+"" + NOM_HOME + ".BAK" 

  	CASE thisform.backup.Value = 2

		THISFORM.origen.Caption 	=	ALLTRIM(THISFORM.ruta_y)+ ALLTRIM(THISFORM.archivo)+"" + NOM_HOME + ".BAK" 

		thisform.destino.Caption 	= 	ALLTRIM(THISFORM.ruta_y)+"simver10" +  NOM_HOME + ".DBF"  

 	CASE thisform.backup.Value = 3

  	CASE thisform.backup.Value = 4

ENDCASE



WAIT WINDOWS "" TIMEOUT 0.001


6.- Luego cree un entorno donde le puse al formulario los siguientes elementos

option group donde el cliente puede seleccionar si copia o restaura
labels, para mostrar los datos origen de copiado y los datos destino de copiado
otro label que contiene los numero asi "23%" que es el que va aumentando como un contador
y el resto es imaginacion.

y me ha servido pero que te sirva
  Respuesta:  jose jaimes
Mira Copia esto en un boton de Comando y listo
thisform.l13.visible = .t. es una imagen para animacion la cual tiene que ver con las tablas del sistema OK suerte...

mi_unidad = sys(5)+ sys(2003)

set exclusive on
respuesta=messagebox("¿ Desea efectuar el respaldo de la información manejada por el sistema ?",4+32,"Respaldar...")
if respuesta = 6
do while .t.
if diskspace ("A") = -1
res=messagebox("La unidad no esta preparada, Por favor verifique e intente de nuevo",4+64,"Error")
if res = 6
loop
else
thisform.release()
return .f.
endif
else
set defa to a:
wait window "Status: unidad preparada..." Nowait
exit
endif
enddo

if diskspace() < 160
messagebox("Seleccione un disco limpio para realizar el respaldo e intente de nuevo",0+64,"Inserte otro disco....")
set defa to &mi_unidad
else
set safety off
set defa to &mi_unidad

copy file CLIENTES.DBF to a:\
thisform.l1.visible = .t.

copy file PELICULAS.DBF to a:\
thisform.l2.visible = .t.

copy file PROVEEDOR.DBF to a:\
thisform.l3.visible = .t.

copy file ALQUILER.DBF to a:\
thisform.l4.visible = .t.

copy file ALQUILER2.DBF to a:\
thisform.l5.visible = .t.

copy file COMPRAS.DBF to a:\
thisform.l6.visible = .t.

copy file COMPRA2.DBF to a:\
thisform.l7.visible = .t.

copy file Contar.DBF to a:\
thisform.l8.visible = .t.

copy file cARLOS.DBF to a:\
thisform.l9.visible = .t.

copy file HORAS1.DBF to a:\
thisform.l10.visible = .t.

copy file PEDIDOS.DBF to a:\
thisform.l11.visible = .t.

copy file PEDIDO2.DBF to a:\
thisform.l12.visible = .t.

copy file EQUIPOS.DBF to a:\
thisform.l13.visible = .t.

messagebox("El respaldo fue realizado con éxito...",0+64,"AXL_JOSE@HOTMAIL:COM")
endif

else
thisform.release()
endif

thisform.release()
  Respuesta:  GERMAN A. MORALES L.
SI SABES HACER USO DE LOS COMANDOS DOS, CON VFP PUEDES REALIZAR LAS COPIAS DE TUS BASES LA VECES QUE LAS NECESITES ESPERO TE SIRVA ESTE EJEMPLO:

IF (respuesta=6) THEN
run copy e:\ok\tablas\*.dbf a: &&\temporales\backup\.
run copy e:\ok\tablas\*.cdx a: &&\temporales\backup\.
ENDIF
  Respuesta:  Coco
Usa el Winzip Command line Support Add-on
con este programa puedes lograr lo que necesitas, la direccion URL es :
http://www.winzip.com/wzcline.htm

Espero te ayude
Saludos

  Respuesta:  Cristóbal Melara
En mi búsqueda por algo mejor me encontré la siguiente dirección:

www.greeneclipsesoftware.com

Aquí encontré unos controles activex (eclipse cabinet)que te hacen la tarea más fácil y puedes programar los cambios. Lo mejor es que los archivos son freeware.
Te invito a que la visites y espero que te sirva de alguna ayuda la información que ahí se encuentra.

Contestar 

    Pregunta:  1107 - CREACION Y AJUSTE DEL MENU EN FOXPRO 2.6 PARA WINDOWS
Autor:  Ramon Fredy Quebrada
Cordial Saludo.
A quien me pueda colaborar requiero una explicacion de como hago para habilitar un menu creado con el asistente para menus, como lo ejecuto, para enlazar las aplicaciones. gracias.
  Respuesta:  Coco
Hola, existen 2 formas, la primera es que en cada opcion del menu que has creado con el create menu, le pongas "command" y al costado el nombre del programa que vas a ejecutar por ejemplo: do myprograma01.prg.

La otra forma es que lo modifiques a nivel de codigo, (estando en la pantalla de creacion de menus, escojas la opcion compilar, este te creara un *.mpr con todas las definiciones en codigo de tu programa), luego pone modi comm menu.mpr y en cada definicion de popup pongas el programa que se ejecuta, por ejemplo

define popup pop_01 relative margin
define bar 1 of pop_01 prompt "\define bar 2 of pop_01 prompt "\define bar 3 of pop_01 prompt "\on selec bar 1 of pop_01 do programa01.prg
on selec bar 2 of pop_01 do programa02.prg
on selec bar 3 of pop_01 do programa03.prg
y listo.

simplemente ejecutas el programa con: do menu.mpr o si gustas lo puedes renombrar a menu.prg.

espero te sirva

saludos

Contestar 

    Pregunta:  1108 - BOTON IMPRIMIR EN UN REPORT FORM POR PANTALLA
Autor:  Fernando Ramos
Cuando yo creo un reporte con REPORT FORM puede realizar la salida ya sea por pantalla y por impresora, cuando hago la salida por pantalla me muestra la vista preliminar del informe, quisiera saber si es posible de alguna manera que entre las opciones que me da la vista preliminar SE PUEDA INCLUIR UN BOTON DE IMPRIMIR, para que el usuario no tenga que salir y volver a escoger las opciones del listado.
Existe alguna manera de hacer esto?
Agradeciendoles de antemano vuestra valiosa ayuda .....
  Respuesta:  Tomas Alberto Amarilla
Como la mayoria te ha dicho, depende de la vesion del Visual Fox que estas utilizando.
Hay manera de crear tu propia barra de herramientas que incluya el boton imprimir y que aparezca cuando la salida sea por pantalla.
Si desea que te envie un ejemplo de como hacerlo enviame un e-mail
  Respuesta:  David Amador Tapia
Bueno..te comento dependiendo la versión de Visula Fox pro que estes utilizando este mismo te da una barra de herramientas en la cual puedes mandar a imprimir, ir a una pagina determinada o salir, entre otras cosas pero prueba con el siguiente código a ver si te funciona...DEFINE

WINDOW salida FROM 0,0 TO 40,80 TITLE ´Vista Preliminar´ CLOSE noFLOAT zoom GROW system report form nombredelreporte preview WINDOW salida

en este creas una ventana para ver tu reporte y le das algunas propiedades luego le das el coamndo para imprimir por pantalla pero en la ventana que creaste...

Prueba y cuentame.

  Respuesta:  Eye
Holasssamigo:
Lo primero que quiero preguntarte es que version de fox utilizas, porque si estas usando cualquiera de los Visual Fox, en la presentación preliminar te debería aparecer un toolbar con los botonos para avanzar y retroceder las páginas, para buscar una página en espacial, un botón para salir de la presentación preliminar, y el famoso botón de imprimir el informe (tiene un ícono de impresora).
Lo que puede suceder es que hayas deshabilitado la barra de herramientas de la vista previa mediante código en tu programa. Deberías empezar por aquí a buscar la solución.
Espero haber sido de ayuda, cualquier cosa comunicame lo sucedido.
  Respuesta:  Marlon
Me parece que no trabajas en Visual Fox, así que la respuesta no es muy buena, no existe forma de ponerle el botón, a menos que lo programes a muy bajo nivel, etc. Yo lo que te propongo es una alternativa, por que no creas una entrada en el menú de la aplicación que le permita imprimir, o creas un menú nuevo y lo disparás antes del Report Form y cuando regresas restauras el anterior. Espero que te sirva.
  Respuesta:  Coco
Hola, esto es muy sencillo, lo unico que tienes que hacer es habilitar la barra de impresion de la vista preliminar, esta te incluye botones de avanzar/retroceder pagina, ir a una pagina, imprimir, y salir de la vista preliminar, esto te debe funcionar en Visual Foxpro 3.0 para adelante.

Si no te sale, trata de forzarla con lo siguiente :

Show Window "Vista preliminar" una vez que haz lanzado el preview com:

report form nocon noejec preview

Saludos

Contestar 

    Pregunta:  1118 - INCOMPATIBILIDAD CON ALGUNAS DLL´S
Autor:  Juan Luis
Me gustaría si es posible me ayudarais a saber si el Visual Fox tiene algú tipo de incompatibilidad con algunas Dll´s. Necesito abrir una en concreto que he conseguido abrir sin ningún problema con Visual Basic y Visual Delphi, mientras que en V..Fox me es imposible. Con el examinador de clases veo la librería y las funciones que contiene y no logro llegar al contenido. ¿Es posible que pueda con el Visual Studio?. Con Visual Delphi logro abrir la Dll y ver código con ActiveX 2.0 ¿Es posible algo parecido con V.Fox?
¿No trata de la misma manera las Dll´s Fox que los otros programas de Microsoft?
Os agradezco de antemano la ayuda, pués me urge saber algo! Saludos
  Respuesta:  Coco
No se exactamente que quieres hacer, si quieres desmembrar un DLL, te recomiendo las utilidades que vienen con visual studio, o leer el SDK de microsoft windows, si lo que quieres es usar una DLL para emplear sus funciones, te pongo un ejemplo:
DECLARE INTEGER GetActiveWindow IN win32api
WAIT WINDOW "Ahora puede cambiar a otra aplicación" TIMEOUT 5
? GetActiveWindow( )
con esto por ejemplo controlas cual es la aplicacion activa, pero tienes que conocer las funciones y los parametros que debes pasarle.

Saludos

Contestar 

|<  <<  8 9 10 11 12 13 14 15 16 17 18  >>  >|