摘要：
程序界面 测试是在本机测试的，注意不能是127.0.0.1或者localhost，不然idhttp会罢工。由于测试论坛没有几篇文章，所以“下一页”，其实只读取了第一页。上一页还没做呢，呵。 源代码： unit Unit1; interface uses Windows, Messages, SysU 阅读全文
摘要：
function IIF<T>(Condition: Boolean; TrueValue: T; FalseValue: T): T; begin if Condition then result := TrueValue else result := FalseValue; end;注:Delphi 2009\2010 支持泛型，其它版本不支持。真的很方便!不过好像不能直接... 阅读全文
摘要：
法一：利用TWebBrowser组件 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, OleCtrls, SHDocVw; type TForm1 = class(TForm) WebBrowser1: ... 阅读全文
摘要：
在 Delphi 中使用正则表达式, 目前 PerlRegEx 应该是首选, 准备彻底而细致地研究它.官方网站: http://www.regular-expressions.info/delphi.html直接下载: http://www.regular-expressions.info/download/TPerlRegEx.zip二、安装方法:1、先把解压的 TPerlR... 阅读全文
摘要：
在程序中使用TWebbrowser控件或者Indy中控件连接采用Ajax技术的网页，获得的网页源码中并不会有客户端更新的内容。在IE浏览器中的查看源文件同理也是看不到Ajax更新的内容。通过插件可以看到Ajax更新后的内容。问题是在程序中怎样来获得完整的网页内容？如果有Ajax更新，Webbrowser的DocumentComplete事件也不会被触发。其实完整的网页内容并不是不可以获得，使用一个... 阅读全文
摘要：
//增加项或列(字段)ListView1.Clear;ListView1.Columns.Clear;ListView1.Columns.Add;ListView1.Columns.Add;ListView1.Columns.Add;ListView1.Columns.Items[0].Caption:='id';ListView1.Columns.Items[... 阅读全文
摘要：
今天做的一个项目中要使用一大串数据进行处理。如何对这一系列的数据进行保存成为一个首要的问题。唉，Delphi啊，你何时才能支持泛型啊。在C#，C++这都不是问题了啊。在Delphi里只有TStringList这个容器可以使用，但是它是处理字符串的。一进一出，需要大量的typecast时间。用链表？？不值得。上网一查，呵呵，可以用动态数组。看来我还是一个新手，这个东西我都不知道啊。啥时候Delphi... 阅读全文
摘要：
如何在delphi里面控制Edit只能输入数字━━━━━━━━━━━━━━━━━━━━━━━━━━if not (key in ['0'..'9',#8]) then key := #0;只能输入汉字，而不能输入数字或其他字符━━━━━━━━━━━━━━━━━━━━━━━━━━在Edit的OnKeyPress事件中 procedure TForm1.Edit1KeyPress(Sender: TO... 阅读全文
摘要：
源代码：-------------------------------------------------------------------------unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls,StrUt... 阅读全文
摘要：
{location 对象:}reload //重新加载当前文档replace //用新的文档替换当前文档assign //加载新文档href //设置或返回完整的 URLprotocol //设置或返回当前 URL 的协议host //设置或返回 # 号开始的 URL(锚)hostname //设置或返回当前 URL 的主机名port //设置或返回当前 URL 的端口号pathname //设置... 阅读全文