2008年10月_fhfanxin

12月 11月 10月 08月 07月

原创自己写的两个Excel 函数

Unit excel;interfaceUsesWindows,ActiveX,Messages,SysUtils,Classes,Graphics,Controls,Forms,Dialogs,StdCtrls,ComObj;{ ComObj是操作OLE对象的函数集}function ReadExcel(filename:string;sheet:string;Rows:Integ

2008-10-30 23:38:00 1075

原创利用ComObj 控制 Excel 的相关函数

(一) 使用动态创建的方法首先创建 Excel 对象，使用ComObj:var ExcelApp: Variant;ExcelApp := CreateOleObject( Excel.Application );1) 显示当前窗口：ExcelApp.Visible := True;2) 更改 Excel 标题栏：ExcelApp.Caption := 应用程序调

2008-10-30 23:34:00 4096

原创 Delphi代码标准文档

Delphi代码标准文档Revision 1.0.0.5编者：Riceball(riceball@cq118.com) 本文主要基于“Delphi Development Guide”一书的代码标准部分而来，编者参考其它的Delphi代码标准规范，以及结合现目前Delphi社区中流行的程序书写惯例，作了一些修改和裁剪，你也可以根据自己的需要进行裁剪和修改。如果你有什么建议，或是希望编者

2008-10-30 17:23:00 788

原创相对路径的取得方法

使用命令提示符，输入SET，就可以得到了。使用时，加%%就行（例：%systemdrive%）

2008-10-29 06:29:00 608

原创 OPENFILENAME结构

OPENFILENAMEOPENFILENAME结构包含了GetOpenFileName和GetSaveFileName函数用来初始化打开或另存为对话框的信息。在用户关闭对话框后，系统返回关于用户的选择信息到这个结构中。typedef struct tagOFN { DWORD lStructSize; HWND hwndOwner;

2008-10-29 06:15:00 570

原创妙用HOST:屏蔽网站建立网站映射

最初想到利用Hosts文件是基于学校跨网段访问网页时用IP地址访问带来的不便：学校教学网系统分成四个网段，包括三个学生机房网段和一个办公室教师用机网段，服务器没有使用DNS。办公室教师机有的开了PWS(个人Web服务器)，教师在同一网段中输入Host Name(主机名)即可顺利访问网页，但在学生机房要访问教师Web页，必须使用IP地址。 Hosts是Windows

2008-10-20 11:48:00 896

原创 VBScript中的正则表达式语法详解

文章作者：勇敢的风 [E.S.T顾问团] RegExp属性GlobalIgnoreCasePatternRegExp方法ExecuteReplaceTestRegExp对象MatchMatch属性 FirstIndex Length ValueRegExp集合Matches SubMatches 我在学习正则表达式的时候根本不知何谓正则表达式

2008-10-04 09:30:00 855