PREGUNTAS CONTESTADAS - FoxPro/Visual FoxPro

Hay un total de 1456 Preguntas.

<< >>

Pregunta:	37366 - BLOQUEAR CTRL+ALT+SUP EN WINDOWS XP
Autor:	Miguel Angel Aldana Ramos
Saludos, estoy realizando un programa en el que necesito bloquear ctr+alt+sup y alt+tab, lo estuve haciendo con windows 98 y la función SystemParametersInfo, pero no puedo hacerlo con windows xp, si pudieran ayudarme se los agradecería

Respuesta:

Walter John Claros Lozano

Miguel Angel: Te envío la información que encontre al respecto; y te cuento que me funciono muy bien; en w2000 y xp hay que modificar el registro para bloquear "task manager" que es el problema que tenemos si un usuario quiere matar la tarea.

Saludos

Walter John; anexo lo anunciado.

Luis Tarzia" escribió:

> logre ocultar la aplicacion de CTRLALTDEL con RegisterServiceProcess
> pero esto no funciona en xp,existira alguna api que haga lo mismo en
> xp y 2000 ???

Hola, Luis:

Que yo sepa, la función «RegisterServiceProcess» no está soportada por los
sistemas operativos basados en NT, y creo que no hay una función equivalente
para Windows 2000/XP.

> Solo con app.taskvisible la saca de la lista de aplicaciones pero se ve en
> la lista de procesos.

En Windows XP, y debido a motivos de seguridad, no hay posibilidad de evitar
que el usuario pulse la "famosa" combinación de teclas ctrl+alt+del.

Lo que sí puedes hacer es deshabilitar el botón «Administrador de tareas»
del cuadro de diálogo «Seguridad de Windows». Para ello deberás acceder al
registro y crear la siguiente clave:

HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System

Una vez creada la clave, crea en ella un valor DWORD llamado
«DisableTaskMgr» y establece a 1 su valor. Cuando quieras habilitar de nueva
dicho botón, cambia el valor por un 0.

Un saludo, y ¡Feliz Navidad!

--
Enrique Martínez
[MS MVP - VB]

Nota informativa: La información contenida en este mensaje, así como el
código fuente incluido en el mismo, se proporciona «COMO ESTÁ», sin
garantías de ninguna clase, y no otorga derecho alguno. Usted asume
cualquier riesgo al poner en práctica, utilizar o ejecutar lo recomendado o
sugerido en el presente mensaje.

Fijate la clase registry.vcx, la podes ver con el galeria de componentes
/ catalogo visual foxpro / Foundation Classes / Utilities / Registry
Access
(disculpa el la mezcla de idiomas)

