引言: Borland公司推出的 RAD开发工具 Delphi 5.0作为 Windows平台上的主流开发工具,其可视化的开发环境和面向对象编程的强大功能已经吸引了无数的开发人员。
摘要: 在 开 发 证 券 分 析 软 件 中, 经 常 要 绘 制 各 种 股 票 的 分 析 曲 线。 为 了 使 得 软
件 的 功 能 更 加 方 便. 灵 活, 用 户 希 望 能 够 按 照 自 己 的 喜 好 自 定 义 各 种 曲 线 的
颜 色。 在 w o r d97 的[ 格 式] 菜 单 下 的 字 体 对 话 框 中 有 类 似 的 功 能。 当 用 户
单 击 字 体......
摘要: 我们经常可以看到许多生动有趣的动画鼠标,其实利用delphi强大的功能,我们完全可以随心所欲地制作有个人特色的鼠标。我制作了一个名为face的动画鼠标,在常态时,它是一张圆圆的脸,脸上有一双咕噜噜乱转的大睛眼。当按下左(右)键时,脸的左(右)眼就眨一下。如果持续按住,则左(右)眼眨个不停。下面我以这个动画鼠标为例,简述如何制作动画鼠标。
首先,在delphi的主菜单工具下选图像编辑器,编......
Delphi图像数据压缩事例borland公司推出的 rad开发工具 delphi 5.0作为 windows平台上的主流开发工具,其可视化的开发环境与面向对象编程的强大功能已经吸引了无数的开发人员.但是,一些程序员在实际的开发过程中却时常为对大量的数据进行压缩而伤透脑筋,不得不去查找一些高效的压缩算法或在网上查找第三方的控件来实现压缩.难道 delphi本身没有提供这个功能吗?其实 delphi的程序设计师早就考虑到了这一点,他们提供了 zlib.pas与 zlibconst.pas两个单元文件来解决数据压缩问题,实现了很高的数据压缩比率.这两个文件保存在 delphi 5.0安装光盘上 \info\extras\zlib目录下,此外,在 info\extras\zlib\obj目录中还保存了 zlib.pas单元引用的 obj文件.下面本文以压缩一个屏幕拷贝为例介绍如何使用这项功能.
解决思路 【程序编程相关:
RECT在Delphi中的灵活使用】 【推荐阅读:
在TNotebook组件的所有页面上显示】
【扩展信息:
反查漢字拼音】
首先利用屏幕拷贝捕捉到当前整个屏幕的图像,然后在内存中保存为 bmp文件格式.压缩时,使用 tcompressionstream对象对原始图像进行压缩并且保存为自定义的文件格式;解压缩时,使用 tdecompressionstream对象对被压缩的图像进行解压缩,还原为 bmp格式的图像文件.
具体实现
新建一个项目文件,在主单元的接口部分引用 zlib.pas,在主表单上放置两个按钮 button1. button2,在它们的 onclick事件中写上相应的过程调用代码.
部分程序源代码如下:
unit unit1;
interface
uses
windows, messages, sysutils, classes, graphics, controls, forms, dialogs,stdctrls, zlib;
type
tform1 = class(tform)
button1: tbutton;
button2: tbutton;
procedure button1click(sender: tobject);
procedure button2click(sender: tobject);
private
{ private declarations }
public
{ public declarations }
end;
var
form1: tform1;
...
下一页 摘要:unit cpuid;
interface
type
tcputype = (cpu8086, cpu286, cpu386, cpu486, cpupentium);
function cputype : tcputype;
function cputypestring : string;
implementation
uses
sysutils;
functio......