小编Ric*_*ick的帖子

我想设计一个图表并设置一个样本的颜色.与Excel中的相同:

是否有某种公式或算法可以从给定的阴影或颜色生成下一个颜色？

我TToolbuttons在运行时创建以及它们在我的运行中出现的问题TToolbar.

基本上我已经有了一个带有一些按钮的工具栏.我可以在运行时创建按钮并将父项设置为工具栏.但它们始终显示为工具栏中的第一个按钮.

如何让它们显示在工具栏的末尾？或者我希望他们成为的任何职位.

我写了这个实用程序(exe),可以在这个宿主应用程序中调用它.我更喜欢它只能从主机应用程序调用该实用程序.从外部或其他主机运行它应立即终止该实用程序.

有没有办法找出哪个进程启动了我的实用程序？

谢谢你的回复.

是否有类似于Outlook用于显示附件的Delphi组件？

我是D2006.所以我还不熟悉任何新的Delphi组件.

谢谢 !

Frames有什么特别之处,当你创建它们运行时它会自动分配一个名字？这在循环中使用时会导致问题,即:

for i := 0 to 3 do
  TMyFrame.Create(self); //Error on 2nd pass

在第一次传递时,框架是explicityl名为'MyFrame'.在第二次传递时,它会再次尝试将其命名为"MyFrame",这会导致异常,因为已经存在具有此类名称的组件.

其他组件或表单很乐意在没有为其指定名称的情况下创建.是什么赋予了 ？

这是Delphi 2006顺便说一下.

干杯

我有两个TEdit控件.当我退出edit1时,edit2会收到焦点.在Edit1的OnExit事件中,我有以下代码:

procedure TForm1.Edit1Exit(Sender: TObject);
begin
  edit2.Enabled := false;
  edit2.Enabled := true;
  edit2.setfocus;
end;

Edit2有焦点.但是,它没有任何关注.我可以开始输入,但它很混乱,因为我不知道哪个控件有焦点.

我更感兴趣的是Enabled属性的翻转会导致某些消息无法正常触发？例如,edit2的OnEnter事件未被触发.

如果重要的话,这是在D2006.

谢谢回复.

我是否需要将Interposer类放在特定类的所有形式中？假设我想重新实现TPanel,我将其重新声明为 TPanel = class(ExtCtrls.TPanel).我是否需要在使用TPanel的所有设备中执行此操作？

提前致谢 !

我有一个看起来像这样的表:

TYPE     GROUP     VALUE
-----    -----     -----
0        0         10
0        0         60
0        1         20
1        0         30
1        1         40
1        1         10

我希望TYPE和TYPE的总数; GROUP.在TYPE&TYPE; GROUP上创建索引.

object ClientDataSet1: TClientDataSet
  IndexDefs = <
    item
      Name = 'ClientDataSet1Index1'
      Fields = 'TYPE'
      GroupingLevel = 1
    end
    item
      Name = 'ClientDataSet1Index2'
      Fields = 'TYPE;GROUP'
      GroupingLevel = 2
    end>
  IndexName = 'ClientDataSet1Index1'

并创建了两个聚合

object ClientDataSet1: TClientDataSet
  Aggregates = <
    item
      Active = True
      AggregateName = 'Agg1'
      Expression = 'SUM(VALUE)'
      GroupingLevel = 1
      IndexName …

是否可以通过类型信息获取记录的元素或字段列表类似于类的已发布属性的列表？

谢谢 !

有没有办法找出TMonthCalendar中的第一个和最后一个可见日期？

谢谢 !

在销售订单文档网格页脚中。它显示产品的可用性。

如何在机会产品网格中做同样的事情？更何况，您如何强制将其显示在页脚而不是简单的网格列？有这种属性吗？

感谢您的答复。