IF (dsbSALES_FORECAST_DISTRICT_DT.DataSet.Active) AND (NOT dsbSALES_FORECAST_DISTRICT_DT.DataSet.IsEmpty) THEN
IF (dsbSALES_FORECAST_DISTRICT_DT.DataSet.FieldByName('REQUEST_VALUE2').NewValue <> dsbSALES_FORECAST_DISTRICT_DT.DataSet.FieldByName('REQUEST_VALUE2').OldValue) OR (dsbSALES_FORECAST_DISTRICT_DT.DataSet.FieldByName('REQUEST_VALUE3').NewValue <> dsbSALES_FORECAST_DISTRICT_DT.DataSet.FieldByName('REQUEST_VALUE3').OldValue) or (dsbSALES_FORECAST_DISTRICT_DT.DataSet.FieldByName('STOCK_AMOUNT').NewValue <> dsbSALES_FORECAST_DISTRICT_DT.DataSet.FieldByName('STOCK_AMOUNT').OldValue) or (dsbSALES_FORECAST_DISTRICT_DT.DataSet.FieldByName('WAY_STOCK').NewValue <> dsbSALES_FORECAST_DISTRICT_DT.DataSet.FieldByName('WAY_STOCK').OldValue) or (dsbSALES_FORECAST_DISTRICT_DT.DataSet.FieldByName('LESS_FINISHED').NewValue <> dsbSALES_FORECAST_DISTRICT_DT.DataSet.FieldByName('LESS_FINISHED').OldValue) or (dsbSALES_FORECAST_DISTRICT_DT.DataSet.FieldByName('SAVE_STOCK').NewValue <> dsbSALES_FORECAST_DISTRICT_DT.DataSet.FieldByName('SAVE_STOCK').OldValue) THEN
AColor:=$09EA4FE;
这是我的代码,我想在数据集改变之后,如果该行被改变了,就变色否则不变,但是这样写,我查询出来时就全部变颜色了,怎么弄了,急~~~
我把条件换成了
IF FuncBroker1.Func.ID = 'SEND_GOODS_FORECAST_FUN' THEN// 客服发货预测
IF (dsbSALES_FORECAST_DISTRICT_DT.DataSet.Active) AND (dsbSALES_FORECAST_DISTRICT_DT.DataSet.State = Business.Data.TDataSetState.dsEdit) THEN
IF (dsbSALES_FORECAST_DISTRICT_DT.DataSet.FieldByName('REQUEST_VALUE2').NewValue <> dsbSALES_FORECAST_DISTRICT_DT.DataSet.FieldByName('REQUEST_VALUE2').OldValue) OR (dsbSALES_FORECAST_DISTRICT_DT.DataSet.FieldByName('REQUEST_VALUE3').NewValue <> dsbSALES_FORECAST_DISTRICT_DT.DataSet.FieldByName('REQUEST_VALUE3').OldValue) or (dsbSALES_FORECAST_DISTRICT_DT.DataSet.FieldByName('STOCK_AMOUNT').NewValue <> dsbSALES_FORECAST_DISTRICT_DT.DataSet.FieldByName('STOCK_AMOUNT').OldValue) or (dsbSALES_FORECAST_DISTRICT_DT.DataSet.FieldByName('WAY_STOCK').NewValue <> dsbSALES_FORECAST_DISTRICT_DT.DataSet.FieldByName('WAY_STOCK').OldValue) or (dsbSALES_FORECAST_DISTRICT_DT.DataSet.FieldByName('LESS_FINISHED').NewValue <> dsbSALES_FORECAST_DISTRICT_DT.DataSet.FieldByName('LESS_FINISHED').OldValue) or (dsbSALES_FORECAST_DISTRICT_DT.DataSet.FieldByName('SAVE_STOCK').NewValue <> dsbSALES_FORECAST_DISTRICT_DT.DataSet.FieldByName('SAVE_STOCK').OldValue) THEN //
AColor:=$09EA4FE;