Gracias Ronaldo por el recordatorio....
Porque no me funciona SET MULTIPLE OFF WARNING
Moderator: Rathinagiri
- danielmaximiliano
- Posts: 2625
- Joined: Fri Apr 09, 2010 4:53 pm
- Location: Argentina
- Contact:
Re: Porque no me funciona SET MULTIPLE OFF WARNING
*´¨)
¸.·´¸.·*´¨) ¸.·*¨)
(¸.·´. (¸.·` *
.·`. Harbour/HMG : It's magic !
(¸.·``··*
Saludos / Regards
DaNiElMaXiMiLiAnO
Whatsapp. := +54901169026142
Telegram Name := DaNiElMaXiMiLiAnO
¸.·´¸.·*´¨) ¸.·*¨)
(¸.·´. (¸.·` *
.·`. Harbour/HMG : It's magic !
(¸.·``··*
Saludos / Regards
DaNiElMaXiMiLiAnO
Whatsapp. := +54901169026142
Telegram Name := DaNiElMaXiMiLiAnO
- mjaviergutierrez
- Posts: 156
- Joined: Fri Nov 30, 2012 7:51 pm
- DBs Used: DBF
- Location: San Lorenzo, Santa Fe, Argentina
Re: Porque no me funciona SET MULTIPLE OFF WARNING
Perdón, sigo con el tema, si no entendi mal el link al post viewtopic.php?p=22318#p22318, dice que debo agregar las lineas:
/* required for compiller erros/warnings */
MEMVAR _HMG_lMultiple
MEMVAR _ShowContextMenus
en el archivo i_controlmisc.ch, (yo lo encontre en c:\hmg.3.0.46\include), bueno, agregé estas lineas al archivo .ch, lo grabé, volvi a compilar y la aplicacion se sigue ejecuantando varias veces. Pueder ser ? gracias. saludos.
/* required for compiller erros/warnings */
MEMVAR _HMG_lMultiple
MEMVAR _ShowContextMenus
en el archivo i_controlmisc.ch, (yo lo encontre en c:\hmg.3.0.46\include), bueno, agregé estas lineas al archivo .ch, lo grabé, volvi a compilar y la aplicacion se sigue ejecuantando varias veces. Pueder ser ? gracias. saludos.
...
- Pablo César
- Posts: 4059
- Joined: Wed Sep 08, 2010 1:18 pm
- Location: Curitiba - Brasil
Porque no me funciona SET MULTIPLE OFF WARNING
Hola Javier,
Si, está correcto en partes. Debes adicionar MEMVAR _HMG_lMultiple en el archivo i_controlmisc.ch que está en el include y debes re-hacer tus bibliotecas HMG. Para esto despues de grabado el archivo i_controlmisc.ch ejecuta el archivo buildlib.bat que está en el folder hmg.
Después de eso, si puedes compilar tus aplicaciones.
Este cambio irá ser aplicado de ahora en más para los nuevos release de HMG.
Corrección: El Dr. Soto hizo una implementacion que deberá corregir este defecto, pero no se hará con el MEMVAR _HMG_lMultiple e irá estar disponible en sus próximas actualizaciones de version (apartir de 3.1.4).
Si, está correcto en partes. Debes adicionar MEMVAR _HMG_lMultiple en el archivo i_controlmisc.ch que está en el include y debes re-hacer tus bibliotecas HMG. Para esto despues de grabado el archivo i_controlmisc.ch ejecuta el archivo buildlib.bat que está en el folder hmg.
Después de eso, si puedes compilar tus aplicaciones.
Este cambio irá ser aplicado de ahora en más para los nuevos release de HMG.
Corrección: El Dr. Soto hizo una implementacion que deberá corregir este defecto, pero no se hará con el MEMVAR _HMG_lMultiple e irá estar disponible en sus próximas actualizaciones de version (apartir de 3.1.4).
HMGing a better world
"Matter tells space how to curve, space tells matter how to move."
Albert Einstein
"Matter tells space how to curve, space tells matter how to move."
Albert Einstein
- srvet_claudio
- Posts: 2223
- Joined: Thu Feb 25, 2010 8:43 pm
- Location: Uruguay
- Contact:
Re: Porque no me funciona SET MULTIPLE OFF WARNING
I fixed.mjaviergutierrez wrote:Perdón, sigo con el tema, si no entendi mal el link al post viewtopic.php?p=22318#p22318, dice que debo agregar las lineas:
/* required for compiller erros/warnings */
MEMVAR _HMG_lMultiple
MEMVAR _ShowContextMenus
en el archivo i_controlmisc.ch, (yo lo encontre en c:\hmg.3.0.46\include), bueno, agregé estas lineas al archivo .ch, lo grabé, volvi a compilar y la aplicacion se sigue ejecuantando varias veces. Pueder ser ? gracias. saludos.
- mjaviergutierrez
- Posts: 156
- Joined: Fri Nov 30, 2012 7:51 pm
- DBs Used: DBF
- Location: San Lorenzo, Santa Fe, Argentina
Porque no me funciona SET MULTIPLE OFF WARNING
Como ? Yo hice los cambios que me indico Pablo Cesar pero sigue igual.
...
- Pablo César
- Posts: 4059
- Joined: Wed Sep 08, 2010 1:18 pm
- Location: Curitiba - Brasil
Porque no me funciona SET MULTIPLE OFF WARNING
Javier a mi me funcionó, pero de todos modos, sino tienes prizas, aguarde el nuevo release que el Dr. Soto está preparando. Fijate que mi mensaje (observacion en color rojo) aclaro la medida que está siendo tomada.
Caso tengas apuro, aqui sigue una rotina que funciona con funciones en lenguaje C que podrás adicionar encuanto aguardas la nueva version del HMG:Esto a mi me funciona perfectamente. Estas funciones lo que hace es verificar si ya el programa se encuentra en ejecución y verifica si está la ventana minimizada (entonces la maximiza e la pone en foco) o si la ventana está maximizada pero fuera de foco (entoces la pone en foco).
Espero haber sido de ayuda.
Caso tengas apuro, aqui sigue una rotina que funciona con funciones en lenguaje C que podrás adicionar encuanto aguardas la nueva version del HMG:
Code: Select all
#include "hmg.ch"
#define APP_TITLE "Titulo de la aplicación"
Function Main()
/*
Tus definiciones de variables
*/
IF IsExeRunning( cFileNoPath( HB_ArgV( 0 ) ) )
hWnd := FindWindow( APP_TITLE )
IF hWnd > 0
IF IsIconic( hWnd )
Restore( hWnd )
ELSE
SetForeGroundWindow( hWnd )
ENDIF
ELSE
MsgStop( "Não foi possível encontrar a aplicação !", "Erro", , .f. )
ENDIF
QUIT
ENDIF
DEFINE WINDOW ...
AT ...
WIDTH ...
HEIGHT ...
TITLE APP_TITLE
MAIN
..//..
/* Rutina en lenguaje C */
#pragma BEGINDUMP
#define HB_OS_WIN_USED
#define _WIN32_WINNT 0x0400
#include <windows.h>
#include "hbapi.h"
#include "hbapiitm.h"
HB_FUNC( ISICONIC )
{
hb_retl( IsIconic( ( HWND ) hb_parnl( 1 ) ) );
}
HB_FUNC ( FINDWINDOW )
{
hb_retnl( ( LONG ) FindWindow( 0, hb_parc( 1 ) ) );
}
HB_FUNC( ISEXERUNNING ) // ( cExeNameCaseSensitive ) --> lResult
{
HANDLE hMutex = CreateMutex( NULL, TRUE, ( LPTSTR ) hb_parc(1) );
hb_retl( GetLastError() == ERROR_ALREADY_EXISTS );
ReleaseMutex( hMutex );
}
#pragma ENDDUMP
Espero haber sido de ayuda.
HMGing a better world
"Matter tells space how to curve, space tells matter how to move."
Albert Einstein
"Matter tells space how to curve, space tells matter how to move."
Albert Einstein
- Pablo César
- Posts: 4059
- Joined: Wed Sep 08, 2010 1:18 pm
- Location: Curitiba - Brasil
Porque no me funciona SET MULTIPLE OFF WARNING
Sleeping ?esgici wrote:Does our global moderator is sleeping ?
Dear friend: this treatment is necessary?
In case you want to discuss this matter of languages used, please note this topic which you and every one can reply there. But please, lets keep main focus of topic matter. Otherwise will be considered as OFF TOPIC.
En caso de que usted quiera discutir este asunto sobre el idioma utilizado, tenga en cuenta este tópico para que usted y cualquiera pueda responder allí. Pero, por favor, vamos a mantener el enfoque del tema principal de esta materia. En caso contrario se considerará como desvio de asunto.
HMGing a better world
"Matter tells space how to curve, space tells matter how to move."
Albert Einstein
"Matter tells space how to curve, space tells matter how to move."
Albert Einstein
- mjaviergutierrez
- Posts: 156
- Joined: Fri Nov 30, 2012 7:51 pm
- DBs Used: DBF
- Location: San Lorenzo, Santa Fe, Argentina
Re: Porque no me funciona SET MULTIPLE OFF WARNING
Gracias Pablo Cesar, había visto lo resaltado en rojo. Voy a implementar la rutina hasta que salga la corrección. Supongo que el comentario del Sr. esgici ha sido en tono de broma. La mayoría de los posts estan en ingles y los de habla española nos arreglamos. Gracias a todos por las respuestas.
...