FiveTech Software tech support forums

Hola, para seleccionar una hoja en un objeto Excel, el siguiente código funciona bien: choja := "Prueba" oexcel := CreateObject("Excel.Application") oexcel:ActiveWorkBook:Sheets(choja):Select() Sin embargo: choja := "Prueba(2)" oexcel := CreateObject("Excel.Applica...

Por si alguien está interesado, después de repasar todo un poco ha quedado así: oexcelsolver := CreateObject( "Excel.Application" ) oexcelsolver:WorkBooks:Open(clibro) sysrefresh() SetWinLonA(oexcelsolver:hWnd,-16,"L") //Es la función API SetWindowLongA, en este caso quita la bar...

Yo uso PDFCreator modificando los valores en el registro antes del TPrinter: oreg := treg32():New(HKEY_CURRENT_USER,"Software\PDFCreator\Program",.f.) oreg:set('AutosaveFilename','Acuse_Pedido_'+trimstr(nencargo)+'.PDF') oreg:set('AutosaveDirectory', aconfig[2]) //aconfig[2] es el director...

Pues nada, ya lo he solucionado: oexcelsolver :=CreateObject( "Excel.Application" ) oexcelsolver:Workbooks:Open(clibro) sysrefresh() oexcelsolver:Visible(.t.) hWndexcel := FindWindow(0,"Microsoft Excel - "+cfilenopath(clibro)) SetParent(hwndexcel,oWnd:hWnd) Con CreateOleObject(&q...

Hola, a ver si alguien me puede ayudar. Estoy haciendo una aplicación que necesita tener un control exaustivo sobre excel. Cosas como quitar parte de los menús de Excel, añadirles otros nuevos, cargarle un fichero xla con multitud de funciones escritas en VB, etc. Mi aplicación se encarga de todo lo...

Bueno, gracias a todos, ya lo he solucionado. El problema en si no era la ejecución de programas sino los dialogos. A medida que iba ejecutando procesos y para saber por donde iba mostraba unos MsgRun y otros dialogos que eran los que realmente me dejaban paralizado el programa cuando el salvapantal...

Hola, si también lo he intentado, incluso con un RUN fichero.bat (por desesperacion), pero pasa lo mismo.

El problema parece ser que con el salvapantallas todas las ordenes de ejecución de otros programas, o los msgwait(), se quedan pendientes a que se quite el salvapantallas.

Hola a todos. Tengo una aplicación (aplicación 1), que en un proceso nocturno y desatendido, tiene que ejecutar otra (aplicación 2) para hacer unos procesos de mantenimiento. Mi problema es que ambas aplicaciones están en el servidor y en la misma carpeta y este normalmente está con el salvapantalla...

Gracias Cesar.

Saludos

Mirando un poco mas he visto este comportamiento: Cuando el fondo es un Brush: Pj. en \SAMPLES\FWBROW.PRG Si paso por encima la ventana de otra aplicación no ocurre... siempre que se tenga un solo monitor. En mi caso tengo tres monitores y cuando la aplicación FW esta maximizada ocupa uno de ellos, ...

Hola a todos. En algunas aplicaciones tengo un fondo de ventana con un brush: DEFINE BRUSH oBrush RESOURCE 'fondo' DEFINE WINDOW oWnd FROM 0, 0 TO 24, 79 BRUSH oBrush; ACTIVATE WINDOW oWnd Y en otras un degradado: ACTIVATE WINDOW ON PAINT fillwnd(oWnd,ncolor1,ncolor2) Lo mismo para los dialogos. El ...

Hola a todos.

¿ Como puedo imprimir un documento de dos hojas a doble cara en una impresora de doble cara ?

si hago:

PRINT oPrint ...
PrnDuplex(2) // o PrnDuplex(3)

PAGE
...
ENDPAGE
PAGE
....
ENDPAGE
ENDPRINT

Me sale solo por una. Es una impresora Dell.

Saludos

Si parece haber un problema con la longitud de la variable en los GET MULTILINE cuando el dialogo se declara directamente desde código, esto da el error que comentas: FUNCTION OBSERVAC(NC) LOCAL ANT:=NC NC := REPLICATE('p',1763) //Para no tomarlo del campo memo DEFINE DIALOG FINESTRA2 FROM 1,1 TO 20...

Yo cumplo 50 dentro de unos días. Comenze a programar en ensamblador, luego en dBase III y después en clipper cuando salió (creo que era la versión Autum 86). Utilizo Fivewin desde las primeras versiones, incluso ya "conocía" a Antonio antes de ello, cuando sacó la librería FivePro y nos m...

Hola, yo utilizo las siguientes funciones para crear y manipular los ficheros con nombres largos: DLL32 FUNCTION FCreate32( lpPathName AS STRING, iAttribute AS LONG ) AS LONG PASCAL FROM "_lcreat" LIB "KERNEL32" DLL32 FUNCTION FWrite32( hFile AS LONG, lpBuffer AS STRING, wBytes A...