PuCooV-优快云博客

原创 22222222222

<br />33333333333333333333333333333

2010-07-21 20:38:00 703

原创风云三国游戏检测

外挂开启 pucoooopucooooo1133ayt20000844baqiyu2008asdfavqwerav184102427wz84193086qianshuizhu98feitianzh98feitianzhu198junky2002skymasaijimmy9567mashang2FLLS12345678lj8

2008-12-11 16:14:00 9630

原创 webbrowser中打开新窗体

procedure TForm1.WebBrowser1NewWindow2(Sender: TObject; var ppDisp: IDispatch; var Cancel: WordBool); var NewApp: TForm1; begin NewApp := TForm1.Cre

2008-12-04 20:21:00 1270 1

原创关闭网页时不出现提示框

好长时间了,终于解决! 一段代码! Response.Write("window.opener=null;window.open(,_self);window.close();");

2008-11-25 22:20:00 755

//判断文件是否存在 FileExists//判断文件夹是否存在 DirectoryExists//删除文件 DeleteFile; Windows.DeleteFile//删除文件夹 RemoveDir; RemoveDirectory//获取当前文件夹 GetCurrentDir//设置当前文件夹 SetCurrentDir; ChDir; SetCurrentDirectory//获取指定驱

2008-11-10 13:05:00 1835

原创用Delphi动态改变页面内容

使用TWebBrowser组件可以直接显示网页的内容，因此在用delphi开发程序时，我们可以使用TWebBrowser来展示一些数据，获得更美观专业的效果，提高应用程序的挡次。通常的做法时，做一些静态的页面，TWebBrowser装载这些页面后，再通过delphi填写数据。故需要用到的技术就是如何通过delphi读取或者控制TWebBrowser中内容。其实TWebBrowser就是一

2008-06-18 10:57:00 1003

转载用Delphi动态改变页面内容

使用TWebBrowser组件可以直接显示网页的内容，因此在用delphi开发程序时，我们可以使用TWebBrowser来展示一些数据，获得更美观专业的效果，提高应用程序的挡次。通常的做法时，做一些静态的页面，TWebBrowser装载这些页面后，再通过delphi填写数据。故需要用到的技术就是如何通过delphi读取或者控制TWebBrowser中内容。其实TWebBr

2008-06-18 10:50:00 1074

原创检测一个URL是否有效

//可用来检测网络连接是否正确，InternetCheckConnection函数检查不准确，有些情况无法检测到，而以下CheckUrl函数则不会。//uses wininet;function CheckUrl(url: string): Boolean; var hSession, hfile, hRequest: hInternet; dwindex, dwcodelen: dword;

2006-02-05 12:42:00 2973 1

原创如何判断网页打开失败

先用InternetCheckConnection判断下uses wininet;if not InternetCheckConnection(pchar(edit1.text), 1, 0) then showmessage(无法打开页面 );

2006-02-04 23:25:00 1581

原创如何在WebBrowser打开的网页链接后直接在WebBrowser打开而不是新弹出一个IE窗口来打开

问题：如何在WebBrowser打开的网页链接后直接在WebBrowser打开而不是新弹出一个IE窗口来打开??? 来自：龙之天涯, 时间：2005-6-3 15:59:41, ID：3093392这个问题很难么??来的兄弟也帮忙顶一下. 来自：jinwe, 时间：2005-6-3 18:40:09, ID：3093609引用一个别人的回答：解决办法：控制打开新的页面在你的程序中，而不是

2006-02-04 18:55:00 11668

原创获取网页的标题

