[更新376#2825]PECMD2012.1.80.13_Win32_64.多窗口多线程.裸机系统2.3.3.1+18M酷M...

红毛樱木

826773297 发表于 2022-8-1 12:57
如何知道每个网卡连接的无线名

已链接的吗？

WLAN_AVAILABLE_NETWORK_CONNECTED

不知道是不是PECMD里的bConnectabl，要自己翻微软的官方文档。应该是这个结构体里的_WLAN_AVAILABLE_NETWORK

826773297

红毛樱木 发表于 2022-8-1 16:03
已链接的吗？

WLAN_AVAILABLE_NETWORK_CONNECTED

对，已连接的

826773297

mdyblog 发表于 2022-8-1 14:38
PCIP ? IP,MASK,GW,DNS,0?NAME,MAC,LINK   
MESS  [%LINK%]

pcip可以判断是否连接，无法判断到底连接的那个无线

mdyblog

红毛樱木 发表于 2022-8-1 16:03
已链接的吗？

WLAN_AVAILABLE_NETWORK_CONNECTED

ADSL-wlan  ,,?list,&&V
MESS. %&V%

其中：
CALC #Connected=%Flags% & 1  

//CALC #HasProfile=%Flags% & 2  

参考：https://docs.microsoft.com/zh-cn/windows/win32/api/wlanapi/ns-wlanapi-wlan_available_network?redirectedfrom=MSDN

826773297

mdyblog 发表于 2022-8-1 23:10
ADSL-wlan  ,,?list,&&V
MESS. %&V%

这个很详细，新版有加入吗

mdyblog

826773297 发表于 2022-8-2 09:51
这个很详细，新版有加入吗

一直都有的。

826773297

mdyblog 发表于 2022-8-2 09:55
一直都有的。

怎么连接已经输入过密码的无线

mdyblog

826773297 发表于 2022-8-2 10:00
怎么连接已经输入过密码的无线

                DOT11_SSID dot11Ssid = { 0 };
                memcpy(dot11Ssid.ucSSID, account, strlen(account) + 1);
                dot11Ssid.uSSIDLength = strlen(account);

                WLAN_CONNECTION_PARAMETERS connectionParameters;
                memset(&connectionParameters, 0, sizeof(connectionParameters));
                connectionParameters.pDot11Ssid = &dot11Ssid;
                connectionParameters.wlanConnectionMode = wlan_connection_mode_profile;
                connectionParameters.strProfile = wideSsid;   /* clear 可以填NULL */  //Unicode of account(SSID)
                connectionParameters.dot11BssType = dot11_BSS_type_infrastructure;//dot11_BSS_type_independent;   /* msdn说可以dot11_BSS_type_any，实测不行 */
                connectionParameters.pDesiredBssidList = NULL;
                connectionParameters.dwFlags = 0; /* WLAN_CONNECTION_ADHOC_JOIN_ONLY */

                Sleep(300);

                value = WlanConnect(m_handle, &(m_infoList->InterfaceInfo[0].InterfaceGuid),
                        &connectionParameters, NULL);

mdyblog

826773297 发表于 2022-8-2 10:00
怎么连接已经输入过密码的无线

28N版
ADSL-wlan  SSID,,start

mdyblog

mdyblog 发表于 2022-8-2 12:34
28N版
ADSL-wlan  SSID,,start

感觉PECMD.EXE本身不用增加功能了， 免得把PECMD.EXE体积搞大了。
直接用API脚本来实际增加功能。

mdyblog

826773297 发表于 2022-8-2 10:00
怎么连接已经输入过密码的无线

前面有谁问过  判断连接互联网
有API：
//#include "netlistmgr.h"
bool IsConnectedToInternet()
{
bool bol = false; //是否联网,联网 true,不联网 false   
CoInitialize(NULL);
//  通过NLA接口获取网络状态
IUnknown *pUnknown = NULL;
INetworkListManager *pNetworkListManager = NULL;
HRESULT Result = CoCreateInstance(CLSID_NetworkListManager, NULL, CLSCTX_ALL, IID_IUnknown, (void **)&pUnknown);
if (SUCCEEDED(Result))
{
  if (pUnknown)
   Result = pUnknown->QueryInterface(IID_INetworkListManager, (void **)&pNetworkListManager);
  if (SUCCEEDED(Result))
  {
   VARIANT_BOOL IsConnect = VARIANT_FALSE;
   if (pNetworkListManager)
    Result = pNetworkListManager->get_IsConnectedToInternet(&IsConnect);
   if (SUCCEEDED(Result))
   {
    bol = (IsConnect == VARIANT_TRUE) ? true : false;
   }
  }
  if (pNetworkListManager)
   pNetworkListManager->Release();
}
if (pUnknown)
  pUnknown->Release();
CoUninitialize();
return bol;
}

可参照 TaskbarPbr-tst.wcs修改。

另外 判断是否有网络（不一定连上互联网）
    Result = pNetworkListManager->get_IsConnected

(&IsConnect);

参考资料：  https://docs.microsoft.com/zh-cn/windows/win32/api/netlistmgr/nf-netlistmgr-inetworklistmanager-get_isconnected

另外拷贝一份 VS2010-VC的头文件， 方便找数据结构，API，常数。

826773297

mdyblog 发表于 2022-8-2 12:36
感觉PECMD.EXE本身不用增加功能了， 免得把PECMD.EXE体积搞大了。
直接用API脚本来实际增加功能。

ok，哪一栏是已经输入过密码的标识

mdyblog

826773297 发表于 2022-8-2 12:49
ok，哪一栏是已经输入过密码的标识

hasProfile
CALC #HasProfile=%Flags% & 2  

826773297

mdyblog 发表于 2022-8-2 12:48
前面有谁问过  判断连接互联网
有API：
bool IsConnectedToInternet()

我放弃使用dpi了，采用盲猜模式，依赖更少

826773297

mdyblog 发表于 2022-8-2 12:51
hasProfile
CALC #HasProfile=%Flags% & 2

好的

mdyblog

826773297 发表于 2022-8-2 12:51
我放弃使用dpi了，采用盲猜模式，依赖更少

没事。
发上来。 有人用API写的位函数的。

826773297

mdyblog 发表于 2022-8-2 12:53
没事。
发上来。 有人用API写的位函数的。

我发现微软也是在盲猜，但是他不太愿意承认

freesoft00

pecmd功能已经很多了。测试版都测试了小半年了。
稳定了也该转正了。

826773297

mdyblog 发表于 2022-8-2 12:53
没事。
发上来。 有人用API写的位函数的。

有现成的接口吗

mdyblog

freesoft00 发表于 2022-8-2 12:58
pecmd功能已经很多了。测试版都测试了小半年了。
稳定了也该转正了。

嗯

mdyblog

826773297 发表于 2022-8-2 12:59
有现成的接口吗

函数
IsConnectInternet  // BICon [bLCon]
目前用的简化写法，需要 {28o版} PECMD。
{28o版}\示例\IsConnectInternet.wcs  含文档
MSDN文档传到网盘了，方便找调用API需要的资料
=======================================
ENVI^ ForceLocal=1

IsConnectInternet &&InternetRet &&LocalRet
MESS Internet[%&InternetRet%]  LocalNet[%LocalRet%]

_SUB IsConnectInternet  // BICon [bLCon]
  SET &bIntnet=
  SET &bLConnect=
  SET$ &mpNetworkListManager=*8 0
  SET &CLSCTX_INPROC_SERVER=0x1
  CALC #&&CLSCTX_ALL=1|2|4|0x10
  SET#$ &CLSID_NetworkListManager=01 0C B0 DC  0F 57  9B 4A  8D 69  19 9F DB A5 72 3B //{DCB00C01-570F-4A9B-8D69-199FDBA5723B}
  SET#$ &IID_INetworkListManager=00 00 B0 DC  0F 57 9B 4A  8D 69  19 9F DB A5 72 3B  //{DCB00000-570F-4A9B-8D69-199FDBA5723B}
  SET &pNetworkListManager=0

  {*
    lock .ole
    CALL $--ret:* --qd --16  OLE32.DLL,CoCreateInstance,&&rs,*CLSID_NetworkListManager,#0,#%CLSCTX_ALL%,*IID_INetworkListManager,*mpNetworkListManager
    IFEX  #[ 0<>%&rs% ], EXIT -
    SET &get_IsConnectedToInternet=11  //函数序号
    SET &get_IsConnected=12  //函数序号
  
    SET#$  &IsConnect=*8 0
    FIND $%~1<>,
    {* ^CALL $--ret:&&rs --qd*  #,*&mpNetworkListManager.%get_IsConnectedToInternet%,IsConnect
        @IFEX #%rs%=0,!! @IFEX #%&IsConnect?short:0%<>0, SET bIntnet=1! SET SET bIntnet=0
    }
    FIND $%~2<>,
    {* CALL $--ret:&&rs --qd*  #,*&mpNetworkListManager.%get_IsConnected%,IsConnect
      @IFEX #%rs%=0,!! @IFEX #%&IsConnect?short:0%<>0, SET bIntnet=1! SET SET bIntnet=0
    }
    CALL $--ret:&&rs  #,*&mpNetworkListManager.2 //2:Release() 释放COM
  }
  ENVI-ret %~1=%bIntnet%
  FIND $%~2<>, ENVI-ret %~2=%bLConnect%
_END

826773297

mdyblog 发表于 2022-8-2 20:14
函数
IsConnectInternet  // BICon
目前用的简化写法，需要 {28o版} PECMD。

好的，我记录一下

Anson4

这几天发现一个问题：当 TABL 的表头和内容分开各自设置对齐之后，就不能用鼠标调整列宽了。应该是从 PECMD2012.1.88.05.88Stable-220527G 开始的

_TABL_TEST_COLUMN.zip (1.08 KB, 下载次数: 3)

2022-8-2 21:45 上传

点击文件名下载附件
下载积分: 无忧币 -2

mdyblog

Anson4 发表于 2022-8-2 21:45
这几天发现一个问题：当 TABL 的表头和内容分开各自设置对齐之后，就不能用鼠标调整列宽了。应该是从 PECMD ...

28P

Anson4

mdyblog 发表于 2022-8-2 23:21
28P

问题已解决，感谢更新！
不过，此时发现了另一个问题：当 EDIT 控件设置了背景色时，如果使用某些字体比如微软雅黑或者 Segoe UI，会出现背景色的两端超出边框的现象，请看下图中的红框位置。这个问题在 PECMD2012.1.88.05.88Stable-220527G 中是不存在的。

红毛樱木

mdyblog 发表于 2022-8-2 20:14
函数
IsConnectInternet  // BICon
目前用的简化写法，需要 {28o版} PECMD。

这个是很久之前就想要的COM接口调用？
------------------------
里面的格式备注，是否能更详细些？


------------------------
https://docs.microsoft.com/zh-cn ... rk-list-manager-api
翻到了一份官方示例

mdyblog

红毛樱木 发表于 2022-8-3 00:41
这个是很久之前就想要的COM接口调用？
------------------------
里面的格式备注，是否能更详细些？

对。

CALL $...    #,*&COM指针PE变量.COM函数索引,COM参数1，COM参数2...
或
CALL $...    #,COM指针PE数值.COM函数索引,COM参数1，COM参数2...
SET?ptr   &COM指针PE变量=COM指针PE数值   //2进制转可见的数字串， 提前翻译出来。所以后者不用加个*了。

查找 SDK文档的 COM结构的 C结构说明， 会列出全部 函数， 索引从0 开始。
注意， 参数按C++格式写， 默认的THis指针， 不用再写了，方便，PECMD自己处理。

    SET &get_IsConnectedToInternet=11  //函数序号
   
    CALL $--ret:&&rs --qd*  #,*&mpNetworkListManager.%get_IsConnectedToInternet%,IsConnect


其实这不仅针针对COM， 适用 所有C++ 虚函数调用。COM均是虚函数。

mdyblog

Anson4 发表于 2022-8-3 00:21
问题已解决，感谢更新！
不过，此时发现了另一个问题：当 EDIT 控件设置了背景色时，如果使用某些字体比 ...

最简单演示代码

Anson4

mdyblog 发表于 2022-8-3 08:11
最简单演示代码

使用字体 Segoe UI 或者 微软雅黑 后：
1. LIST 控件的高度变大
2. EDIT 控件的背景色左右两端超出边界线
_TABL_TEST_COLUMN_EDIT.zip (1.26 KB, 下载次数: 5)

2022-8-3 10:24 上传

点击文件名下载附件
下载积分: 无忧币 -2

mdyblog

Anson4 发表于 2022-8-3 10:10
使用字体 Segoe UI 或者 微软雅黑 后：
1. LIST 控件的高度变大
2. EDIT 控件的背景色左右两端超出边界 ...

哦。 和 字体 有关
怪不得， 我自己的代码复现不了。
与 背景色 无关

ENVI @This.Font=9:宋体
就不会。
这个字体 有外溢