Delphi 取当前电脑所有IP地址

  • 函数类型: 自定义函数

  • 函数说明:

取当前电脑所有IP地址


  • 代码如下:



 function GetStaticIps: TStrings;
begin
  TIdStack.IncUsage;
  try
    Result := TStringList.Create;
    Result.StrictDelimiter := True;
    GStack.AddLocalAddressesToList(Result);
  finally
    TIdStack.DecUsage;
  end;
end;



  • 用法示例:

无 



《学习大师原创文档,请勿转载,侵权必究》





联系电话:
020-00000000
联系电话:
020-00000000
联系电话:
020-12345678