做好了
我把我寫的代碼發布一下
procedure TForm1.cxGridDBBandedTableView1InitEdit(
Sender: TcxCustomGridTableView; AItem: TcxCustomGridTableItem;
AEdit: TcxCustomEdit);
begin
if dm.FindADOQ4.State in [dsEdit,dsInsert] then
begin
addbit.Enabled:=true;//一個是保存按鈕,一個是取消按鈕
clabit.Enabled:=true;
end;
if dm.FindADOQ4.State in [dsbrowse,dsinactive] then
begin
addbit.Enabled:=false;
clabit.Enabled:=false;
end;
end;
procedure TForm1.addBitClick(Sender: TObject);
begin
dm.FindADOQ4.Post;
clabit.Enabled:=false;
addbit.Enabled:=false;
end;
procedure TForm1.claBitClick(Sender: TObject);
begin
dm.FindADOQ4.CancelUpdates;
clabit.Enabled:=false;
addbit.Enabled:=false;
end;
還有一個有關觸發器的問題,也請大家幫忙看看
我表裡有一列的值是等於另外二例之和
比如:A例的值=A例原來的值+B例的值 6=4+2 7(A最新值)=6(A例原來的值)+1(B例的值)
生產總工時=標准工時*生產量,生產工時=(標准工時*生產量)/3600
條件就是B例的值不等於空
CREATE TRIGGER upmeg ON dbo.bomtime
FOR UPDATE
AS
update bomtime
set 累計產量=累計產量+生產量,生產總工時=標准工時*生產量,生產工時=(標准工時*生產量)/3600
where 生產量 is not null