摘要: 要想透过代理服务器取得客户端的真实IP地址,就要使用 Request.ServerVariables("HTTP_X_FORWARDED_FOR") 来读取。不过要注意的事,并不是每个代理服务器都能用 Request.ServerVariables("HTTP_X_FORWARDED_FOR") 来读取客户端的真实 IP,有些用此方法读取到的仍然是代理服务器的IP。还有一点需要注意的是:如果客户端没有通过代理服务器来访问,那么用 Request.ServerVariables ("HTTP_X_FORWARDED_FOR") 取到的值将是空的。因此,如果要在程序中使用此方法,可以这样处理:   阅读全文
posted @ 2010-12-21 00:26 fyen 阅读(1532) 评论(0) 推荐(0) 编辑
摘要: readyState属性包括五种可能的取值:0: (未初始化)send方法还没有被调用1: (加载中)已调用了send方法,请求还在处理2: (已加载)send方法已完成,整个应答已接收3: (交互中) 正在解析应答4: (已完成) 应答已经解析,准备好进行下一步处理。对象XMLHttpRequest属性status的含义:0**:未被始化 1**:请求收到,继续处理 2**:操作成功收到,分析、接受 3**:完成此请求必须进一步处理 4**:请求包含一个错误语法或不能完成 5**:服务器执行一个完全有效请求失败 100——客户必须继续发出请求101——客户要求服务器根据请求转换HTTP协议版 阅读全文
posted @ 2010-12-20 23:14 fyen 阅读(315) 评论(0) 推荐(0) 编辑
摘要: Ajax中我们经常用到get和post请求.那么什么时候用get请求,什么时候用post方式请求呢? 在做回答前我们首先要了解get和post的区别.1、 get是把参数数据队列加到提交表单的ACTION属性所指的URL中,值和表单内各个字段一一对应,在URL中可以看到。post是通过HTTP post机制,将表单内各个字段与其内容放置在HTML HEADER内一起传送到ACTION属性所指的URL地址。用户看不到这个过程。2、 对于get方式,服务器端用Request.QueryString获取变量的值,对于post方式,服务器端用Request.Form获取提交的数据。两种方式的参数都可以 阅读全文
posted @ 2010-12-20 23:13 fyen 阅读(234) 评论(0) 推荐(0) 编辑
摘要: function IntToBin(Value: Integer; Count: Integer = 32): string;var iTemp: Integer;begin Result := ''; while Count > 0 do begin iTemp := Value shr (Count - 1) and 1; case iTemp of 1: Result := R... 阅读全文
posted @ 2010-12-19 13:11 fyen 阅读(284) 评论(0) 推荐(0) 编辑
摘要: RtcHttpClient1在程序关闭时没有断开会出现上述的Runtime error 216的问题解决方法在主窗口中的OnClose中执行客户端断开 阅读全文
posted @ 2010-12-19 10:30 fyen 阅读(489) 评论(0) 推荐(0) 编辑
摘要: 问题:为什么打印的时候都挤在一起. 而且只有一行显示.(x,y 是全局变量), 为什么没有按我的一行加上间距一行的打印呢?复:打印机分辨率不一样,不要给定具体值,必须通过API获得具体打印参数。你先更改这两个地方再打印试试。你这是要干嘛,如果喷墨激光打印机,肯定打在一起了,若你要分行打,可以改成要打成一列,改成类似这样要打成一行,改成类似这样 阅读全文
posted @ 2010-12-18 01:38 fyen 阅读(2896) 评论(1) 推荐(0) 编辑
摘要: 对文本文件进行写操作,当文本文件的文件名为“LPT”或“COM”等保留字里,即是对指定端口写。源代码截自“吉胜超市POS” 阅读全文
posted @ 2010-12-18 01:33 fyen 阅读(3670) 评论(0) 推荐(0) 编辑
摘要: 用下面的替换 TfrxPDFFont.GetFontName: AnsiString 中的同名函数 阅读全文
posted @ 2010-12-18 00:53 fyen 阅读(1476) 评论(0) 推荐(0) 编辑
摘要: FastReport 4.9.20 中文菜单显示不全或者乱码解决方法:可以自己编译一个frcc.exe,替换Res目录下的,然后再recompile即可。 delphi 2010(update5)测试界面都正常。用delphi 2010建立一个console工程,名称为frcc,代码如下: 阅读全文
posted @ 2010-12-18 00:44 fyen 阅读(2929) 评论(0) 推荐(0) 编辑
摘要: function CreateAccessFile(FileName: string; PassWord: string = ''): boolean;constSConnectionString = 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=%s;Jet OLEDB:Database Password=%s;';varvCatalog: OleV... 阅读全文
posted @ 2010-12-18 00:40 fyen 阅读(350) 评论(0) 推荐(0) 编辑