避免在运行时创建的tcxPageControl上出现重复的选项卡

时间:2013-04-15 18:03:47

标签: delphi tabs pagecontrol

我正在使用tcxPageControltcxTabSheet来创建多个Tabs。每个Tab都是在运行时根据tbl_Manager的注册表创建的。此table保留每位员工的经理姓名,Tabs是经理的姓名。

问题

管理员的姓名重复多次,如何避免使用相同名称创建Tabs并为每位经理仅创建一个Tab

1 个答案:

答案 0 :(得分:2)

跟踪您之前创建的标签,并仅为您尚未看到的名称创建标签。

如果您从SQL查询中选择管理员名称,请使用DISTINCT以获取唯一值列表。

您可以使用TStringListSorted = True将所有经理名称添加到Duplicates = dupIgnore。一旦添加了所有名称,就可以回读列表中的内容,并且没有重复项。