Re: Call_IDE - Utility for HMG IDE
Posted: Mon Jan 30, 2017 11:11 am
OK, I got it.
Renamed hmg3.4.3 IDE and copied hmg3.4.2. IDE.
Thx
Renamed hmg3.4.3 IDE and copied hmg3.4.2. IDE.
Thx
Exclusive forum for HMG, a Free / Open Source xBase WIN32/64 Bits / GUI Development System
http://www.hmgforum.com/
I renamed as "IDE_Debugger" (for UNICODE and ANSI).serge_girard wrote: ↑Mon Jan 30, 2017 11:11 am OK, I got it.
Renamed hmg3.4.3 IDE and copied hmg3.4.2. IDE.
Thx
Code: Select all
nIcons := ExtractIconEx(cIDE, -1, Nil, Nil, 1)
Code: Select all
HB_FUNC ( EXTRACTICONEX )
{
HICON iLarge;
HICON iSmall;
UINT nIcons = hb_parni( 5 );
hb_retni( ExtractIconEx( (LPCSTR) HMG_parc( 1 ), hb_parni( 2 ), &iLarge, &iSmall, nIcons ) );
}
Como verás, mi mensaje anterior muestra el InstalledAt funcionando correctamente (ejecutable adjunto). Pero cuando compilo junto al otro proyecto me dá error.Harbour 3.2.0dev (r1601151502)
Copyright (c) 1999-2015, http://harbour-project.org/
..\HMG_Version\InstalledAt\InstalledAt.Prg: In function 'HB_FUN_GETLOGICALDRIVES':
..\HMG_Version\InstalledAt\InstalledAt.Prg:533:5: warning: implicit declaration of function 'hb_retnl' [-Wimplicit-function-declaration]
In file included from D:\Fontes\HMG\Call_IDE\call_ide.prg:912:0:
D:/hmg.3.4.3/harbour/include/hbapi.h: At top level:
D:/hmg.3.4.3/harbour/include/hbapi.h:701:25: warning: conflicting types for 'hb_retnl'
extern HB_EXPORT void hb_retnl( long lNumber ); /* returns a long number */
^
..\HMG_Version\InstalledAt\InstalledAt.Prg:533:5: note: previous implicit declaration of 'hb_retnl' was here
D:\Fontes\HMG\Call_IDE\call_ide.prg: In function 'HB_FUN_SHELLEXECUTEEX':
D:\Fontes\HMG\Call_IDE\call_ide.prg:924:29: warning: assignment from incompatible pointer type [-Wincompatible-pointer-types]
SHExecInfo.lpVerb = (LPCSTR) HMG_parc( 2 );
^
D:\Fontes\HMG\Call_IDE\call_ide.prg:925:29: warning: assignment from incompatible pointer type [-Wincompatible-pointer-types]
SHExecInfo.lpFile = (LPCSTR) HMG_parc( 3 );
^
D:\Fontes\HMG\Call_IDE\call_ide.prg:926:29: warning: assignment from incompatible pointer type [-Wincompatible-pointer-types]
SHExecInfo.lpParameters = (LPCSTR) HMG_parc( 4 );
^
D:\Fontes\HMG\Call_IDE\call_ide.prg:927:29: warning: assignment from incompatible pointer type [-Wincompatible-pointer-types]
SHExecInfo.lpDirectory = (LPCSTR) HMG_parc( 5 );
^