Delphi源程序格式书写规范（一）（2）

2016年07月27日 73 阅读

Delphi源程序格式书写规范（一）（2）2007-05-083.3 变量3.3.1 变量命名及格式首先所有变量必须起有意义的名字，使其它组员可以很容易读懂变量所代表的意义，变量命名可以采用同义的英文命名，可使用几个英文单词，但每一单词的首字母必须大写。例如： var WriteFormat:：string；同时对于一些特定类型可采用一定的简写如下：指针类型 P 纪录类型 Rec 数组类型 Arr 类 Class循环控制变量通常使用单一的字符如：i, j,...

Delphi源程序格式书写规范（一）（3）

2016年07月27日 61 阅读

Delphi源程序格式书写规范（一）（3）2007-05-083.4.3 枚举类型枚举类型的名字必须有意义并且类型的名字之前要加前缀‘T’。枚举类型的内容的名字必须包含枚举类型名称的简写，例如：TSongType = （stRock, stClassical, stCountry, stAlternative, stHeavyMetal, stRB）;3.4.4 数组类型数组类型的名字必须有意义并且类型的名字之前要加前缀&lsquo...

Delphi源程序格式书写规范（二）

2016年07月27日 61 阅读

Delphi源程序格式书写规范（二）2007-05-083.6 属性3.6.1 命名及格式同其用操作的，出去前缀‘F’的类的变量的名称相一致 。3.7 文件3.7.1项目文件3.7.1.1项目目录结构程序主目录--Bin（应用程序所在路径）-Db（本地数据库所在路径）-Doc（文档所在路径）-Hlp（帮助文件所在路径）-Backup（备份路径）-Tmp（临时文件路径）3.7.1.2命名项目文件必须使用一个有意义的名字。例如： Del...

Delphi源程序格式书写规范（三）

2016年07月27日 70 阅读

Delphi源程序格式书写规范（三）2007-05-083.8.2.5 Internet Tabcsk TClientSocketssk TServerSocketwbd TWebDispatcherpp TPageProducertp TQueryTableProducerdstp TDataSetTableProducernmdt TNMDayTimenec TNMEchonf TNMFingernftp TNMFtpnhttp TNMHttpnMsg...

用Delphi实现对光驱盘盒的开关控制（一）

2016年07月27日 66 阅读

用Delphi实现对光驱盘盒的开关控制（一）2007-05-08摘要 介绍在Delphi编程环境下实现开启光驱盘盒的主要技术和方法，该程序以托盘方式驻留状态栏中，可以设置为随系统启动而启动，不但能够控制一个光驱，而且还能动态检测某台电脑上的光驱数目，创建相应的控制菜单，实现有选择性控制光驱。 关键词 Delphi程序 光驱控制 弹出菜单 过程 事件 引言 通常，我们打开和关闭光驱是通过按动光驱上开关按钮来实现的，但有时候手动方式显得很不方便，尤其是在...

用Delphi实现对光驱盘盒的开关控制（二）

2016年07月27日 55 阅读

用Delphi实现对光驱盘盒的开关控制（二）2007-05-082）打开CDROM盒的函数function OpenCDROM（Drive:pChar）:Boolean; // 打开CDROMvar Res:MciError; OpenParm:TMCI_OPEN_Parms; Flags:Dword; s:string; DeviceID:Word;begin Result:=false; s:=Drive+":"; flags:=mci_Open_Ty...

用Delphi实现对光驱盘盒的开关控制（三）

2016年07月27日 73 阅读

用Delphi实现对光驱盘盒的开关控制（三）2007-05-085）程序自动执行无效的菜单鼠标事件procedure TForm1.mNotautorunClick（Sender: TObject）;var Reg: TRegistry;begin Reg:=TRegistry.Create; try Reg.RootKey:=HKEY_LOCAL_MACHINE; if （Reg.OpenKey（"SoftwareMicrosoftWindowsCu...

Delphi编程播放无声音的AVI动画

