【结帖】流程批处理问题??????

aboy

如下窗体,默认为全部选中, 我想默认为不选,怎么搞????????????????????

aboy

0^0

lisb

修改 业务模型\协同系统\任务\任务中心信息
procedure TTASKCENTERINFO.DataSetBatchTaskAfterOpen(DataSet: TDataSet);
begin
  DataSet.DisableControls;
  try
    while not DataSet.Eof do
      if TSystemCore.FuncManager.FindRunning(DataSet.FieldByName('FGUID').AsString) <> nil then
        DataSet.Delete
      else
      begin
        DataSet.Edit;
        DataSet.FieldByName(FIELD_BatchTask_FSELECTED.ID).AsInteger := 1;   //改成0 试试
        DataSet.Post;
        DataSet.Next;
      end;
  finally
    DataSet.EnableControls;
  end;
end;

aboy

OK了,什么时候来南昌呀,请你吃饭啦!