Delphi t形与整数值

我最近在做一个飞镖计数器。 我在

TImage

上展示了一个镖靶，每个计数位置都有一个

t形状

由于

TShape

不喜欢整数，是否可以为

TShape

赋值

谢谢

如果没有其他东西使用该属性，则可以使用该属性存储整数值

标记

没有预定义的含义。

标记

属性可以存储任何额外的整数值，以方便开发人员

另一种方法是派生

TShape

的子类，并添加一个属性来存储信息。这将允许您为属性指定一个更有意义的名称，并明确其意图

我想说的是，用

TShape

对象构建一个复杂的可视化用户界面可能是执行任务的一种低效且容易出错的方式。通常，对于这样的任务，最好是创建一个自定义控件，使其能够正确地绘制自身，而不使用子组件