第一章 DELPHI的原子世界
第二章 DELPHI与WIN32时空
第三章 多线程
第四章 接口
第五章 包
第六章 事件与消息
第七章 组织你的模块
第八章 探索数据库
第九章 多层体系结构
第十章 操作界面与操作逻辑
第十一章 面向对象数据库基础
空白
战哥还未完成。 ......
第一章 DELPHI的原子世界
第二章 DELPHI与WIN32时空
第三章 多线程
第四章 接口
第五章 包
第六章 事件与消息
第七章 组织你的模块
第八章 探索数据库
第九章 多层体系结构
第十章 操作界面与操作逻辑
第十一章 面向对象数据库基础
空白
战哥还未完成。 ......
第一章 DELPHI的原子世界
第二章 DELPHI与WIN32时空
第三章 多线程
第四章 接口
第五章 包
第六章 事件与消息
第七章 组织你的模块
第八章 探索数据库
第九章 多层体系结构
第十章 操作界面与操作逻辑
第十一章 面向对象数据库基础
空白
战哥还未完成。 ......
第一章 DELPHI的原子世界
第二章 DELPHI与WIN32时空
第三章 多线程
第四章 接口
第五章 包
第六章 事件与消息
第七章 组织你的模块
第八章 探索数据库
第九章 多层体系结构
第十章 操作界面与操作逻辑
第十一章 面向对象数据库基础
第十一章 面向对象数据库基础
第二节 数据对象的标识
我们在关系数据库的设计和开发中，可能经常需要一些唯一的编号或标识，用来作为关键字，以区别每一个不同的人，每一张不同的单据，每一次不同的信息登记，等等。并且，我们也一直采用这些编号和标识，作为关系的连接字段。但是，要保证编号或标识是完全唯一的，却是一个不大不小的难题。
下面我们将详细讨论这一问题，并希望能从另一个高度来理解这一问题。不过，我们首先来看看问题是怎样由来的。现在，给大家讲一个故事。
从前，在北京降生了一个漂亮的小女孩。接生的李阿姨说，她的声音这么大，好象想要全世界的人都听到。
他的父母就为她取了一个很好听的名字，叫“王菲”。于是，所有的小朋友就叫她“王菲”，“王菲”就是她童年的标识。
在她上初二的时候� ......
摘要摘要：本文分析了ODBC数据源设置的原理以及ODBC数据源和Delphi数据库别名的关系。并在此基础上，介绍了在Delphi5数据库应用程序安装、运行中，如何编程实现ODBC数据源和Delphi数据库别名的设置。
关键字摘要：Delphi、数据库、ODBC
一、前言
Delphi的特色之一就是方便而强大的开发数据库的能力，只要轻击几下鼠标，填写极少的几行代码，就能快速地开发出很有风格的数据库应用程序。编写一个数据应用可以很简单，但要在别人的计算机上运行自己的应用却要费一些周折。
首先，假如对方的计算机上还没有安装过Inprise公司的BDE数据库引擎的话，那么就必须把BDE和应用程序一起安装到对方的计算机中。其次，应用程序中用到的数据库别名（Alias），非凡是使用了ODBC数据源连接的数据库别名必须和BDE一起设置。最后，假如应用程序使用的数据库，其存放路径并不是固定的，那么必须根据实际情况进行ODBC和Alias的调整。这些，当然可以在应用程序安装后，利用控制面板中ODBC数据源管理和BDE随带的BDE Administrator通过手工设置。但如此一来，一方面会使应用程序大打折扣，另一方面不便于普通用户自己的安装和今后工作路径的改动。
和Delphi一起发布的Install Shield Express可� ......
设置图像关键颜色，使图像的某种或某个范围的颜色成为透明色，是图片合成、动画显示中经常用的图像处理手段。下面是实现代码：
过程定义：
// 设置色键（透明范围）。colorLow 低色键值; colorHigh 高色键值
// 当像素A、R、G、B值同时大于等于colorLow和小于等于colorHigh时为透明色
procedure ImageSetColorKey(Data: TImageData; ColorLow, ColorHigh: LongWord);
// 按坐标颜色设置色键。x,y 图像坐标点, Precision 色键容差
procedure ImageSetColorKeyPoint(Data: TImageData; x, y: Integer; Precision: LongWord);
实现代码：
procedure ImageSetColorKey(Data: TImageData; ColorLow, ColorHigh: LongWord);
procedure ColorKeyEQ(Data: TImageData; ColorKey: LongWord);
asm
punpckldq mm2, mm2 // mm2 = ColorKey ColorKey
mov eax, ecx
shr ecx, 1 // 每次比较2个像素
@yLoop:
push ecx
@xLoop:
dec ecx
js @@1
movq mm0, [edi] // mm0 = A1 R1 G1 B1 A0 R0 G0 B0
pcmpeqd mm0, mm2 // 按32位数对2个像素 ......
最新文章 : delphi