Delphi下QQ窗体自动隐藏探索

2016年07月27日 52 阅读

Delphi下QQ窗体自动隐藏探索2007-10-15cobi腾讯QQ是当前流行的网络聊天工具之一，由于它在应用设计上有很多独特之处，所以也吸引了很多程序员对之进行研究和模仿。在这里，我将利用Delphi对QQ的窗体自动隐藏效果提出自己的实现方法。一、问题的提出熟悉QQ使用的朋友都知道，当QQ窗体区域超出屏幕四边时，窗体就会自动“消失”，只留下窗体一边的小部分显露在桌面上。当用鼠标移动到显露部分之上，窗体就会在隐藏位置重新完整显示；...

Delphi编程模拟鼠标操作

2016年07月27日 51 阅读

Delphi编程模拟鼠标操作2007-10-15本实例介绍如何在自己的程序里面模拟鼠标的常用操作。首先启动一个新的项目，在空白的窗体上添加4个TButton组件。添加组件后的窗体如图1所示。图1 添加组件后的窗体这4个按钮分别用于模仿鼠标的4个动作——移动鼠标到指定位置、左键单击、左键双击和右键单击。下面以鼠标左键单击为例来说明如何模拟鼠标操作：procedure TForm1.btnLClickClick（Sender: TObj...

Delphi设计多边形窗体

2016年07月27日 58 阅读

Delphi设计多边形窗体2007-10-15本文将介绍如何利用提供的制作界面函数制作一个多边形窗体。制作多边形窗体的关键在于设定多边形的区域，并根据这个指定的区域改变窗体的形状。Windows的CreatePolygonRgn和SetWindowRgn函数可以解决这两个难点。利用以下代码即可将窗体设置为一个五边形：procedure TForm1.FormCreate（Sender: TObject）; var pt: array [0..4] o...

Delphi实现QQ窗体的缩入伸出功能

2016年07月27日 48 阅读

Delphi实现QQ窗体的缩入伸出功能2007-10-15不知道大家在使用QQ时有没有想到它的缩入伸出的功能是如何实现的呢？实现这个效果的关键在于如何判断当前鼠标指针下面的窗体是不是我们的程序窗体。GetCursorPos（）是一个可以获得鼠标指针在屏幕中的坐标的API函数，利用它与FindVCLWindow（）的结合就可以轻易地获得鼠标指针下的VCL可视组件，但当一个窗体中不只一个VCL可视组件，例如可能还有TPanel、TMemo等等类型时，那么我们就...

Delphi实现DBGrid列宽度自动调整

2016年07月27日 53 阅读

Delphi实现DBGrid列宽度自动调整2007-10-15 天极 小刀轻舞大多数程序设计的爱好者选择并使用Delphi来编写软件，都是被其中丰富而功能强大的VCL控件所吸引。Delphi自带的数据感知（Data-Aware）控件，更是成为开发MIS软件的程序员之首选。在那么多数据感知控件中，TDBGrid由于其使用方便、显示信息量大成为最引人注目的一员，大量的国内外软件中都出现了它的身影。或许是由于使用的人多了，对于它的期望也会更高，永远追求无限趋向于...

Delphi实现快闪窗体信息提示

2016年07月27日 46 阅读

Delphi实现快闪窗体信息提示2007-10-15 电脑报 小霖大家都用过PhotoShop或Adobe Reader，它们启动的时候先显示的窗体就称做快闪窗体。虽然Word等软件也有快闪窗体，但是只要你稍微注意一下就会发现前者有动态信息提示，后者没有。PhotoShop或Adobe Reader启动时会在快闪窗体上不断变换显示信息提示，如“正在加载字体”、“正在加载画笔”、“正在初始化&rdq...

Delphi设计PhotoShop型弹出菜单

2016年07月27日 48 阅读

