Editor窗体根据编辑状态设定控件状态

.繼承TfrmCustomEditor窗體要對新增/修改狀態發生變化時作相應處理應用BOBrokerStateChange事件

例：

procedure TfrmPersonEditor.BOBrokerStateChange(Processor: TSmartProcessor);

var

bEditing: Boolean;

begin

bEditing := Processor.State in [psInsert, psEdit];

//

edtOtherLanguage.Enabled := bEditing and Self.OtherLanguage;

aAddPhoto.Enabled := bEditing;

aDelPhoto.Enabled := bEditing;

end;