请问用ADOTable新增修改时,怎么控制按钮状态?

Question

比如有 新增,保存,修改,删除 按钮默认只有 新增,编辑按钮可用,
点新增按钮时,保存按钮可用,新增,修改,删除按钮都不能用procedure TForm1.DataSource1StateChange(Sender: TObject);
begin
这样写吗?end;

Answer 1

if ADOTable.State=dsBrowse then
  btnAdd.Enable:=false;
if ADOTable.State=dsEdit then
  btnAdd.Enable:=true;

Answer 2

if ADOTable.State =dsBrows then
begin
  btnAdd.Enable :=True;
  btnEdit.Enable := True;
  btnSave.Enable := False;
  ...
end
else if (ADOTable.State = dsEdit) or (ADOTable.State = dsInsert) then
begin
  btnAdd.Enable := False;
  btnEdit.Enable := False;
  btnDelete.Enable := False;
  btnSave.Enable := True;
  btnCancel.Enable := True;
  ...
end;

Answer 3

要是不想写代码的话，就用DELPHI中自带的数据库关联控件即可

Answer 4

请问怎样用编辑按钮控制ADOTable的状态呢?
我想实现: 默认DBEdit1不能修改,点编辑按钮的时候,DBEdit1才可以修改

Answer 5

dbedit1.readonly:=true;
或
dbedit1.enable:=false;

Answer 6

非编辑时：dbedit1.enabled:=false;
编辑时：  dbedit1.enabled:=true;
如果有多个dbedit控件，可以把dbedit控件放在GroupBox1里面，通过控制GroupBox1的enabled属性来判断是否为编辑状态。

Answer 7

这样的话 不就 变成手动控制了  
那还用 ADOTable.State  干嘛呢