分布式多层数据库开发

放一个Toolbar加入四个按钮。然后把Standard--?ActionList加入进去。

在ActionList上右键，选：Action List Editor

多层数据库中的一个例子在“客户端-2”中。其中写入和退出在Standard Action 内找不到，需要自己编，在ToolBar1内再加入两个Button，写：

procedure TForm1.ApplyUpdateExecute(Sender: TObject); begin

cdsCustomer.ApplyUpdates(-1);

ShowMessage('已经正确地写入数据库中!!'); end;

procedure TForm1.CloseActionExecute(Sender: TObject); begin Close; end;

下面装饰这个Button组，调入一个ImageList1，调入相应的图形：