2016年07月27日 61 阅读

Delphi编程播放无声音的AVI动画2007-05-08本实例将演示如何在程序运行过程中放映没有声音的AVI动画文件。 向窗体上添加一个TAnimate组件，并且设置它的CommonAVI属性为aviCopyFile，这样在TAnimate组件中就会显示拷贝文件的动画。添加组件后的窗体如图1所示。图1 添加组件后的窗体 在窗体的初始化过程中添加以下代码：procedure TForm1.FormCreate（Sender: TObject）;beg...

Delphi中利用钩子实现QQ聊天窗口的修改

2016年07月27日 63 阅读

Delphi中利用钩子实现QQ聊天窗口的修改2007-05-08有人曾为公司不让用QQ、MSN等聊天工具而烦恼吗？看了下面的小程序你就会打消这种看法了。 当初公司做校园一卡通的项目时，里面的机房客户端需要用到系统的低级键盘钩子WH_KEYBOARD_LL，这也是我第一次接触到Windows中的Hook，因为WH_KEYBOARD_LL和其他钩子不一样，在Delphi的Windows帮助以及windows.pas文件中都没有定义，但microsoft的ms...

Delphi实现提取可执行文件内部所有图标

2016年07月27日 59 阅读

Delphi实现提取可执行文件内部所有图标2007-05-08本实例实现的功能是能够从用户选择的可执行文件（后缀名为exe）中提取所有图标并且显示在窗体上。 在窗体中添加TImage 组件、TOpenDialog组件和TButton组件，TImage组件充当显示文件内图标的容器，TOpenDialog组件和TButton组件用来激活提示用户选择GIF动画的对话框。添加组件后的窗体如图1所示。图1 添加组件后的窗体 首先在窗体的uses段中添加Shel...

BCB/Delphi相关文件扩展名介绍

2016年07月27日 61 阅读

BCB/Delphi相关文件扩展名介绍2007-10-08 ccrun.com Shenloqi整理了一下用Delphi作的程序的源代码中常见的文件扩展名，并给出了这些文件扩展名的意义，以便源代码管理时作为参照，扩展名以字母为序（不需要进源代码库不表示不需要进库）。~*Delphi生成的备份文件，在版本控制库及发布代码中不应该出现这些文件，如果修改了某个文件却因某些原因没有保存的话，可以尝试使用这些文件恢复。bmp/wmf/emf/gif/jpg/pcx/...

Delphi中为TreeView添加单选框和复选框

2016年07月27日 69 阅读

Delphi中为TreeView添加单选框和复选框2007-10-15 天极 小刀轻舞打开电脑，进入Windows操作系统，在资源管理器的左边栏中清楚地显示了系统管理的所有磁盘的信息以及各个磁盘所容纳的文件与文件夹（如图一）。这种常见的显示方式是由一个根节点和若干个子节点构成的，这被称为“树形结构”。这种树形结构的用途非常广泛，在很多常用软件中都出现过它的身影。Windows中将这种结构封装为“树形控件”，即...

Delphi中用API实现MSN信息提示

2016年07月27日 60 阅读

Delphi中用API实现MSN信息提示2007-10-15我是比较喜欢用MSN的，因为它的信息提示比较独特，所有的聊天软件都是弹出一个常规的WINDOWS对话框，而它却好像是从任务栏里冒出来的。想想了，在DELPHI这样的纯OOP工具里加一个API应该不难实现，花了十来分钟终于搞出来了，以下是实现方法：1、建立一个APPLICATION，将两个按钮放置到主窗体FROM1中，分别为button1和button2。button1.caption:=&prim...

Delphi全面控制Windows任务栏

2016年07月27日 59 阅读

