FiveTech Software tech support forums

... 0, "Finder 1.0") IF hWnd != 0 ShowWindow( hWnd, 1 ) MsgAlert("Ya esta corriendo la aplicacion","Advertencia") QUIT ENDIF PRINTER oPrn to "CFDPRINTER" DEFINE WINDOW oWnd FROM 1, 1 TO 10, 30 ; TITLE "Finder 1.0" ; COLOR "B/W" ICON ...

Disable / enable the window action-button on dialog quit :?: how do I prevent it from reopening another window and going to reopen the previously opened window? the Main window cannot be MDI because I use dialog nowait ( tfsdi) http://www.pflegeplus.com/IMAGES/planer.jpg ...

Les comparto como lo hago yo, este método lo he usado desde hace varios años y nunca me ha dado problemas, independientemente de las versiones de windows en las que se ejecute (funciona desde windows 98 hasta windows 10). Básicamente necesitas dos ejecutables, un ejecutable que es tu aplicación prin...

... proceso?","Confirme" ) Return NIL EndIf ShellExecute( 0, , "actualiza.exe", , NIL, 3 ) oVentPrin:bValid := { || NIL } PostQuitMessage( 0 ) Quit Return NIL Y este es el código del programita que hace la actualización del ejecutable y lo lanza de nuevo: FUNCTION Actualiza() ...

... al arrancar el aplicacion.exe, justo al entrar, localiza que ejecutable aplicacion_*.exe es más reciente y lanzalo, cerrando al llamador con un Quit y 3 - al entrar con este ejecutable renombrado intenta: a) Borrar ejecutables renombrados antiguos b) COPY FILE aplicacion_27032019_160200.exe ...

... Insert Error" + cEol + cSqlIns + cEol + oError:Description, cTitle ) //lSql := .F. nError++ END ENDIF ENDIF Sysrefresh() NEXT nX1 oExcel:Quit() MsgAlert( cModule + ' Complete.' + cEol + LTRIM(TRANSF(nAdded,'999,999,999')) + ' records added out of ' + LTRIM(TRANSF(nTotRec,'999,999,999')) ...

When exit program loaded in Tray the icon does not disappear. Program quit but, the icon on Tray, only disappear when I mouse over. can anyone give me a hint of what to do to remove the Tray icon when I close the program? I create the icon in Tray da with the ...

... file name, but can't seem to find a way to pull it out in this situation. Note the commented line in the code. That forces the error program to quit without displaying anything. Any suggestions will be greatly appreciated.

... > 0 * aLanguages := { ; * i18n( "International" ), ; * i18n( "Italian" ), ; * i18n( "French" ), ; * i18n( "Quit" ) } * * CLEAR SCREEN * @2,10 SAY i18n( "X H A R B O U R - Internationalization test " ) * @4,10 SAY i18n( "Current language: ...

... is intended to indicate what the application programmer did not release. That is all its purpose. Exactly... how to free these resources without quit the EXE ???

... ) + DTOS(DATE()) + LEFT(TIME(),2)+SUBSTR(TIME(),4,2)+RIGHT(TIME(),2) + ".XLSX" oBook:SaveAs( cRoot + cCsvname ) oExcel:Quit()

... 1. Program will freeze until the first lock is :end() 2. Lock Column (flag) is not certain correct. Because, if the user which for FOR UPDATE quit. The column flag still "lock" status. What is the solution like Rlock()? Regards, Dutch

... arroja el error siguiente: [list=]G:\hb32>hbmk2 g:\hb32\tests\hello.prg -compiler=mingw64 Error BASE/1068 Error de argumento: acceso al array (Quit) Error BASE/1068 Error de argumento: acceso al array Called from PARAMTOSTRING(0) Called from LEGACYWARNING(0) Called from __HBMK(0) Called from ...

He instalado MinGW para 63 bits, versión: \mingw-w64\x86_64-8.1.0-posix-sjlj-rt_v6-rev0 Y utilizo para compilar el siguiente BAT: cls@set HB_INSTALL=C:\harbour64%HB_INSTALL%\bin\harbour %1.prg -n -i%HB_INSTALL%\include -iC:\MinGW-64\mingw32\i686-w64-mingw32\include  gcc -Wall -o%1.exe %1.c -I%H...

... ) // Application call... IF PCOUNT()<2 MsgAlert( "Application Call not valid", PA[04] ) RETURN nil ENDIF // Index... IF ! NdxChk() QUIT ENDIF // Init... cLb1 := IF( "APEXASIA" $ Pmod, 'Lot No.', 'File' ) // Init... _UserSec( cUid, "BKG", aSecurity, @PA[45] ) ...