使用Winamp是有个EasyMove的功能，也就是不在标题栏上拖动鼠标就能移动窗体，虽然EasyMove功能很好实现，可还不如做个控件一劳永逸，另外这个控件还有一个更有用的功能，呆会儿就能见到。我们先看看如何实现它吧！ —- 建立一个空的Unit，把以下代码Copy进去，再把它添加到Delphi的控件库里，这样MovePanel控……继续阅读 » 搞代码 7年前 (2018-08-09) 211浏览 0评论0个赞
所谓动态选单是指选单项随着程序的操作变化而变化。现在，我们用Delphi来实现这一功能，具体步骤如下： 1．首先，确定动态选单的数据来源，即要确定动态选单标题是来自Windows的系统注册表，还是来自一个数据库，或者是来自一个子目录，主要由程序的功能而定。这里假设主窗口名为MainForm，上面已有主选单，其动态选单的数据源是一个Strin……继续阅读 » 搞代码 7年前 (2018-08-09) 152浏览 0评论0个赞
林凌 资源是存放在扩展名.RES的文件里的二进制数据结构，在Delphi中资源文件可以使用图象编辑器来制作(IMAGEEDITOR)，或者使用其他的工具。如：BORLAND公司提供的RADPACKFORDELPHI中的RESOURCEWORKSHOP来创建。资源文件中通常存放的是应用程序可以随时存取的一些对象，包括：ICON、CURSOR、BIT……继续阅读 » 搞代码 7年前 (2018-08-09) 197浏览 0评论0个赞
function IsFileInUse(fName : string) : boolean; var HFileRes : HFILE; begin Result := false; if not FileExists(fName) ……继续阅读 » 搞代码 7年前 (2018-08-09) 200浏览 0评论0个赞
uses Unit2; procedure TForm1.Button1Click(Sender: TObject); begin Form2.Show; Form2.WindowState := wsMaximized; Form2.MediaPlayer1.Noti……继续阅读 » 搞代码 7年前 (2018-08-09) 162浏览 0评论0个赞
曾经在网上看到有人说Delphi能够产生大小只有16k的Win32应用程序，而我自己曾经编写过的这种可执行文件大小则是在17k左右，因而我一度猜想Delphi恐怕也只能将代码优化到这种程度了。最近由于测试的目的重新把这个程序写了一遍，才发现利用一些技巧，还能够将文件的大小进一步缩减到8.5k。这个程序也能够显示Delphi作为类似于Visual C++……继续阅读 » 搞代码 7年前 (2018-08-09) 186浏览 0评论0个赞
陈学军 实现异型FORM并不是一件难事，本文将向您介绍如何利用API函数实现圆角矩形和椭圆形FORM，并在此基础之上探讨实现TWINcontrol类的后裔的异型的实现。 欲改变FORM的形状，也就是实现对区域（region）的控制。在Win32 API程序参考手册有关区域（region）的定义是这样描述的：它可以是一个矩形，多边形，椭圆形……继续阅读 » 搞代码 7年前 (2018-08-09) 146浏览 0评论0个赞
实 现web 站 点 同 时 对GB 码 和BIG 码 的 支 持 —- 目 前 由 于 汉 字 内 码 的 不 统 一， 互 联 网 上 的 中 文 站 点 为 了 实 现 对 于 不 同 用 户 的 支 持， 一 般 采 取 建 立 两 套 主 页， 分 别 用GB 和BIG 码 来 编 写。 这 样 做 显 然 要 增 加 站 点……继续阅读 » 搞代码 7年前 (2018-08-09) 256浏览 0评论0个赞
作者：江德华 无论Outlook XP还是最新的Foxmail 4.0，都只能在html格式的电子邮件中嵌入JPG、GIF格式图片，而音色俱佳的Flash动画却只能作为电子邮件附件发送给好友，你可曾感到遗憾？ 经过一番实验探索，我使用Delphi终于实现了将Flash动画（.SWF格式）嵌入到电子邮件正文中发送的功能，F……继续阅读 » 搞代码 7年前 (2018-08-09) 160浏览 0评论0个赞
文/北京 张维 webMail是指在网页中实现邮件的发送。使用Delphi开发Web Server程序是非常简单的，Delphi中提供了大量的元件和对象。下面通过一个例子来介绍如何利用Delphi开发一个响应用户输入的ISAPI的WebMail程序。为了简单，程序没有对传送的数据提供保密。 首先，在Web服务器端安装数据库引擎dbe,并设置……继续阅读 » 搞代码 7年前 (2018-08-09) 221浏览 0评论0个赞