Allí esta lo que necesitas... pruebalo
WScr=CreateObject("WSCript.Shell")
wscr.RegWrite("HKEY_USERS\.DEFAULT\Software\Microsoft\Windows\CurrentVersio¬n
\Internet
Settings\GlobalUserOffline", "0")
--
David Amador Tapia
Webmaster de "La Web de Davphantom"
www.davphantom.cjb.net
Cartagena. Colombia
Tel (5) 6621502 - 6581523
"Ivan Arnold" [email protected]> escribió en el mensaje
news:[email protected]...
> Hola a todos,
> Necesito sencillamente modificar el valor de clave GlobalUserOffline que
se
> encuentra en el registro en una cadena de la forma
> [HKEY_USERS\.DEFAULT\Software\Microsoft\Windows\CurrentVersion\Internet
> Settings]
> Tengo que establecer el valor en 0 y quiero hacerlo mediante codigo en
> Visual FoxPro, supongo que existe alguna API o funcion de FoxPro que me
> permita cambiar ese valor, por favor, si puede alguien describirme como
> hacerlo, o pasarme alguna direccion web donde haya algun ejemplo de como
> hacer esto en fox, le voy a estar eternamente agradecido.
> Desde ya muchas gracias por leer esto.
Otra forma es usar la clase registry,vcx que viene con Visual FoxPro
Fijate en el Component Galley que viene con ejemplos
DO (_gallery)

wscr=CreateObject("WSCript.Shell")
Ejemplo:
***********
-RegR=wscr.RegRead("HKEY_Current_User\Software\Microsoft\Windows Scripting
Host\SettingsTimeOut",0,"REG_DWord"
-RegR=wscr.RegRead ("HKEY_Current_User\Software\Microsoft\Windows Scripting
Host\Settings\TimeOut")
***********
-Otras Funciones
wscr.RegRead()
wscr.RegWrite()
wscr.RegCreate()
wscr.RegGet()
--
Saludos...
RGRLeo - Roger Leonardo
El Salvador, c.a.

Respuesta:

Jose Rolando Quintero Paz

Ahi van esos codigos, espero que te sirvan si es asi, cuentame, ok?

Declare Integer SystemParametersInfo ;
In user32 As SystemParametersInfo ;
Integer uAction , ;
Integer uParam ,;
String lpvParam ,;
Integer fuWinIni

* Bloquear el Boton Inicio, Crtl + Tab y Ctrl + Alt + Supr
=SystemParametersInfo( 97, 1, 0, 0)

wait windows \"botones crtl+tab y ctrl+alt+supr bloqueados\" timeout 3

* desbloquear
=SystemParametersInfo( 97, 0, 0, 0)
wait windows \"botones desbloqueados\"

Contestar

Pregunta:	37542 - INSTALADOR DE ODBC PARA FOXPRO
Autor:	MIGUEL MERCANDINO
Molesto por lo siguiente, tube problemas con la pc que contenia el programa que hace mucho tiempo creara un implementador para sacar las comisiones de los vendedores de mi empresa . Cuenrto que la placa madre de la pc que contenia este programa no me responde mas y lo unico que pude salvar de dicha pc fue el rigido, pregunta: instale el disco de esa pc en mi pc como slave y trate de ejecutar el programa desde el slave (en mi pc tengo win 98 con oficce 2000, el disco tiene win 95 con office 97 ) pero cuando ejecuto el programa de comisiones desde la planilla de excel luego de haber corrido la aplicacion (correctamente) que se creara en DOS me tira el siguiente error: No se admite el controlador Microsoft FoxPro que se ha sustituido por el controlador Microsoft Visual FoxPro , luego de este mensaje no me deja hacer nada mas. Alguna idea de algun tipo de solucion para poder seguir utilizando este programa sin tener que recurrir a a un implementador para modificar dicha aplicacion

Respuesta:

Geovanny

Deberás cerciorarte que formato (versión) de archivo DBF tenias en el programa anterior para que puedas nuevamente configurar el ODBD adecuadamente.

También deberias probar con accesar a las tablas directamente con "USE NombreTabla in 0" (solo en Visual FoxPro 5) sin necesidad de accesar mediante una conexión ODBC. Esto si la aplicación se encuentra en la misma máquina, es decir local. Pero si utilizas un servidor de Archivos y tienes permisos a la carpeta donde están alocados los datos, puede tambien acceder a los datos usando el comando USE de la siquiente manera:
"\\EquipoHost\carpetaDatos\NombreTabla in 0"

Contestar

Pregunta:	37588 - ERROR DE INSTALACION 280. OBJETO 9.
Autor:	Tolo Pascual Ripoll
Hola foxeros, vereis mi problema es que tengo algunos proyectos creados y que una vez generados los ficheros de instalacion del programa mediante el asistente que lleva el Fox 5.0, al intentar instalar el programa en cualquier ordenador me da el error siguiente: Error de Instalacion 280. Objeto 9. Los archivos de instalacion pueden estar dañados.Intente reiniciar la instalacion. El error sale despues de darle al boton grande de inicio de la instalacion. Lo raro es que me paso con algunos programas y con otros no. Si sabeis donde esta la respuesta me hareis un gran favor.

Respuesta:

fernan carrera

Hola amigo

Tu problema esta en la ubicación de los archivos que hacen parte del proyecto (Las clases, los formularios, la base de datos, las tablas, los reportes, etc.). Debes estar llamando alguno de estos objetos en algun formulario o informe y estan ubicados en otra carpeta que no es en la que estas trabajando el proyecto y lo más seguro es que ese objeto llamado NO EXISTE en esa carpeta o la carpeta ya la eliminaste . Debes revisar todos los objetos de tu proyecto y el entorno de datos y fijarte en propiedades la ruta de donde llama a ese objeto.

Contestar

Pregunta:	37726 - FUENTES COMPRIMIDAS EN FOX DOS
Autor:	Joaquin Noriega
Hola a Todos. Una vez mas recurro a ustedes. Vi un sistema desarrollado en FoxPro 2.5 DOS. Una pantalla que teneia caracteres comprimidos, en ella entraban mas filas y columnas. Como se logra estos. Si es posible, me seria de una utilidad increible en mis aplicaciones. Gracias.

Respuesta:	Gerardo Camacho
No se si te sirva esto, pero la función: sys device to vga50 te aumenta el número de lineas y columnas pero solo de 25 a 50 lineas. Espero te sea de utilidad para regresar a lo normal pon sys device to vga25, creo que también hay ecg43, mono entre otras. saludos de Mx

Contestar

Pregunta:	37745 - EXPORTAR UNA TABLA DE VISUAL FOXPRO A EXCEL POR MEDIO DE PRO
Autor:	Roberto Carlos Ruiz Pérez
Hola, a todos y de antemano agradesere se sirvan a formular la respuesta. La pregunta es la siguiente: Como puedo realizar la exportación de una Tabla de Visual FoxPro a Microsoft Excel pero por medio de programación.. saludos

Respuesta:	Ricardo Soto
Seleccionas la base de datos que quieres exportar y eliges el siguiente comando: Copy all TO "MILIBRO" TYPE XLS, donde mi libro es el nombre del archivo a copiar. Espero te sirva

Respuesta:	Mario Cerón
Copy to ( archivo ) type xls

Contestar

Pregunta:	38031 - PROBLEMA PARA SELECC.PRINTER EN FOXPRO PARA DOS
Autor:	Luis Cruzado
Queridos amigos : Por favor ayudenme con lo siguiente : tengo un sistema desarrollado en Foxpro para Dos 2.6, que corre bien en cualquier Windows pero siempre con impresora matricial. El problema es que este programa tengo que instalarlo en diferentes tipos de printers y en el programa no se como configurar para que acepte cualquier impresora sin tener que estar yendo yo a instalarlo. He tenido la oportunidad de tener muchos problemas tales como los caracteres de negrita o subrayado de las matriciales no son las mismas que las inyection o lasers, o cuando otras printers tienen diferentes drivers como puerto de salida (por ejemplo las impresoras que tienen Fax incorporado), etc. Por favor indiquenme que hacer para configurar cualquier printer en Foxpro para Dos, se que todo eso se soluciona en Visual Foxpro pero hasta que lo migre, me va tomar mucho tiempo. Gracias de antemano

Respuesta:

Jacobo Prudot

Saludos Luis.

En foxpro, yo defino la impresorra dentro del reporte (report); defino tantas impresoras como desee y a cada una le doy un nombre.

Al momento de imprimir, se usa PDSETUP y como variable indicas la impresora que desees.

Mi problema es en Visual Foxpro, porque para el caso, yo tenia un reporte para imprimir cheques y en cada empresa cliente o a veces el mismo cliente, usan cheques de dimensiones distintas. En foxpro yo no tenia problema, porque desde dentro de mi programa yo podia elegir un formulario o una impresora por su nombre (debe estar guardada en el resource file) y eso ya no lo puedo hacer desde adentro sino que la impresora de windos es la que manda.

Contestar

Pregunta:	38193 - INSERTAR UN ARCHIVO JPG EN UN CAMPO GENERAL DE FOXPRO
Autor:	Gustavo Chavez
Hola, tengo un problema cuando inserto un archivo con extencion jpg en un campo general , solo me presenta el nombre del archivo y no el contenido, ademas al momento de reportear los datos el reporte me presenta tambien el nombre del archivo jpg que es una fotografia. Nota: Cuando uso archivos BMP entonces asi si quda bien Gracias anticipadas

Respuesta:	LUIS BARRANTES
UN SANTO. CUANDO INGRESAS LAS IMAGENES EN UNA TABLA, ESTA ESTARA AUMENTANDO EL TABLA POR EL TAMANO DE LA IMAGEN CREA UN CAMPO CON LA DIRECCION DE LA IMAGEN Y LA PONES DE ESTA FORMA THISOFORM .IMAGEN.PICTURE = TABLA.FOTO ESTOS EL MAS RECOMENDABLE PARA EL MANEJO DE FOTOS JPG,GIF,BMP

Contestar

Pregunta:	38366 - JUSTIFICAR TEXTO DE WORD VIA PROGRAMA DE VFP 6
Autor:	Ricardo Andres Hinostroza Levano
Hola es la primera vez que consulta deseo sabe como justificar un parrafo u Hoja entera de Word por medio de un Programa de VFP , bueno he creado un PRG que me Crea un Documento en el cual se muestran datos en variables , ademas de cambiarle la Fuente he podido cambiar el Tamaño de la Fuente ademas de Agrrgarle el Efecto de Negrita al texto , pero deseo saber como Justificarlo Automaticamente

Respuesta:

Cecilia Colalongo

* Word y Excel pueden tratarse como dos objetos COM, las clases de ambos son:
        Word.Application

        Excel.Application
        Esto es:
                o=CreateObject("Word.Application")

                o=CreateObject("Excel.Application")
* Algunos comandos de Word:
                o.Documents.Add() && Agrega un nuevo documento.
                o.Visible=.T. && Muestra la aplicación.
                o.Quit && Cierra la aplicación.
Los dos últimos corren tanto para Word como para Excel.
* La mejor forma de conocer todos los comandos es grabando macros y luego convirtiendo el código
de las mismas (queda en Visual Basic) a VFP, por ejemplo una de Word (Herramientas -> Macros ->
Grabar nueva macro) y luego ves el código (ALT+F11)
        Sub Macro2()
            Documents.Add

            NewTemplate:=False, DocumentType:=0
            Selection.TypeText Text:="Esta es una prueba con Word."
            Selection.TypeParagraph
        End Sub
El cambio para Visual Fox sería:
        #DEFINE True .T.
        #DEFINE False .F.
        WITH o
                .Documents.Add()
                .NewTemplate=False
                .DocumentType=0
                .Selection.TypeText("Esta es una prueba con Word.")
                .Selection.TypeParagraph
        ENDWITH
* En este ejemplo sencillo no se ve el problema principal que son todas las constantes que
usan Word y Excel en estas macros. Estos archivos son msword9.olb y excel9.olb (en el
caso de Office 2000 o msword8.olb y excel8.olb en el caso de Office 97), estos archivos
de tipos los puede interpretar Visual Basic pero no VFP, para poder convertir estos
archivos a .h (que sí lo reconoce VFP) tenés que hacer lo siguiente:
1. En el Visual Studio 6 (creo que en el 5 también) viene una utilidad que se llama:
     OLE View, dentro de el entrás a File -> View TypeLib y elegís el archivo .olb que
     quieras (por lo general están siempre en ...\Microsoft Office\Office) ahí lo vas a
     ver en el panel de la derecha lo que tenés que hacer es seleccionar todo ese texto
     y copiarlo en un nuevo archivo de texto.
2. Una vez que tenés ese archivo tenés que correrle este programa que te crea un .h
     (o lo que vos le indiques) con la sintaxis de VFP: #DEFINE ...
     El código es:
LPARAMETERS tcArchivoEntrada, tcArchivoSalida
LOCAL lnArchivoEntrada, lnArchivoSalida, lxTexto, lxTextoSalida, llSalida
IF PCOUNT()=0 OR !FILE(tcArchivoEntrada)
        MESSAGEBOX("Debe indicar el nombre del archivo",16,"¡Atención!")
        RETURN
ENDIF
IF PCOUNT()=1
        lnPoscPunto=RAT(".",tcArchivoEntrada)
        tcArchivoSalida=LEFT(tcArchivoEntrada, lnPoscPunto - 1)+".h"
ENDIF
CLOSE ALL
lnArchivoEntrada=FOPEN(tcArchivoEntrada)
lnArchivoSalida=FCREATE(tcArchivoSalida)
lxTexto=""
lxTextoSalida=""
llSalida=.F.
DO WHILE !FEOF(lnArchivoEntrada)
        lxTexto=FGETS(lnArchivoEntrada)

        IF "}" $ lxTexto
                llSalida=.F.
        ENDIF

        IF llSalida
                lxTextoSalida = ALLTRIM(lxTexto)
                lxTextoSalida = STRTRAN(lxTextoSalida,"="," ")
                lxTextoSalida = "#DEFINE "+ALLTRIM(lxTextoSalida)

                IF RIGHT(lxTextoSalida,1)=","
                        lxTextoSalida = SUBSTR(lxTextoSalida,1,LEN(lxTextoSalida)-1)
                ENDIF

                =FPUTS(lnArchivoSalida,ALLTRIM(lxTextoSalida))
        ENDIF

        IF "ENUM {" $ UPPER(lxTexto)
                llSalida = .T.
        ENDIF

ENDDO
CLOSE ALL

Contestar

Pregunta:	38380 - CREAR INFORME EN FORMATO HTML
Autor:	jorge hernandez
hice un programa en fox pro 2.6 para windows, es un programa para un laboratorio ambiental. de el imprimo reportes (informes) que mando imprimir directamente a la impresora, ahora el laboratorio tiene la necesidad de enviar los reportes por internet, mi pregunta es si de alguna manera puedo convertir el informe a un formato X para que se vea tal como se imprime y como lo puedo mandar por internet. la conexion por internet es via telefonica. de antemano les agradezco todos sus comentarios.

Respuesta:	Foxito
La mejor forma es escribiendo en un archivo de texto con extensión HTML. Usa los comandos de escritura en archivo. Luego lo puedes anexar a cualquier mail y lo envias por Internet.

Contestar

Pregunta:	38393 - IMPRESORA FISCAL HASAR
Autor:	Alf
Me pueden ayudar con el siguiente problema o al menos sugerirme donde puedo buscar algo mas de ayuda ? La aplicación esta desarrollada en Fox Pro 2.6 Windows y para comunicarme con Winfis16.dll utilizo los comandos del Foxtools regfn y callfn, el problema es que un programa ejemplo que trae la documentacion de Asar imprime un ticket bien pero si programo en base a ese ejemplo una funcion dentro de un proyecto que tiene el modulo de generacion e impreion de tickets me sale el siguiente error, Data Type Mismatch y no se carga ningun valor en handler la linea es la siguiente : && Apertura del puerto Handler = callfn (pOpenComFiscal, 1, 1) && COM1, ANSI Mientras se declaran las funciones no se genera ningun error y creo que el error no esta en el foxpro pero no tengo forma de saber cual es el problema. Otro dato que puede ser util es que trabajo en el modo BusyWaitingMode por defecto “0”. En resumen si ejecuto desde la ventanita del command de foxpro un ejemplo igual que el que esta escrito aquí pero sin variables solo datos de ejemplo, anda todo bien, pero si meto esa funcion en un proyecto dentro de un programa en particular con variables, arreglos, etc. me sale este error. La funcion completa es la siguiente WAIT WIND NOWA "Imprimiendo ticket fiscal ..." SET LIBRARY TO "foxtools.fll" ADDITIVE pOpenComFiscal = regfn("OpenComFiscal", "II", "I", "WINFIS16.DLL") pCloseComFiscal = regfn("CloseComFiscal", "I", "", "WINFIS16.DLL") pMandaPaqueteFiscal = regfn("MandaPaqueteFiscal", "I@C","I","WINFIS16.DLL") pUltimaRespuesta = regfn("UltimaRespuesta", "I@C", "I", "WINFIS16.DLL") pUltimoStatus = regfn("UltimoStatus", "I@I@I%2

Respuesta:	Romano Gustavo
Yo realize un programa de facturacion para un hotel donde utilize una hasar f320 laser y para la imprecion y comunicacion utilize el OCX que te da la empresa HASAR lo colocas en el programa y utiliza todas sus funciones, espero que te sirva y cualquier pregunta estoy a tu disposicion. Tambien hasar en el servicio tecnico te suele ayudar.

Contestar

|< << 95 96 97 98 99 100 101 102 103 104 105 >> >|