Egalware/EgtExecutor
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

EgtExecutor :

Browse Source 
- aggiunte funzioni Exe e Lua SetCurrDimensionStyle e ResetCurrDimensionStyle.
This commit is contained in:
Dario Sassi
2020-01-02 08:27:57 +00:00
parent 84cd21ec7e
commit 6131010957
3 changed files with 155 additions and 61 deletions
Download Patch File Download Diff File Expand all files Collapse all files
LUA_GdbCreate.cpp
+42
View File
@@ -220,6 +220,46 @@ LuaCreateTextAdv( lua_State* L)
return 1 ;
}
//-------------------------------------------------------------------------------
static int
LuaSetCurrDimensionStyle( lua_State* L)
{
// 7 parametri : dExtLineLen, dArrowLen, dTextDist, nLenIsMM, nDecDigit, sFont, dTextHeight
double dExtLineLen ;
LuaCheckParam( L, 1, dExtLineLen)
double dArrowLen ;
LuaCheckParam( L, 2, dArrowLen)
double dTextDist ;
LuaCheckParam( L, 3, dTextDist)
int nLenIsMM ;
LuaCheckParam( L, 4, nLenIsMM)
int nDecDigit ;
LuaCheckParam( L, 5, nDecDigit)
string sFont ;
LuaCheckParam( L, 6, sFont)
double dTextHeight ;
LuaCheckParam( L, 7, dTextHeight)
LuaClearStack( L) ;
// imposto lo stile di quotatura corrente (per il contesto corrente)
bool bOk = ExeSetCurrDimensionStyle( dExtLineLen, dArrowLen, dTextDist, nLenIsMM, nDecDigit, sFont, dTextHeight) ;
// restituisco il risultato
LuaSetParam( L, bOk) ;
return 1 ;
}
//-------------------------------------------------------------------------------
static int
LuaResetCurrDimensionStyle( lua_State* L)
{
// nessun parametro
LuaClearStack( L) ;
// resetto lo stile di quotatura corrente (per il contesto corrente)
bool bOk = ExeResetCurrDimensionStyle() ;
// restituisco il risultato
LuaSetParam( L, bOk) ;
return 1 ;
}
//-------------------------------------------------------------------------------
static int
LuaCreateHorizontalDimension( lua_State* L)
@@ -316,6 +356,8 @@ LuaInstallGdbCreate( LuaMgr& luaMgr)
bOk = bOk && luaMgr.RegisterFunction( "EgtText", LuaCreateText) ;
bOk = bOk && luaMgr.RegisterFunction( "EgtTextEx", LuaCreateTextEx) ;
bOk = bOk && luaMgr.RegisterFunction( "EgtTextAdv", LuaCreateTextAdv) ;
bOk = bOk && luaMgr.RegisterFunction( "EgtSetCurrDimensionStyle", LuaSetCurrDimensionStyle) ;
bOk = bOk && luaMgr.RegisterFunction( "EgtResetCurrDimensionStyle", LuaResetCurrDimensionStyle) ;
bOk = bOk && luaMgr.RegisterFunction( "EgtHorizontalDimension", LuaCreateHorizontalDimension) ;
bOk = bOk && luaMgr.RegisterFunction( "EgtVerticalDimension", LuaCreateVerticalDimension) ;
bOk = bOk && luaMgr.RegisterFunction( "EgtAlignedDimension", LuaCreateAlignedDimension) ;