Uses OleCtrls, SHDocVw,mshtml var doc:IHTMLDocument2;ElementGroup:IhtmlElementCollection;HtmlItem:IHTMLElement;begindoc:=WebBrowser1.Document as IHTMLDocument2;ElementGroup:=Doc.all.tags(TI

2006-02-04 17:06:00 1291

原创一个多线程刷页面的程序

//方法就是用5个线程不停的get页面,本来想用access但是发现5个线程常常有的会挂起,于是选择了用文本文件存储待刷的页面地址.主要控件就是IdHTTP这个控件,我在本站前面的文章中已经描述了他的基本用法.这个例子虽然简单,但是稍加改动就可以增加动态IP功能,并做成论坛发贴机之类的东东. unit main; interface uses Windows, Messages, SysUti

2006-02-04 16:12:00 1772

原创搜索引擎分类及工作原理

搜索引擎分类搜索引擎按其工作方式主要可分为两种。一种是严格意义上的搜索引擎（Search Engine），具代表性的有AltaVista、Google、Excite、HotBot、Lycos等。它们都是通过在互联网上提取各个网站的信息来建立自己的数据库，并向用户提供查询服务，因此是真正的搜索引擎。另一种是目录索引（Search Index/Directory）。实际上它们算不上是搜索引擎，仅仅是按

2006-02-04 14:37:00 2835 1

原创 DELPHI字符串分割函数

function SplitString(Source, Deli: string ): TStringList;stdcall; var EndOfCurrentString: byte; StringList:TStringList; begin StringList:=TStringList.Create; while Pos(Deli, Source)>0 do begin EndOfCu

2006-02-02 01:55:00 1923

原创获取网页源代码的最简单办法

获取网页源代码的最简单办法，就是利用 WinInet 单元中的函数： uses WinInet;function GetWebPage(const Url: string):string;varSession,HttpFile:HINTERNET;szSizeBuffer:Pointer;dwLength

2006-01-31 15:27:00 2260

原创为指定的父窗口枚举子窗口、按钮

2006-01-25 14:34:00 7517 2

原创如何获取来访者的IP和来路

解决思路关于服务器、客户端浏览器和访问者的请求信息，都保存在Request对象的ServerVariables集合中。具体步骤代码示例： Response.Write "你的IP："&Request.ServerVariables("REMOTE_ADDR") &"你的来路："&Request.ServerVariables("HTTP_REFERER") %> 注意：如果访问者是通过代理

2005-12-26 20:42:00 3779

原创什么是注入式攻击 (1)

随着B/S模式应用开发的发展，使用这种模式编写应用程序的程序员也越来越多。但是由于程序员的水平及经验也参差不齐，相当大一部分程序员在编写代码的时候，没有对用户输入数据的合法性进行判断，使应用程序存在安全隐患。用户可以提交一段数据库查询代码，根据程序返回的结果，获得某些他想得知的数据，这就是所谓的SQL Injection，即SQL注入。SQL注入是从正常的WWW端口访问，而且表面看起来跟一

2005-12-26 20:32:00 1385

原创自动运行光盘的制作

制作AUTO-CD的关键就是如何编写自动运行信息文件Autorun.inf，它是AUTO-CD所必须的。这个文件的主要作用就是告诉Windows自动运行哪个程序和它的启动路径，并为光盘设置在资源管理器及“我的电脑”中所显示的图标。但是，如果关闭了光驱的自动插入通告功能，则只能使用Shell32.DLL（存于Windows的System目录下）中的默认光盘图标。打开一些AUTO-CD中的Autoru

2005-11-18 21:18:00 2489

原创资源文件的创建和使用

几乎每个Windows应用程序都使用图标、图片、光标等资源。资源是程序的一部分，但是它是不可执行代码。下面我们就详细介绍资源文件在Delphi5中建立和使用方法。1．把资源放到Exe文件的优点由于定位资源比在磁盘中定位文件花费时间少，所以应用程序执行会更快。多种资源可以放在一个文件中，减少了图标、图片、光标等文件数量。保存资源文件时不要和工程名相同，因为Delphi创建工程时会自动创建一个和工程名

2005-11-18 17:14:00 1287

原创从TWebBrowser得到网页源码及Html

下面先介绍一种极其简单的得到TWebBrowser正在访问的网页源码的方法。一般方法是利用TWebBrowser控件中的Document对象提供的IPersistStreamInit接口来实现，具体就是：先检查WebBrowser.Document对象是否有效，无效则退出；然后取得IPersistStreamInit接口，接着取得HTML源码的大小，分配全局堆内存块，建立流，再将HTML文本写到流

2005-08-13 11:07:00 2076

原创提取网页中所有链接

提取连接地址：var doc:IHTMLDocument2; all:IHTMLElementCollection; len,i:integer; item:OleVariant; begin doc:=WebBrowser1 .Document as IHTMLDocument2; all:=doc.Get_links;　　　　　　　　　　　　　//doc.Links亦可 len:=all.le

2005-08-13 10:59:00 2235

原创编程实现网页表单数据的自动提交

相关的资料：MSHTML是微软公司的一个COM组件，该组件封装了HTML语言中的所有元素及其属性，通过其提供的标准接口，可以访问指定网页的所有元素．MSHTML对象模型是由一些对象和集合组成的．处于根部的是HTML，描述了打开页面的1个窗口，包括一系列集合和对象。如Frames集合，History，Location，Navigator，Document，Vi—sum，Event对象等．其中描述呈现

2005-08-13 10:33:00 1939

PuCooV的天空