自定义博客皮肤VIP专享

*博客头图:

格式为PNG、JPG,宽度*高度大于1920*100像素,不超过2MB,主视觉建议放在右侧,请参照线上博客头图

请上传大于1920*100像素的图片!

博客底图:

图片格式为PNG、JPG,不超过1MB,可上下左右平铺至整个背景

栏目图:

图片格式为PNG、JPG,图片宽度*高度为300*38像素,不超过0.5MB

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+

martian6125 's blog!

martian6125的博客

  • 博客(48)
  • 资源 (3)
  • 收藏
  • 关注

原创 Delphi的TRegistry注册表类方法详解

Delphi的TRegistry注册表类方法详解 ●GetDataInfo方法 Function GetDataInfo(const ValueName:String;Var Value:TRegDataInfo):Boolean; TregDataType=(rdunknown,rdstring,rdexpandstring,rdexpandstring...

2006-12-31 15:16:27 138

原创 注册表文件文件格式.reg

关于注册表的操作,常见的是创建、修改、删除。一、创建创建分为两种,一种是创建子项(Subkey)注:如果你对注册表的命名不是很清楚,可以看看注册表命名标准手册(http://www.sometips.com/tips/registryhack/29.htm)我们创建一个文件,内容如下:Windows Registry Editor Version 5.00[HKEY_LOCAL_MA...

2006-12-29 15:26:26 522

原创 注册表分支

HKEY_CURRENT_USER\Software\LeapWare\Registry\LeapFTP 等价于HKEY_USERS\S-1-5-21-448539723-1682526488-1957994488-500\Software\LeapWare\Registry\LeapFTP

2006-12-29 15:17:23 127

原创 不想mdi主窗口的滚动条出现

将Forms.Pas拷贝并加入当前工程;       改写procedure   TCustomForm.CreateWnd;    将        FClientHandle   :=   Windows.CreateWindowEx(WS_EX_CLIENTEDGE,   'MDICLIENT',            nil,   WS_CHILD   or   WS_VISIB...

2006-12-28 15:46:02 218

原创 册表修改方法

册表修改方法通过修改注册表我们可以实现一些特殊的功能,但是注册表又是十分脆弱的,一个不小心就会出现错误。那么我们怎么样来修改注册表呢?我总结为以下几种方法:1.软件修改(安全)通过一些专门的修改工具来修改注册表,比如:MagicSet、TweakUI、WinHacker等等。其实控制面板就是一个这样的工具,只不过功能简单一些。2.间接修改(比较安全)将要修改的写入一个.reg文件中,然后...

2006-12-28 15:44:36 719

原创 以前的某个程序安装已在安装计算机上创建挂起的文件操作.运行安装程序之前必须重新启动计算机...

1.开始菜单,运行,输入regedit.exe打开注册表2.打开注册表编辑器,选择HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager中找到PendingFileRenameOperations项目,并删除它...

2006-12-28 15:27:11 230

原创 解除注册表禁用

REGEDIT4[HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurrentVersionPolicies][HKEY_USERS.DEFAULTSoftwareMicrosoftWindowsCurrentVersionPolicies][HKEY_LOCAL_MACHINESoftwareMicrosoftWindowsCurrentVersion...

2006-12-28 15:26:38 145

原创 解除任务管理器禁用

创建文件 输入REGEDIT4[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System]"DisableTaskmgr"=dword:00000000(空一行)

2006-12-28 15:26:11 165

原创 让程序支持插件

相信各位应该都用过WinAmp,也相信它对插件的支持是它最终流行起来的主要原因。能不能让我们自已的程序也支持插件呢,以面我们就用Delphi来为我们编第一个支持插件的程序。对于一般用户来说,插件就是一个DLL文件,但与一般DLL不同的是,插件支持对主程序功能的扩展,主程序没有插件也一样能运行,但一般的DLL大多数是主程序不可缺少的部份。当需要经常为客户更新应用程序版本时,插件也许是你不错有选择。...

2006-12-25 19:02:24 115

原创 字符串函数大全

【字符串函数大全】      首部 function AnsiResemblesText(const AText, AOther: string): Boolean;      $[StrUtils.pas      功能 返回两个字符串是否相似      说明 ANSI(American National Standards Institute)美国国家标准协会;不区分大小写     ...

2006-12-24 16:20:53 189

原创 delphi中的快捷键大收集

1.SHIFT+鼠标左键 先选中任一控件,按键后可选中窗体(选中控件后按Esc效果一样)2.Shift+F8 调试时弹出CPU窗口。3.Shift+F10 等于鼠标右键(Windows快捷键)。4.Shitf+箭头 选择5.shift +F12 快速查找窗体并打开6.F7 (步进式调试同时追踪进入子过程)7.F8 (步进式调试不进入子过程)8.F9 运行9.F12 ...

2006-12-24 16:20:28 93

原创 MessageBox对话框

MessageBox对话框是比较常用的一个信息对话框,其不仅能够定义显示的信息内容、信息提示图标,而且可以定义按钮组合及对话框的标题,是一个功能齐全的信息对话框信息提示图标,而且可以定义按钮组合及对话框的标题,是一个功能齐全的信息对框。 1、函数原型及参数 function MessageBox(hWnd: HWND; Text, Caption: PChar; Type: Word): In...

2006-12-24 16:19:51 184

原创 FastReport 3.18版For Delphi7安装笔记

//==========  系统环境:  Windows 2003 标装版  Delphi7 + Update 1.1  控件有:  TeeChart 7.04  FastReport 3.18     2005-11-4 by Robot5//==========    安装前请册除原有的FR控件。1. "Tools|Environmet options..."中的"Libr...

2006-12-24 16:18:52 195

原创 DevExpress控件介绍

DevExpress ExpressVerticalGrid Suite 3.12 for Delphi BCB (控件)介绍: 这是一款Delphi和C++ builder控件,inverted网格控件。在ExpressVerticalGrid Suite v3中,引进了许多新特性和新功能,可以帮助您构建易于使用、易于了解、性能良好的应用程序。它可以使您在容器内显示数据集内的单行数据,也可以...

2006-12-24 16:17:44 363

原创 Delphi7控件包详解

DELPHI7安装目录中,BIN文件夹里面的所有.bpl文件对应的控件列举下面是其中的一部分bpl列表说明其中的控件:dclact70.bpl (Borland Actionbar Components)包括的控件:TStandardColorMap、TTwilightColorMap、TXPColorMap、TActionToolBar、TActionManager、TActionMain...

2006-12-24 16:16:32 283

原创 如何判断指定路径下的指定文件是否存在

判断c:\1.txt文件是否存在       if   FileExists('c:\1.txt')   then        ShowMessage('文件存在')    else        ShowMessage('文件不存在');  

2006-12-24 13:38:37 359

原创 ghost形式的XP系统制作方法完全手册

windows XP系统的ghost安装已经有很多高手做成,但是我们这些菜鸟真的没有完全掌握,所以我不死心,拿自己的机器开刀,摸索到了完整的制作方法,如下:1.安装好一个XP系统,安装常用软件到系统盘,使用windows优化大师清理垃圾文件和注册表,用dos启动盘(强烈建议安装XP时使用FAT32分区)启动电脑,把刚才装好的xp系统用ghost备份到系统以外的分区.以防意外时恢复.2.重新启动...

2006-12-23 14:58:30 274

原创 在DBGrid组件中显示和编辑MEMO字段

Delphi之所以能在.net与Java“两座大山”重压之下,至今仍被广大编程爱好者喜爱、支持,究其原因,除了VCL框架设计精妙之外,强大的数据库程序开发能力也是其长盛不衰的关键因素之一。说到数据库开发不能不提到DELPHI中自带的功能强劲的数据感知组件,这些组件中最为常用的当属DBGrid组件,这个组件提供了二维表的数据显示方式,一次提供的信息量大、结构鲜明、一目了然。虽然它有这么多优点,然而“...

2006-12-22 16:37:24 289

原创 使用Delphi启动和关闭外部应用程序

Delphi与Windows平台紧密结合,编译代码快速高效。作为一种可视化的面向对象开发工具,Delphi可以帮助程序员更轻松、更快速地编写各种Windows应用程序。而且通过编程可以方便地调用其它语言编写的动态库或应用程序,并在不需要时关闭这些外部程序。这一点对许多编程人员非常有用,例如,在采用Delphi进行软件开发的同时,可能需要调用以前采用其它工具开发的应用程序,以免再次重新编写代码,或者...

2006-12-22 16:35:42 408

原创 通过InstallShield 还原数据库的DLL

 library DBInstall;{ Important note about DLL memory management: ShareMem must be the  first unit in your library's USES clause AND your project's (select  Project-View Source) USES clause if yo...

2006-12-17 13:28:50 85

原创 在delphi中,如何把MDI工作区的粗边框去掉

在MDI Form中写入如下代码:interfaceTFmMain = class(TForm)...    procedure FormCreate(Sender: TObject);...private...    procedure CreateDefWndProc();    PROCEDURE ClientWndProc(VAR Message: TMess...

2006-12-17 13:27:19 207

原创 jbuilder2006破解方法

破解的方法:把两个jar复制到lib目录,替换以前文件;把另外个文件复制到license重启JB就可以了

2006-12-17 13:23:41 117

原创 主程序与DLL之间的全局变量问题

像用户登陆后的用户名(UserName)...其实这个问题很简单。下面我把我的做法写出来大家一起分享。把共享的变量放在主程序里:UserName,....等等,在主程序里写两个函数Function CurUserName():PChar;beginResult:=pchar(UserName);end;procedure SetCurUserName(LoginUserName: ...

2006-12-17 13:00:14 138

原创 捆绑执行文件

{**********************捆绑执行文件********************************************参考selfmodify--exe文件自修改*****与其它程序捆绑后,图标为其它程序的图标.日期不变这个示范程序没有form,编译、压缩后仅40K,运行后不长驻内存如果加上隐藏的窗体,加上搜索可执行程序的功能,加上监视系统的功能,加上 %$#...

2006-12-17 12:54:38 771

原创 如何使用注册表

如何使用注册表windows的注册表(registry)实质上是一个庞大的数据库,它存储这下面这些内容:软、硬件的有关配置和状态信息,应用程序和资源管理器外壳的初始条件、首选项和卸载数据;计算机的整个系统的设置和各种许可,文件扩展名与应用程序的关联, 硬件的描述、状态和属性;计算机性能纪录和底层的系统状态信息,以及各类其他数据。注册表的结构是:windows为我们提供了一个注册表编辑器(re...

2006-12-16 14:13:28 168

原创 什么是注册表

什么是注册表在windows的开始/运行菜单中输入"regedit"你就可以通过注册表编辑器看到注册表,注册表是什么呢?简单地说,它是用来对windows操作系统进行配置的一个工具.通过它,可以对操作系统及应用软件进行优化,可以自己设置windows的使用权限,可以解决硬件及网络设置不当带来的故障甚至可以改造自己的操作系统.在windows 3.X时代,主要通过WIN.INI及SYSTEM.I...

2006-12-16 14:13:01 226

原创 绑架其它程序

-------unit Unit1;interfaceuses  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,  Dialogs, StdCtrls;type  PEnumInfo = ^TEnumInfo;  TEnumInfo = record  ProcessID : D...

2006-12-15 16:23:39 120

原创 Dbgrid 中表字段所在的列序号

//--------------------------------------------------------------------------------// 功能:返回表字段在 DBGrid 列中的序号,首序号为0// 参数: pDbGrid:TDbGrid;        DBGrid//               pcFieldName : string    数据表字段名...

2006-12-15 16:02:56 180

原创 判断TImage图片的类型

  如果只是判断BMP、JPG、GIF图片,倒是有一个简单的方法,用数据流判断,因为BMP、GIF、JPG格式的文件流有标识符的,分别如下:名称 宽度 标识符BMP 2位 BMJPG 10位 chr($FF)+chr($D8)+chr($FF)+chr($E0)+chr($00)+chr($10)+'JFIF'GIF 3位 GIF通过这种方式可以判断。当然通过DELP...

2006-12-15 15:50:43 134

原创 19条欠扁的短信息

19条欠扁的短信息1.跟你当这么久的朋友,你一直都很关心我,我却时常给你添麻烦,真不知该怎么报答你...所以...下辈子作牛作马....我一定会拔草给你吃的...2.很想你,可是又不好意思打给你,怕你正在忙,怕你不理我,怕你觉得我骚扰,真的好想跟你联络,但是…电话费实在很贵,你打给我吧!---老游击队员3. 如果你是流星我就追定你, 如果你是卫星我就等待你, 如果你是恒星我就会恋上...

2006-12-15 15:48:08 75

原创 ShellExecute问题

ShellExecute问题大家知道,在一个大型复杂的系统中,有时会调用一些外部程序来帮助我们完成某些特定功能。然而,如何打开并关闭这些外部程序呢?也许,这是一个老生常谈的话题,但笔者仍要继续讨论这个问题,原因有二:一是解决这个问题的方法很重要,并经常会遇到;二是大多数参考书提及的解决办法不全面,仍有很多朋友有疑问。一、如何打开一个外部程序:  我们常用的函数有两个,WinExec,...

2006-12-15 14:52:13 196

原创 Treeview连接数据库

代码unit uMain;interfaceuseswindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, ComCtrls, DB, ADODB, StdCtrls, Buttons, ExtCtrls, DBCtrls,Grids, DBGrids, Menus;type...

2006-12-14 15:15:57 138

原创 动态数组介绍

自从有了动态数组,链表除了在教科书里出现外,已经很少在实际编程中被使用了,事实也是如此,数组的确比传统链表快得多,而且也方便的多。 从 Delphi4起,开始了内建各种类型的动态数组支持。但是,对我们来说动态数组支持似乎做的不够彻底,因为Delphi竟然连删除、插入、移动连续元素的函数都没有提供,让人使用起来总觉得不够爽!!! J 。作为一名程序员,我们当然要有自己解决问题的能力,下面就让...

2006-12-14 14:44:46 392

原创 判断TImage图片的类型

  如果只是判断BMP、JPG、GIF图片,倒是有一个简单的方法,用数据流判断,因为BMP、GIF、JPG格式的文件流有标识符的,分别如下:名称 宽度 标识符BMP 2位 BMJPG 10位 chr($FF)+chr($D8)+chr($FF)+chr($E0)+chr($00)+chr($10)+'JFIF'GIF 3位 GIF通过这种方式可以判断。当然通过DELP...

2006-12-14 14:44:00 149

原创 钓子程序代源

usesWindows,SysUtils,Messages,Registry,ShlObj,Types,Classes;constLLKHF_ALTDOWN =KF_ALTDOWN shr 8;WH_KEYBOARD_LL=13; //钩子种类,表示是低级键盘钩子 typePKBDLLHOOKSTRUCT=^KBDLLHOOKSTRUCT;{这个结构包含了一个低级键盘钩子的输入...

2006-12-14 14:42:13 89

原创 有关ADO专题

ADO架构图: 消费者(Recordset) 提供者 消费者 提供者程应 ↗ ↘ OLEDB ←→ 服务器件 ←→ OLEDB ←→ 数据库keyset Cursor与Dynamic Cursor的执行过程:1、 数据库只把记录的键值放入结果数据集中2、 ADO Cursor Engine存取客户需要的记录3、 OLE Provider再根据结果数据集中的键值字段到...

2006-12-14 14:41:53 81

原创 Delphi程序设计之--惯用法

Delphi --技巧探索:{ No. 1 }创建模式窗体的句子:class procedure TMyForm.RunForm(AObj1, AObj2: TObject);varvForm: TMyForm;beginvForm := TMyForm.Create(Application);with vForm doTryInitForm(AObj1, AObj2);Sh...

2006-12-14 14:41:04 61

原创 delphi函数大集合

名称 类型 说明----------------------------------------------------------------------------------Abort 函数 引起放弃的意外处理Abs 函数 绝对值函数AddExitProc 函数 将一过程添加到运行时库的结束过程表中Addr 函数 返回指定对象的地址AdjustLineBreaks 函数 将给定字...

2006-12-14 14:39:21 63

原创 人民币大小写转换delphi函数

Function NtoC(n0 :real) :String;Function IIF(b :boolean; s1,s2:string):string;begin //本函数在VFP和VB中均为系统内部函数if b then IIF:=s1 else IIF:=s2;end;Const c = '零壹贰叁肆伍陆柒捌玖◇分角圆拾佰仟万拾佰仟亿拾佰仟万';var L,i,n, code...

2006-12-14 14:38:34 201

原创 使用SQLSERVER的扩展存储过程实现远程备份与恢复

使用SQLSERVER的扩展存储过程实现远程备份与恢复 选择自 aloesky 的 Blog关键字 使用SQLSERVER的扩展存储过程实现远程备份与恢复出处最近我在为公司的框架程序(以数据应用为导向的应用体系)做数据管理模块,这个模块的需求比较简单:备份、恢复和清理日志。我公司的软件基本上以C/S为基本架构,所以数据管理模块中两个主要的功能‘备份与恢复’都可能会在Client端操作,备份与...

2006-12-14 14:38:05 63

获取硬盘ID号(物理ID号)

获取硬盘ID号(物理ID号),可为用硬盘序列号做注册的程序提供参考

2009-02-24

(水木清华)Delphi精华

delphi的一些适用技巧,从其他网上下的,希望对初学者有所帮助

2008-10-15

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

提示
确定要删除当前文章?
取消 删除