Delphi设计PhotoShop型弹出菜单2007-10-15 电脑报 二羊照开大家都知道，使用Delphi的TPopupMenu构件可以制作弹出式菜单。但是我们如何才能制作出类似Photoshop中各种样式的弹出式菜单呢？（比如，Photoshop的笔刷形状选择菜单，见图）制作方法如下：1.打开Delphi， 在Form1中放置一个TButton构件。2.新建一个窗体，使用默认名字Form2。3.将Form2的BorderStyle属性设置为bsNon...

Delphi控制Excel生成报表

2016年07月27日 74 阅读

Delphi控制Excel生成报表2007-10-15赵中凯 梅国建摘 要：Excel是当前最流行的数据报表制作工具。本文介绍如何使用Delphi来控制Excel完成数据库与报表之间的数据交换，讨论了报表制作工程中的一些细节性问题。1 引言数据报表作为企事业单位上报和下达的重要信息载体，随着信息化建设的不断推进，在实际的工作中得到了前所未有的应用。因此，数据报表已经成为管理信息系统中重要的一项功能，并且，由于数据的多样性和统计信息的增加，数据报表的系统实现...

Delphi模拟最小化恢复关闭按纽

2016年07月27日 51 阅读

Delphi模拟最小化恢复关闭按纽2007-10-15 天极 史俊武我们做多文档应用程序开发时,如果在主From中指定mainMenu时,在主菜单上右角上会自动出现最小化,恢复,关闭按纽,但主菜单放入Toolbar等中时,该三个按纽不会自动出现,因此需要编程实现。实现原理:按纽的实现,从Tbitbtn继承下来最理想,但需要过滤TbitBtn的焦点响应消息,使其不能获得焦点状态。按纽的功能的实现是比较关键的,Delphi中提供了标准action对象（Twin...

也谈Delphi中TTreeView、TListView用法

2016年07月27日 44 阅读

也谈Delphi中TTreeView、TListView用法2007-10-15这段时间，由于要解决一个技术问题，整天都在网上跑这跑那的查资料。由于我主要用Delphi作为开发工具，所以，各IT网站的Delphi分类文档我也看了看，并收获良多。在那几百篇文档中，有几篇文档论及了Vcl库中的TTreeView与TListView的用法。讲TreeView时，主要是讲建树的方法及数据结构；讲ListView时，主要讲了支持文件拖动等。今天，我想以TTreeVi...

Delphi设计可中/英文切换的界面技巧

2016年07月27日 49 阅读

Delphi设计可中/英文切换的界面技巧2007-10-15在一些软件中，我们经常会看到界面语言切换功能，不过程序需要的这些各国语言信息都封装在DLL中，有的也存储在INI文件中，下面我就向大家介绍一个小技巧，在DELPHI中不需要任何DLL文件和INI文件，就可以实现此功能。首先新建一工程，然后在窗体FORM1中加入一些控件，在这里我假设加入了如下控件：三个TBUTTON按钮，两个TCHECKBOX，一个TGROUPBOX和一个菜单。然后把他们的CAPT...

Delphi制作动态菜单

2016年07月27日 49 阅读

Delphi制作动态菜单2007-10-15所谓动态菜单是指菜单项随着程序的操作变化而变化。现在，我们用Delphi来实现这一功能，具体步骤如下：1．首先，确定动态菜单的数据来源，即要确定动态菜单标题是来自Windows的系统注册表，还是来自一个数据库，或者是来自一个子目录，主要由程序的功能而定。这里假设主窗口名为MainForm，上面已有主菜单，其动态菜单的数据源是一个String（字符串）类型的变量，名称为SubMenuItemSource。2．确定生...

关于Delphi的ListView的使用

2016年07月27日 47 阅读

关于Delphi的ListView的使用2007-10-15ListView1.Items 为标准 Tlistitems类ListView1.Items（1）赋值with ListView1.Items.Add dobeginCaption:=caption; //添加第一项SubItems.add（aaaaa）; //添加后面数据SubItems.add（1234）;SubItems.add（1234）;end; //一定要使用WITH结构.（2）取值l...

