如何使用Delphi在Windows 10上连接到WiFi?

所以,基本上我拿了https://github.com/RRUZ/blog/tree/master/Winapi/WlanAPI并添加了

var
ConPrms : Tndu_WLAN_CONNECTION_PARAMETERS;
  Name    : WideString;
  _Result: HRESULT;
begin
....
Name := WideString('MySSID');
    ConPrms.wlanConnectionmode := wlan_connection_mode_auto;
    ConPrms.strProfile        := PWChar(Name);
    ConPrms.pDot11Ssid        := NIL;
    // Windows XP: pDesiredBssidList member must be NULL.
    ConPrms.pDesiredBssidList := NIL;
    ConPrms.dot11BssType      := dot11_BSS_type_any;
    // Windows XP: dwflags must be set to 0
    ConPrms.dwflags           := 0;
    _Result := WlanConnect(hClient,@pInterfaceGuid,@ConPrms,nil);

    if _Result <> ERROR_SUCCESS then
    begin
      WriteLn('CONNECT - FAILED: ' + IntToStr(_Result) + ' - ' + SysErrorMessage(_Result));
    end;

for i := 0 to pInterface^.dwNumberOfItems - 1 do循环中。 并且两台计算机上都出现错误1168: Element not foundnetsh wlan可以正常工作(我在https://www.windowscentral.com/how-connect-wi-fi-network-windows-10此处没有cmd指令)。我在做什么错了?

如何使用Delphi在Windows 10上连接到WiFi?

xiezhanliang 回答:如何使用Delphi在Windows 10上连接到WiFi?

暂时没有好的解决方案,如果你有好的解决方案,请发邮件至:iooj@foxmail.com
本文链接:https://www.f2er.com/3018960.html

大家都在问