Delphi操作注册表的一般步骤
Delphi操作注册表步骤如下：
-------------------------------------
1）在Uses中添加Registry单元；
2）声明TRegistry对象；
3）创建TRegistry对象；
4）指定根键；
----------------try------------------
5）打开需要操作的主键；
6）读写操作；
7）保存并关闭主键；
--------------finally----------------
8）释放TRegistry对象；
---------------end------------------
==========================================================
Uses Registry; //添加Registry单元；
var
MyReg: TRegistry; //声明TRegistry对象；
begin
MyReg := TRegistry.Create; //创建TRegistry对象；
try
MyReg.RootKey := HKEY_LOCAL_MACHINE; //指定根键；
if MyReg.OpenKey('主键名', true) then //打开需要操作的主键；
begin
MyReg.ReadType(---); //读注册表文件
MyReg.WriteType(---); //写注册表文件
end;
MyReg.CloseKey; //保存并关闭主键；
finally
MyReg.Free; //释放TRegistry对象；
end;
end;
==========================================================
function OpenKey(const Key:String; CanCreate:Boolean):Boolean;
//第二个参数指明，如果需要打开的主键不存在时是否创建该主键
function CreateKey(const Key:String):Boolean;
//此方法用于创建主键，实际上并不常用
function KeyExists(const Key:String):Boolean;
//判断主键是否存在
(***对于字符串类型的操作函数***)
function ReadString(const Name: String):String;
procedure WriteString(const Name, Value: String);
//对于其它数据类型的注册表读写
相关文档：
一、Format函数的用法
Format是一个很常用，却又似乎很烦的方法，本人试图对这个方法的帮助进行一些翻译，让它有一个完整的概貌，以供大家查询之用：
首先看它的声明：
function Format(const Format: string; const Args: array of const): string; overload;
事实上Format方法有两个种形式，另外一种是三个参数的，� ......
淘宝开放平台的开发例子大多都是c#，php，java等，缺少Pascal的例子。
现用delphi写了一个示例，
关键点是签名的生成，签名需按key字母顺序排序，并去掉等于号后首尾相连。
关键代码：
memstr:= TMemoryStream.Create;
//用授权码获取 session
IdHTTP1.Get('http://container.api.tbsandbox.com/c ......
在sql server 的northwide 中建立主表
create table sell_h( sell_id char(10),cust_name char(10) Primary key(sell_id) )
go
create table sell_h( sell_id char(10),inv char(10) ,amt float,qty float Primary key(sell_id,inv) )
首先,要注意以下设置
1.要注意报从表qrydetail设置,批保存开式. 即.locktype= batc ......
以下是test.htm页的内容
首先定义一个插件对象
<object id="Mapupload" name="Mapupload" width="0" height="0" classid="clsid:045FA9B9-B373-4D4C-AE76-128A19A4B6AE">
</object>
<script type="text/javascript">
//此函数打开activexform窗体并为activ ......
所在单元： DateUtils
Day 开头的函数
1、DayOf()
描述： 使用 DateOf 函数用来把一个 TDateTime 类型的变量转变成一个 只带有日期的 TDateTime 类型变量。 例如： showmessage(DateTimetostr(dateof(now()))); 你得到的是 2003/03/19 而 showmessage(DateTimetostr((now()))); 得到的是
2、DateTimeTostr()
描述： Da ......
