unit NetFunc; interface uses SysUtils, Windows, dialogs, winsock, Classes, ComObj, WinInet, Variants; // 错误信息常量 const C_Err_GetLocalIp = '获取本地ip失败'; C_Err_GetNameByIpAddr = '获取主机名失败'; C_Err_GetSQLServerList = '获取SQLServer服务器失败'; C_Err_GetUserResource

Delphi 取整函数round.trunc.ceil和floor 1.Round(四舍六入五留双)功能说明:对一个实数进行四舍五入.(按照银行家算法)例:var i, j: Integer;begin i := Round(1.5); // i等于2 j := Round(2.5); // j等于2end; 在Delphi中使用Round函数得到的答案有时与我们所预期的会不太一样:采用的是四舍六入五留双.即当舍或入位大于或小于五时按四舍五入来处理 ,而当舍或入位等于五时,就要看前面一位是什么,

QNetworkInterface类提供了一个主机IP地址和网络接口的列表. QNetworkInterface表示了当前程序正在运行时与主机绑定的一个网络接口.每个网络接口可能包含0个或者多个IP地址,每个IP地址都可选择性地与一个子网掩码和(或)一个广播地址相关联.这样的列表可以通过QNetworkInterface的addressEntries()方法获得.作为一种可选的方案是,当子网掩码或者广播地址不是必须的,可以使用allAddresses()便捷函数来仅仅获得IP地址. 注:QNet

宿主机: Mac OS 10.9.2 虚拟机: [root@localhost ~]# cat /etc/redhat-release CentOS release 6.4 (Final) [root@localhost ~]# uname -a Linux localhost.localdomain 2.6.32-358.el6.x86_64 #1 SMP Fri Feb 22 00:31:26 UTC 2013 x86_64 x86_64 x86_64 GNU/Linux 虚拟机是通过vag

从网上找的取cpu号 在d7中测试通过了 push,move,pop ...有点难 现在的水平我也就只能拿来主义了 /// <summary>/// 取cpu号/// </summary>/// <returns></returns>function TForm1.GetCPUID: string;var _eax, _ebx, _ecx, _edx: Longword; s, s1, s2: string;begin asm push eax push e

生成MAC地址的小工具: {*------------------------------------------------ 生成mac地址 @author @version 2015.7.2 2015.10.22修改 步长最大长度为256,必须为2的n次方 长度不超过5位数 -------------------------------------------------} unit frmSaveMac; interface uses Windows, Messages, SysUtils

QHostAddress类提供一个IP地址. 这个类提供一种独立于平台和协议的方式来保存IPv4和IPv6地址. QHostAddress通常与QTcpSocket,QTcpServer,QUdpSocket一起使用,来连接到主机或建立一个服务器. 可以通过setAddress()来设置一个主机地址,使用toIPv4Address(),toIPv6Address()或toString()来检索主机地址.你可以通过protocol()来检查协议类型. 请注意,QHostAddress不做DNS查询

Qt中提供了几个用于获取主机网络信息的类,包括QHostInfo.QHostAddress.QNetworkInterface以及QNetworkAddress.在本节中,我将在这里总结QHostInfo类的用法,其他的类的介绍将会在后续文章中给出. 注:更详细的内容,请参看官方文档. QHostInfo类提供了一系列用于主机名查询的静态函数. QHostInfo类利用操作系统所提供的查询机制来查询与特定主机名相关联的主机的IP地址,或者与一个IP地址相关联的主机名.这个类提供了两个静态的便利函

x:=ExtractFileName(str);  //取文件名+扩展名,不包含文件路径 y:=ExtractFileExt(str);   //取文件的扩展名

