决策立方控件问题？急急急**

cyw615 · 发表于 2007-9-26 15:37:06

决策立方控件问题？急急急
图中右键菜单中“小计打开/关闭”菜单项触发那个事件？我想在此事件中增加设置列宽的代码，打开或者关闭小计显示时都修改显示列宽？

atiger · 发表于 2007-9-26 16:26:37

http://bbs.justep.com/forum.php?mod=viewthread&tid=3339

cyw615 · 发表于 2007-9-26 17:44:57

这个帖子我已经看过了，并且已经实现列宽自动调整！但我执行“小计打开/关闭”后，列宽又恢复成没有调整的！

cyw615 · 发表于 2007-9-26 17:48:58

这个图就是执行了“小计打开/关闭”显示的效果！

atiger · 发表于 2007-9-26 18:04:32

目前没有提供接口来截获这个菜单。

yancm · 发表于 2007-9-26 18:25:47

可以放在DecisionGridDecisionDrawCell里面，不过效率很低。可以自己做个按钮“调整列宽”来手动调整

cyw615 · 发表于 2007-9-27 08:53:14

那能不能编码实现显示/关闭小计的功能？

atiger · 发表于 2007-9-28 15:09:04

可以，但菜单不好屏蔽，
代码参考
var
  ddd: TDecisionDimensionDef;
  dsd: TDecisionSummaryDef;
begin
  DecisionBroker1.DataSet.Close;
  TDecisionDataSet(DecisionBroker1.DataSet).DecisionDef.BeginUpdate;
  try
dsd:=TDecisionDataSet(DecisionBroker1.DataSet).DecisionDef.SummaryDefs.Add();
dsd.FieldName := 'SUM(LCB.aa)';
dsd.TableName := 'LCB';
dsd.FieldType := TFieldType.ftString;
dsd.DisplayName := #21512#35745'_aa';
dsd.Origin := 'aa';
dsd.IsPrimaryKey := False;
dsd.IsAgg := True;
dsd.IsUserField := False;
dsd.SummType := TdecisionSummtype.dtAggSumm;
dsd.SummFlags := TSummFlags.sfSum;
  finally
TDecisionDataSet(DecisionBroker1.DataSet).DecisionDef.EndUpdate;
  end;
  DecisionBroker1.DataSet.open;
end;

yancm · 发表于 2007-9-30 10:21:09

楼主请反馈

atiger · 发表于 2007-10-9 09:07:45

结了，有问题请重新开帖

		自动登录	找回密码
密码			立即注册