火山编程网 › 火山视窗源码 › 火山PC中逻辑型和整数强制转换的代码

揰掵佲 发表于 2024-12-4 16:55:00

火山PC中逻辑型和整数强制转换的代码

<h6>在火山中 逻辑型和整数型强转是不支持的,所以写了嵌入方法来解决这个问题</h6>
<h6>先看效果</h6>
<p></p>
<h6>看看输出的C++代码</h6>
<pre><code>INT rg_n1::rg_n2 ()
{
    _sOnClassesStaticInit ();
    BOOL rg_n3;
    INT rg_n4;
    rg_n3 = (bool)1;//强转 对应整数到逻辑 (1)
    _DEBUG_STATMENT (DebugTrace (FALSE, 0, 0, _T (&quot;B&quot;), rg_n3));
    rg_n3 = (bool)0;//强转 对应整数到逻辑 (0)
    _DEBUG_STATMENT (DebugTrace (FALSE, 0, 0, _T (&quot;B&quot;), rg_n3));
    rg_n4 = (int)TRUE;// 强转 对应逻辑到整数 (真)
    _DEBUG_STATMENT (DebugTrace (FALSE, 0, 0, _T (&quot;n&quot;), rg_n4));
    rg_n4 = (int)FALSE;// 强转 对应逻辑到整数 (假)
    _DEBUG_STATMENT (DebugTrace (FALSE, 0, 0, _T (&quot;n&quot;), rg_n4));
    return (1);
}
</code></pre>
<h6>下面是火山代码</h6>
<pre><code>&lt;火山程序 类型 = &quot;通常&quot; 版本 = 1 /&gt;

方法 逻辑到整数 &lt;公开 静态 类型 = 整数 注释 = &quot;把逻辑型显示成整数&quot; 折叠 @嵌入式方法 = &quot;&quot;&gt;
参数 参_逻辑值 &lt;类型 = 逻辑型&gt;
{
    @ (int)@&lt;参_逻辑值&gt;

}

方法 整数到逻辑 &lt;公开 静态 类型 = 逻辑型 注释 = &quot;把逻辑型显示成整数&quot; 折叠 @嵌入式方法 = &quot;&quot;&gt;
参数 参_逻辑值 &lt;类型 = 整数&gt;
{
    @ (bool)@&lt;参_逻辑值&gt;
}
</code></pre>

揰掵佲 发表于 2024-12-5 08:55:51

<h6>在火山中 逻辑型和整数型强转是不支持的,所以写了嵌入方法来解决这个问题</h6>
<h6>先看效果</h6>
<p></p>
<h6>看看输出的C++代码</h6>
<pre><code>INT rg_n1::rg_n2 ()
{
    _sOnClassesStaticInit ();
    BOOL rg_n3;
    INT rg_n4;
    rg_n3 = (bool)1;//强转 对应整数到逻辑 (1)
    _DEBUG_STATMENT (DebugTrace (FALSE, 0, 0, _T (&quot;B&quot;), rg_n3));
    rg_n3 = (bool)0;//强转 对应整数到逻辑 (0)
    _DEBUG_STATMENT (DebugTrace (FALSE, 0, 0, _T (&quot;B&quot;), rg_n3));
    rg_n4 = (int)TRUE;// 强转 对应逻辑到整数 (真)
    _DEBUG_STATMENT (DebugTrace (FALSE, 0, 0, _T (&quot;n&quot;), rg_n4));
    rg_n4 = (int)FALSE;// 强转 对应逻辑到整数 (假)
    _DEBUG_STATMENT (DebugTrace (FALSE, 0, 0, _T (&quot;n&quot;), rg_n4));
    return (1);
}
</code></pre>
<h6>下面是火山代码</h6>
<pre><code>&lt;火山程序 类型 = &quot;通常&quot; 版本 = 1 /&gt;

方法 逻辑到整数 &lt;公开 静态 类型 = 整数 注释 = &quot;把逻辑型显示成整数&quot; 折叠 @嵌入式方法 = &quot;&quot;&gt;
参数 参_逻辑值 &lt;类型 = 逻辑型&gt;
{
    @ (int)@&lt;参_逻辑值&gt;

}

方法 整数到逻辑 &lt;公开 静态 类型 = 逻辑型 注释 = &quot;把逻辑型显示成整数&quot; 折叠 @嵌入式方法 = &quot;&quot;&gt;
参数 参_逻辑值 &lt;类型 = 整数&gt;
{
    @ (bool)@&lt;参_逻辑值&gt;
}
</code></pre>

查看完整版本: 火山PC中逻辑型和整数强制转换的代码