delphi编程生成非矩形窗口

2016年07月27日 47 阅读

delphi编程生成非矩形窗口2007-10-15四四方方的窗体也会变形，利用win32 API函数setwindowrgn就可以将窗口定义为任何形状，以下是将窗口定义为园角矩形的例子：procedure TPortForm.FormCreate（Sender: TObject）;var hr :thandle;beginhr:=createroundrectrgn（0,0,width,height,20,20）;//定义园角矩形（win API函数）se...

用Delphi隐藏桌面上的图标

2016年07月27日 49 阅读

用Delphi隐藏桌面上的图标2007-10-15使桌面上的图标消失，连桌面上的右键功能也不能使用如果不让初学者乱用“我的电脑”的话，那么把程序放到“启动”里，顺便把“Windows资源管理器”也去掉，再加上个多用户密码，那么想破坏电脑文件也无从下手了。varhDesktop : THandle;beginhDesktop := FindWindow（"Progman", nil）;S...

Delphi中用FastReport制作报表

2016年07月27日 44 阅读

Delphi中用FastReport制作报表2007-10-15 电脑报 王绍明报表作为信息的典型输出形式之一，是大多数应用系统特别是MIS系统的重要功能。是否具有一个良好的打印功能，往往从一定程度上关系到系统的成败。Delphi有很强的报表功能，但是它的报表功能还不能满足我们的需要。于是许多Delphi高手相继推出了不少优秀的报表控件（模块），作为QuickReport的补充，其中FastReport就是一个代表。FastReport综合了QuickRe...

Delphi完成网络页面表单数据地自动提交

2016年07月27日 47 阅读

Delphi完成网络页面表单数据地自动提交2007-11-16MSHTML是微软公司的一个COM组件，该组件封装了语言中的所有元素及其属性，通过其提供的标准接口，可以访问指定网页的所有元素．MSHTML对象模型是由一些对象和集合组成的．处于根部的是HTML，描述了打开页面的1个窗口，包括一系列集合和对象。如Frames集合，History，Location，Navigator，Document，Vi—sum，Event对象等．其中描述呈现在客户...

Delphi编写网络程序的安全措施

2016年07月27日 58 阅读

Delphi编写网络程序的安全措施2007-11-16一、 原理目前进行数据加密的方法很多，对数据的保护起到一定的作用。但如果采用固定的密钥或是密钥随数据一起传送，则均不能达到令人满意的保密效果。在实践过程中，我摸索出了一套“请求－应答”模式的随机密钥方法，对密码和数据的保密效果都令人十分满意。当客户端程序启动并企图与服务器程序建立连接时，客户程序从服务器端取得一个由服务器程序产生的随机字串，将以此字串为密钥来传送用户登录密码和数据...

DELPHI中映射网络驱动器

2016年07月27日 52 阅读

DELPHI中映射网络驱动器2007-11-16function WNetAddConnection2W（var lpNetResource: TNetResourceW;lpPassword, lpUserName: PWideChar; dwFlags: DWORD）: DWORD; stdcall;首先要填一个 lpNetResource structure，然后 password,user name, 和一个标志表明是否这个映射每次登录时都要还原。...

用Delphi制作网络游戏外挂

2016年07月27日 54 阅读

用Delphi制作网络游戏外挂2007-11-16刘悦在几年前我看到别人玩网络游戏用上了外挂，做为程序员的我心里实在是不爽，想搞清楚这到底是怎么回事。就拿了一些来研究，小有心得，拿出来与大家共享，外挂无非就是分几种罢了（依制作难度）：1、动作式，所谓动作式，就是指用API发命令给窗口或API控制鼠标、键盘等，使游戏里的人物进行流动或者攻击，最早以前的“石器”外挂就是这种方式。2、本地修改式，这种外挂跟传统上的一些游戏修改器没有两样，...