mrwu9902的专栏

www.u8686.com-信息发布平台如何用Delphi调用IE打开网页//调用相应程序打开uses ShellAPI;procedure TForm1.Button1Click(Sender: TObject);begin//用IE打开ShellExecute(Handle, open, IExplore.EXE, about:blank, nil, SW_SHOWNO

比如操作 优快云的登录 先用WebBrowser定位到登录页面 WebBrowser1.Navigate(http://passport.youkuaiyun.com/UserLogin.aspx?from=http://community.youkuaiyun.com/); 然后，看其HTML源代码，发现 名字为 ctl00$CPH_Content$tb_LoginNameOrLoginEmail的元素就是 其用

Delphi用WebBrowser编程-自动登录操作2009年08月18日 星期二 00:39利用Delphi的Olevariant类型--------------------------------------------------------------------------------单个frames的输入varo : Olevariant;begino := W

delphi中Webbrowser的使用1.获得网页中变量值     htm中 var currID=123     程序中可以这么调用 id := Form1.WebBrowser1.OleObject.Document.script.currID     值得说明的是,变量可以是javascript定义的,也可以是vbscript定义的,如果Webbrowser1中找不到该变量,调用会触发一个

封装Ftp   API函数，实现上传，下载文件，创建目录 //-------------------------------------------------------------------------     //   文件名：WLFtp.pas     //   描述：封装Ftp   API函数，实现上传，下载文件，创建目录     //     //   类名：TWLFtp  

  function EnumFileInRecursion(path:PChar):LongInt;stdcall;var    searchRec:TSearchRec;    found:Integer;    tmpStr:String;    i:integer;begin    i:=1;    Result:=0; //查找结果(文件数)    //加上搜索后缀,得到类似c

读取word标题信息   unit Unit1;interfaceuses  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,  Dialogs, StdCtrls, Comobj;const  wdPropertyTitle = $00000001; wdPropertyS

if not FileExists(文件名) then                   保存           else                   showmessage(文件已经存在);

再谈word2003编程技术要领 2009-11-20 11:54:52 阅读96 评论0 字号：大中小     近期因为项目需要,写了许多word2003编程的东东.有时候遇到难题想查sdk说明,很难找到中文解释,对于e文不好的我来说,简直是天书.想必很多人多有感慨.    下面列出内容是一些常用的内容说明,希望对大家有帮助.    那就开始吧注意，下文的WAPP是我定义的word文档工

Word模板的制作方法和内容定位识别技术 摘要  本文提出了Word模板的4种制作方法，并对每种方法的具体制作和使用进行了详细论述，最后比较了4种方法的优缺点和适用场合，并提出了Word模板格式的保护方法。关键词  Word、模板、定位 Word不但具有无与伦比的图文处理能力，同时也提供了Word层次结构的对象，使用户可以用VBA或者第三方软件开发工具实现文档自动化。COM技术

Delphi操作Wrod的几个知识点 //-------------------初始化-------------------- var  wApp,work:Variant;  try   wApp:=GetActiveOleObject(word.Application);  except   wApp:=CreateOleObject(word.Application)

 delphi操作word 一、Delphi程序启动Word采用CreateOleObjects的方法来启动Word，调用VBA代码，具体实现过程为：首先使用GetActiveOleObject('Word.Application')判断当前内存中是否存在Word程序，如果存在，则直接连接，如果没有Word程序，则使用CreateOleObject('Word.A

      Delphi＋Word解决方案参考     这是我做项目过程中自己做的几个函数，见到大家都在问Word的问题。现在拿出来和大家共享。（希望有朋友可以进一步添加新的功能，或者做成包或者lib等，更方便大家使用。我自己是没有时间啦，呵呵） 使用前，先根据需要建立一个空的WORD文件作为模板，在模板文件中设置好各种格式和文本。另外，其中的PrnWordTable的参数是TDBGrid

Delphi中的数据添加到Word模板的相应位置 就跟将数据导入Excel一样，在运行Delphi程序时，点击预览按钮后，会打开一Word模板,且将数据填入此Word模板相应的位置，此Word模板为一报表形式的表格 --------------------------------------------------------------- 方法一：用Word的查找替换填写数据。 ----

Demonstration: Manipulating the Clipboard in DelphiFebruary 28, 2006Here’s a quick demonstration of how easy programming is in Delphi.This small app allows you to copy text and past it again rig

Delphi控制PowerPoint完整的例子

DELPHI控制PowerPoint 有一大批PPT文件，想对每一个PPT文件采集其中一页，转换成Jpg或Gif文件，这样可以通过图像浏览软件迅速找到想要的PPT文件，也可以做成相册之类的集中直观地浏览这些PPT文件。大概是这个想法。所以查了一些资料，用DELPHI控制PowerPoint，打开某个PPT文件，然后用程序自动提取其中的一页，转换成图像文件。发现还是比较容易的

procedure Delay(msecs:integer);var Tick: DWord;Event: THandle;beginEvent := CreateEvent(nil, False, False, nil);try    Tick := GetTickCount + DWord(msecs);    while (msecs > 0) and (MsgWaitForMultiple

procedure TForm1.Button2Click(Sender: TObject);var  o : Olevariant;begin    webbrowser1.Navigate(http://www.163.com);     delay(2000);   o :=   WebBrowser1.OleObject.document.all.item(username,0);

www.u8686.com-信息发布平台Delphi字符串加密解密函数 作用：可用作密码的和一些重要参数的保存，数据经加密后保存即使被人看到了也无防。首先定义一个常量数组const       XorKey:array[0..7] of Byte=($B2,$09,$AA,$55,$93,$6D,$84,$47); //字符串加密用然后在程序里加入以下两个函数：fu

www.u8686.com-信息发布平台Delphi正则表达式使用方法（TPerlRegEx）使用Delphi开发软件无疑是一种比较高效率的方式，完全对象的语言，严格控制的语法，可视化开发环境的性能，编译器的速度和已编译代码的效率，编程语言的功能及其复杂性，数据库结构的灵活性和可扩展性，框架对设计和使用模式的扩充无疑都是delphi身上的光芒。      最近飘易使用Delphi开

www.u8686.com-信息发布平台Delphi 正则表达式之TPerlRegEx 类的属性与方法(4): Replace// Replacevar reg: TPerlRegEx;begin reg := TPerlRegEx.Create(nil); reg.RegEx := ab; reg.Replacement := ◆;

www.u8686.com-信息发布平台Delphi 正则表达式之TPerlRegEx 类的属性与方法(5): Compile、Study// Compile、Studyvar reg: TPerlRegEx;begin reg := TPerlRegEx.Create(nil); reg.RegEx := ab; reg.Options

www.u8686.com-信息发布平台Delphi 正则表达式语法(5): 边界// /b 单词边界var reg: TPerlRegEx;begin reg := TPerlRegEx.Create(nil); reg.Subject := Delphi Delphi2007 MyDelphi; reg.RegEx := /bDe

www.u8686.com-信息发布平台Combobox中加载图片...draw Bitmaps in a TComboBox?  // This code works also with a TListBoxvar  Bitmap1, Bitmap2, Bitmap3, Bitmap4: TBitmap;procedure TForm1.FormCreate(Sender: TO

www.u8686.com-信息发布平台Delphi 正则表达式之TPerlRegEx 类的属性与方法(1): 查找//查找是否存在var  reg: TPerlRegEx;begin  reg := TPerlRegEx.Create(nil);  reg.Subject := CodeGear Delphi 2007 for Win32;  reg.RegEx   := /d;

www.u8686.com-信息发布平台Delphi 正则表达式之TPerlRegEx 类的属性与方法(2): 关于子表达式// MatchedExpression 与 SubExpressions[0]var reg: TPerlRegEx;begin reg := TPerlRegEx.Create(nil); reg.Subject := Code

www.u8686.com-信息发布平台Delphi 正则表达式之TPerlRegEx 类的属性与方法(3): Start、Stop//设定搜索范围: Start、Stopvar reg: TPerlRegEx;begin reg := TPerlRegEx.Create(nil); reg.Subject := ababab; reg.Re

 www.u8686.com-信息发布平台Delphi 正则表达式之TPerlRegEx 类的属性与方法(6): EscapeRegExChars 函数// EscapeRegExChars 函数可以自动为特殊字符加转义符号 /var reg: TPerlRegEx;begin reg := TPerlRegEx.Create(nil); reg.Su

www.u8686.com-信息发布平台Delphi 正则表达式语法(3): 匹配范围 // [A-Z]: 匹配所有大写字母var reg: TPerlRegEx;begin reg := TPerlRegEx.Create(nil); reg.Subject := CodeGear Delphi 2007 for Win32; reg.Re

www.u8686.com-信息发布平台Delphi 正则表达式语法(4): 常用转义字符与 .// /d 匹配所有数字, 相当于 [0-9]var reg: TPerlRegEx;begin reg := TPerlRegEx.Create(nil); reg.Subject := 期待Delphi 2008 for Win32！; reg

SelectDirectory example  This example uses a button and a label on a form. When the user clicks the button, a Select Directory dialog box appears. The current directory displayed in the dialog b

生成固定位数的随机数 //生成固定位数的随机数Function getRandom(n:integer):string;var  i:integer;begin  randomize;  for i:=1 to n do  begin       result:=result+inttostr(random(10));  end;end;

VclZip使用 procedure TForm1.Button1Click(Sender: TObject);var  ZippedCount: Integer;begin  with VCLZip1 do  begin    ZipName:= c:/test;    Password:= Simon.Hu;    Recurse:= True;    FilesList.

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

一、IDHTTP的基本用法IDHttp和WebBrowser一样，都可以实现抓取远端网页的功能，但是http方式更快、更节约资源，缺点是需要手动维护cook，连接等IDHttp的创建，需要引入IDHttpprocedure InitHttp();begin    http := TIdHTTP.Create(nil);    http.ReadTimeout := 30