Tspeedbutton绑定数据库字段问题

Question

在做一个系统中，左边是一个dbgrideh（显示最近的业务单据列表），右边是很多DBEdit（显示左边dbgrideh选中行的单据详细信息），在窗口上边则有一排Tspeedbutton，来对选中单据进行操作，如审批，删除等！问题：如何实现当选中单据已“审批”时，则“审批”按钮变为灰，没“审批”为正常可操作状态（数据表中有一字段记录该单据审批状态，已经审批为1，未审批为0）

Answer 1

procedure TForm1.DataSource1DataChange(Sender: TObject; Field: TField);
begin
  speedbutton1.enabled:=(datasource1.DataSet.FieldByName('审批').Value=0);  //speedbutton1为审批按钮
end;

Answer 2

谢谢,ljluck7687 !
初学delphi，麻烦各位了！