delphi 比较俩组IP地址是否一样

本文整理自网络，侵删。

 
function CompareIP(IP1, IP2: array of byte): boolean;
var
  I: integer;
begin
  Result := False;
  For I := 0 To 3 do begin
    if IP1[I] <> IP2[I] Then Exit;
  end;
  Result := True;
end;
 

相关阅读 >>

Delphi 窗体的位置和高宽度-tform:letf、top、width、height、clientwidth、clientheight

Delphi检测程序是否在优盘上运行

Delphi idwhois1 简单的用法

Delphi indy smtp 发送邮件

Delphi 列举系统服务,停止启动所选服务

Delphi for 循环 to和downto的理解

Delphi winapi: movewindow - 改变窗口的位置与大小

Delphi 时间戳与日期互转

Delphi日期函数、日期加减

Delphi百度地图经纬度与地址互转

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi 比较俩组IP地址是否一样