{ "action": "******", "data": [ { "Info1": { "ID": "1", "Name": "张三", }, "Info2": [ ...... ] }, "Info2": { "ID": "2", "Name":

function GetVolumeID: string; var vVolumeNameBuffer: ..] of Char; vVolumeSerialNumber: DWORD; vMaximumComponentLength: DWORD; vFileSystemFlags: DWORD; vFileSystemNameBuffer: ..] of Char; begin if GetVolumeInformation('C:\', vVolumeNameBuffer, SizeOf(

QNetworkAddressEntry类存储了一个网络接口所支持的一个IP地址,同时还有与之相关的子网掩码和广播地址. 每个网络接口可以包含0个或多个IP地址,这些IP地址可以分别关联一个子网掩码和(或)一个广播地址(取决于操作系统的支持). This class represents one such group. #include "mainwindow.h" #include <QHostAddress> #include <QNetworkInterface

近日偶要做个程序,需要获得外网IP,偶去网上找相关资料,发现都不尽如人意,有的只能获得本地网卡的IP,有的通过httpget控件获取IP,还有甚者做个asp再调用偶是个懒人,而且上面提到的方法,不是获取不了就是速度太慢或者是太麻烦,无意中发现有个系统提供的API,利用它能够获取适配器信息,其中就包括外网IP,下面把代码给大家,重点处我做了注释. 注意: 程序必须运行在直接拨号联网的用户,不适用于内网用户.//常量定义ConstMAX_HOSTNAME_LEN               = 12

#!/usr/bin/python import re import subprocess ARP = "arp" IP = "192.168.128.27" CMD = "%s %s" % (ARP,IP) macPattern = re.compile(":") def getMac(): p = subprocess.Popen(CMD,shell=True,stdout=subprocess.PIPE) out = p

var  S: string;begin  S := 'c:\aa\bb\cc\dd\abc.exe';  ShowMessage(ExtractFileDir(ExtractFileDir(S))); //c:\aa\bb\cc  ShowMessage(ExtractFileDir(ExtractFileDir(ExtractFileDir(S)))); //c:\aa\bbend; strPar := ExtractFileDir(ExtractFileDir(Application.Ex

自格林威治标准时间1970年1月1日00:00:00 至现在经过多少秒数时间模块Uses   DateUtils;当前时间:中国是 +8时区,换成UTC 就要减掉8小时showMessage(inttostr(DateTimeToUnix(now())-28800));

function TSetParkForm.RemoveSgin(str: string): string; // 去掉括号内的内容(包括括号) var i1, i2, i: integer; begin for i := 0 to length(str) - 1 do begin i1 := str.IndexOf('('); if i1 = -1 then break; i2 := str.IndexOf(')'); if i2 = -1 then break; end; result :=

1. 物理server配置 1.1安装 參考 http://blog.csdn.net/qq_21398167/article/details/47019751 1.2      配置 关闭selinux和防火墙 #setenforce 0 #vi /etc/sysconfig/selinux 改动为:SELINUX=disabled 2. 在Ceilometer中測试 加入一个已存在的meter 2.1在pipline.yaml新增meter 添加一个内存meter,/etc/ceilomet

1.刚刚接触tcpdump时,常用tcpdump -i eth1 host 192.168.1.1 这个命令基于ip地址抓取数据包信息. tcpdump -i eth1(接口名称) host 192.168.1.1(计算机IP地址) 2.在分析客户的网络中,经常会用到设备中自带的tcpdump软件,再配合PC端的wireshark软件来简单检查分析客户的网络情况. 这时候经常用到的tcpdump参数为: tcpdump -i eth1 -nn(不做地址解析)   -s0(抓取数据包长度不限制)

应用抓包过滤,选择Capture | Options,扩展窗口查看到Capture Filter栏.双击选定的接口,如下图所示,弹出Edit Interface Settints窗口. 下图显示了Edit Interface Settings窗口,这里可以设置抓包过滤条件.如果你确知抓包过滤条件的语法,直接在Capture Filter区域输入.在输入错误时,Wireshark通过红色背景区域表明无法处理过滤条件.最有可能的情况是,过滤条件中含有输入错误,或是使用了display filter的

应用抓包过滤,选择Capture | Options,扩展窗口查看到Capture Filter栏.双击选定的接口,如下图所示,弹出Edit Interface Settints窗口. 下图显示了Edit Interface Settings窗口,这里可以设置抓包过滤条件.如果你确知抓包过滤条件的语法,直接在Capture Filter区域输入.在输入错误时,Wireshark通过红色背景区域表明无法处理过滤条件.最有可能的情况是,过滤条件中含有输入错误,或是使用了display filter的