Delphi全面控制Windows任务栏2007-10-15韩莹使用Windows95/NT/98操作系统的用户知道：正常启动后,在电脑屏幕下方出现一块 任务栏。从系统功能角度而言,整个任务栏包括几个不同的子区域,从左至右依次是：开始 按钮、应用程序切换区（Application Switch Bar）、任务栏通知区（Notification Area）以 及任务栏时钟。与其它Windows应用程序相同,任务栏程序（systray.exe）由几个不同的窗体...

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

2016年07月27日 65 阅读

Delphi在DBGrid组件中显示和编辑MEMO字段2007-10-15 天极 小刀轻舞 Delphi之所以能在.NET与JAVA“两座大山”重压之下，至今仍被广大编程爱好者喜爱、支持，究其原因，除了VCL框架设计精妙之外，强大的数据库程序开发能力也是其长盛不衰的关键因素之一。说到数据库开发不能不提到DELPHI中自带的功能强劲的数据感知组件，这些组件中最为常用的当属DBGrid组件，这个组件提供了二维表的数据显示方式，一次提供的...

DELPHI在状态栏中显示进程条

2016年07月27日 63 阅读

DELPHI在状态栏中显示进程条2007-10-15 天极 小刀轻舞经常上网的朋友可能早就已经发现，在一些浏览器的底部会在某些情况下动态显示一个进程条，比如在显示网页的时候，如果时间比较长，就会出现一个一格一格前进的，用以提醒用户已经有多少数据被下传下来。它不仅仅出现在浏览器中，还经常被用于下载软件中，比如现在最热门的BT下载软件，都使用了这一技术。技术的改进源于工作的需要，现在编写网络软件那么流行，上面的小技巧应该是每个像我们这样的编程爱好者都需要的吧。...

Delphi实现24位真彩色图标

2016年07月27日 64 阅读

Delphi实现24位真彩色图标2007-10-15 计算机与信息技术 李金刚引言Delphi是目前广泛使用的可视化开发工具，它自身带有一个图片、图标的编辑器——Image Editor，但是到Delphi7为止，都不能进行真彩图标的编辑，可以说是一个遗憾。笔者通过对图标文件的研究，实现了产生24位真彩色图标。图标文件的格式首先，分析一个具体的图标 。在CS1.6中有一个图标game.ico（ ），如果用WinHex等可以进行16进...

Delphi为窗体的系统菜单中添加选项

2016年07月27日 63 阅读

Delphi为窗体的系统菜单中添加选项2007-10-15通常在应用程序中，如果单击标题栏的左侧图标，就会弹出一个窗体的系统菜单，在其中可以完成最小化、最大化和关闭等操作。本实例将演示如何在窗体的系统菜单中添加自己的选项。在窗体中添加一个TMainMenu组件，其中TMainMenu组件中的选项将要被添加到窗体的系统菜单中。添加组件后的窗体如图1所示。图1 添加组件后的窗体在TMainMenu组件生成的菜单中添加一个File菜单，在这个菜单下面添加一个Ex...

为Delphi程序添加自动滚动工具栏

2016年07月27日 65 阅读

为Delphi程序添加自动滚动工具栏2007-10-15本实例制作一个可以自动滚动的工具栏。在窗体中添加一个TImageList组件，并且为它添加几个图像文件。然后添加一个TToolBar组件，设置TToolBar组件的Images属性为TImageList组件，在TToolBar组件上右击，在弹出的快捷菜单中选择New Button项，为TToolBar组件添加几个按钮，并设置按钮的ImageIndex属性分别对应TImageList组件中的图像索引编号...

Delphi编程使程序不在系统任务条上出现

2016年07月27日 63 阅读

Delphi编程使程序不在系统任务条上出现2007-10-15本实例介绍如何使程序不在系统任务条上出现。程序的初始化过程，即在窗体的FormCreate（）事件中添加代码。在程序设计阶段，用鼠标的左键双击窗体上的空白处，在屏幕上就会弹出一个代码窗口，把光标移动到FormCreate（）过程的处理代码中，并且添加如下代码：procedure TForm1.FormCreate（Sender: TObject）;begin SetWindowLong（App...