Porque no me funciona SET MULTIPLE OFF WARNING

HMG en Español

Moderator: Rathinagiri

User avatar
danielmaximiliano
Posts: 2261
Joined: Fri Apr 09, 2010 4:53 pm
Location: Argentina
Has thanked: 291 times
Been thanked: 53 times
Contact:

Re: Porque no me funciona SET MULTIPLE OFF WARNING

Post by danielmaximiliano »

IMATECH wrote:Try check this link:

viewtopic.php?p=22318#p22318



regards
Gracias Ronaldo por el recordatorio....
*´¨)
¸.·´¸.·*´¨) ¸.·*¨)
(¸.·´. (¸.·` *
.·`. Harbour/HMG : It's magic !
(¸.·``··*

Saludos / Regards
DaNiElMaXiMiLiAnO

Whatsapp. := +54901169026142
Telegram Name := DaNiElMaXiMiLiAnO

User avatar
mjaviergutierrez
Posts: 121
Joined: Fri Nov 30, 2012 7:51 pm
Location: San Lorenzo, Santa Fe, Argentina
Been thanked: 1 time

Post by mjaviergutierrez »

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.
...

User avatar
Pablo César
Posts: 4059
Joined: Wed Sep 08, 2010 1:18 pm
Location: Curitiba - Brasil
Has thanked: 100 times
Been thanked: 182 times

Post by Pablo César »

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).
HMGing a better world
"Matter tells space how to curve, space tells matter how to move."
Albert Einstein

User avatar
srvet_claudio
Posts: 2044
Joined: Thu Feb 25, 2010 8:43 pm
Location: Uruguay
Has thanked: 35 times
Been thanked: 152 times
Contact:

Post by srvet_claudio »

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.
I fixed.
Best regards.
Dr. Claudio Soto
(from Uruguay)
http://srvet.blogspot.com

User avatar
mjaviergutierrez
Posts: 121
Joined: Fri Nov 30, 2012 7:51 pm
Location: San Lorenzo, Santa Fe, Argentina
Been thanked: 1 time

Post by mjaviergutierrez »

Como ? Yo hice los cambios que me indico Pablo Cesar pero sigue igual.
...

User avatar
Pablo César
Posts: 4059
Joined: Wed Sep 08, 2010 1:18 pm
Location: Curitiba - Brasil
Has thanked: 100 times
Been thanked: 182 times

Post by Pablo César »

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:

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
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.
HMGing a better world
"Matter tells space how to curve, space tells matter how to move."
Albert Einstein

User avatar
Pablo César
Posts: 4059
Joined: Wed Sep 08, 2010 1:18 pm
Location: Curitiba - Brasil
Has thanked: 100 times
Been thanked: 182 times

Post by Pablo César »

esgici wrote:Does our global moderator is sleeping ?
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

User avatar
mjaviergutierrez
Posts: 121
Joined: Fri Nov 30, 2012 7:51 pm
Location: San Lorenzo, Santa Fe, Argentina
Been thanked: 1 time

Post by mjaviergutierrez »

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.
...

Post Reply