内容列表
- Delphi 对象流式管理---窗体文件(*.dfm)的转换
- 在Delphi5和Delphi6中,对窗体文件(*.dfm)的保存格式不一样,如果要想在Delphi5中打开Delphi6写的Project,则必须对窗体文件进行转换,这要了解Delphi中的对象流式管理。流在Delphi中有重要的作用,今天我是利用TStringStream和TMemoryStream将Delphi6的窗体文件转换成delphi5能识别的格式
- 分类:Delphi 查阅全文
- Template 模式之Delphi实现
- unit Tpl_meth;
{Design pattern example -some simple classes using the Template Method pattern.}interface
type TAbstractTemplateClass = class(TObject) protected function
- 分类:Delphi 查阅全文
- 音量调节及静音
- 在进行多媒体软件开发时,经常要调整各种设备的音量和设置静音,本人编写了一个单元,四个函数,分别用于获取音量(GetVolume(DN))、设置音量(SetVolume(DN,Value))、获取静音(GetVolumeMute(DN))及设置静音(SetVolumeMute(DN,Value))。
unit funVolume;
interface
uses MMSystem, Dialog
- 分类:Delphi 查阅全文
- 进程间传递消息(发送和接收系统消息)
- { 2002.07.22 关于如何发送和接收系统消息 作者:王珍义 nickname:LargeWang(老王) QQ: 33728007 欢迎光临鹏业软件 www.pengesoft.com.cn
以下代码Delphi7.0通过,编译后启动两个进程,然后在一个窗口中点击Button1试试。}
unit Un
- 分类:Delphi 查阅全文
- 基本图象处理代码(1)
- [图像的旋转和翻转]
以下代码只能用于24位色的位图,用于处理其它色深的位图请自行修改。
//旋转90度procedure Rotate90(const Bitmap:TBitmap);var i, j: Integer; rowIn,rowOut: PRGBTriple; Bmp: TBitmap; Width,Height: Integer;
- 分类:Delphi 查阅全文
- 基本图象处理代码(2)
- [亮度、对比度、饱和度的调整]
//亮度调整procedure BrightnessChange(const SrcBmp,DestBmp:TBitmap;ValueChange:integer);var i, j: integer; SrcRGB, DestRGB: pRGBTriple; Table: array[0..255]of Byte;begin&
- 分类:Delphi 查阅全文
- 基本图象处理代码(3)
- [常用滤镜效果]
这里根据角度的不同,在一个像素周围的8个像素中取不同的两个运算得到新颜色值,用这个值和它求差值实现浮雕效果。
//浮雕procedure Emboss(SrcBmp,DestBmp:TBitmap;AzimuthChange:integer);overload;var i, j, Gray, Azimuthvalue, R, G, B: integer; 
- 分类:Delphi 查阅全文
- 对Object Pascal编译器给类对象分配堆内存细节的一种大胆猜测(上)
- 对Object Pascal编译器给类对象分配堆内存细节的一种大胆猜测(下)
CSDN烤鸡翅膀
读过我以前写的文章的网友,都知道我是一个喜欢“刨根问底”、“死钻牛角尖”的家伙。最近由于工作需要转学DELPHI,在接触Object Pascal之后,果然领会到了它的整洁和优美,怪不得连《程序设计语言:设计与实现》一书的作者也称赞pascal是“一种极优美的语言”。但在学习过程中
- 分类:Delphi 查阅全文
- ODAC 使用技巧 (四)使用VARRAY数据类型
-
ODAC 使用技巧 (四)使用VARRAY数据类型
[email protected]
在使用对象时建议使用数组。但在你需要在数据集中使用大数组时可能会出现一些问题。比如,当为 ODAC 的一个字段创建大量数组时,也会创建大量的 TField 字段,这会导致程序的性能大大降低。 因此, ODAC 限制仅能为字段创建 1000 个成员。 但不管怎样,你都可
- 分类:Delphi 查阅全文
- 对Object Pascal编译器给类对象分配堆内存细节的一种大胆猜测(下)
- 到了这里,你也许会说,说了半天,都是猜测,或许,OP编译器根本就不会调用那个TObject.NewInstance方法呢!
问得好,再做实验!
还是以上面的那个Tbase类为例,重载TObject.NewInstance方法,如下:
TBase = class(TObject)
x : Integer;
y :
- 分类:Delphi 查阅全文
- 也来谈谈数据库中的图象存取
- 关于数据库中的图象存取,网上的资料多是直接用Table或者Query 等控件然后利用流作为媒介来完成。目前我还没看到封装在一个类里面,完全用SQL语句来实现图象的存取。前段时间开发一个运证管理系统就碰到了这样一个问题:要把每个司机的照片入库。我们可以在主界面放置一个TImage和OpenDialog对话框进行照片的选择,可是最后怎样将照片存入数据库呢?下面提供源代码让大家分析(其中删去了一些
- 分类:Delphi 查阅全文
- 如何在启动机器时自动运行adsl拨号(2)
- 自动拨号的程序做完了,接下来的任务就是如何建一个服务在开机时运行,并定时检测网络unit Unit1;
interface
uses Windows, Messages, SysUtils, Classes, Graphics, Controls, SvcMgr, Dialogs,ras,IniFiles;
type TAutoDialService = class(
- 分类:Delphi 查阅全文
- 用XML做为数据存贮格式
-
Using XML as a data storage format 用XML做为数据存贮格式
问题提出:
在本地应用程序使用XML有什么意义?
回答:
介绍
WEB工业的发展导致开发人员通过传统科技致意和在面向客户端和服务端之间渐渐保持平衡。浏览器,协议,和脚本语言的新标准替换了其它的每个地方。下一步是XML-可扩展的标记语言
- 分类:Delphi 查阅全文
- 如何在启动机器时自动运行adsl拨号(1)
- 我们通常希望有一台机器能经常挂在网上,现在有了adsl包月服务,这已经不是问题。但是最近adsl总是会断线,当我回家想从公司的机器上拷贝一些文件的时候,有时会发现已经连接不上了。所以我做个程序所要实现的功能有这么两个,一是用程序来实现adsl拨号,二是要定时检测网络状态,三是要在启动机器时运行(既注册为服务)我们先看一下如何做一个拨号程序首先建一个ras拨号的单元文件(这是网上搜集的)unit R
- 分类:Delphi 查阅全文
- 如何访问局域网上的文件
- var NetSource : TNetResource; file://连接服务器结构 dwResult:DWORD; file://连接文件服务器的返回值
- 分类:Delphi 查阅全文
- 用Ehlib二次开发报表打印程序,实现财务凭证的打印(三)
- 4、打印表头,我将表头的各个部分划成了几部分,如我的凭证打印的地方,我就划成了五部分,每部分按占百分比多少计算。如编制单位就占页面宽度的40%等
procedure TF_printpreview.printpageheader(pageheader: Tstrings);var Headrect:Trect; count:integer;begin pp_p
- 分类:Delphi 查阅全文
- Delphi5的水晶报表控件在Delphi6下的安装过程
- 问题所在:因为我的水晶报表控件是for Delphi5的,所以在Delphi6下安装时碰到了很多问题。现在详细描述。先找到控件安装包,双击Crystal.dpk。系统提示安装成新格式,选择“是”。点击package的install进行安装,报告错误:未找到DsgnIntf.dcu,这是Delphi5和Delphi6的一个区别,将uses中的DsgnIntf改为{$IFDEF VER140} Des
- 分类:Delphi 查阅全文
- 用程序删除已注册的COM+应用程序
- 使用COM接口1. 找到接口描述文件COMAdmin_TLB.pas还是用了个笨办法,新建一个ActiveX Library,再新建一个COM Object,随便起个名字吧。保存。然后选菜单View->Type Library,在右边Uses页中点右键,选择查看所有类型库,找到COM+1.0 Admin Type Library,保存。OK,在你的保存目录下有了一个COMAdmin
- 分类:Delphi 查阅全文
- Delphi与Lex、Yacc (一) 安装篇
- 简介
Lex和Yacc是Unix/Linux上的词法语法分析代码生成工具,可以用来编写编译程序和解释程序,同时也可用于其他需要对结构化输入生成解析工具的场合。Lex和Yacc的大多数版本都是生成C语言程序的,关于这两个工具的大量文档也是面向C的。本系列文章尝试介绍Lex和Yacc在delphi中的应用。本文假定你具有Lex和Yacc的初步知识。如果你需要入门材料,可以看http://www-90
- 分类:Delphi 查阅全文
- 在Delphi中动态生成QuickReport报表
-
----笔者在前一段使用Delphi开发数据库的工作中,用户提出了这样一个需求:要根据自己的的查询结果动态生成报表然后进行打印。几经摸索,笔者使用动态生成QuickReport控件的方法满足了用户的需求。现将此方法说明如下,希望能为有类似工作要做的朋友们提供一点有益的提示。
一、基本思路
----先将查询的一些参数(如SQL命令,字段名称,字段宽度等)按照一定格式写入一个临
- 分类:Delphi 查阅全文