如何在多帧中触发一个过程?

问题描述 投票:0回答:1

我有一个应用程序,其中有无限(许多)数量的帧,可以动态添加和删除。我永远不知道哪些是活跃的,哪些是不活跃的。

他们都有这样的程序:

procedure DoAfterPermissions();
begin
  // Code to run after permissions have been refreshed
end;

在我的主表单上,我时不时地刷新权限。刷新权限后,我需要在创建的所有框架上执行该过程。

如何做到这一点?我什至不知道从哪里开始。

delphi delphi-12-athens tframe
1个回答
0
投票

我建议两件事:

  1. 让所有框架都派生自定义

    DoAfterPermissions()
    方法的公共基类或接口,以便它们可以重写/实现它。

  2. 将所有框架实例存储在一个列表中,其元素类型是指向基类/接口的指针。

这样,您可以在需要时简单地迭代列表,直接调用方法。

© www.soinside.com 2019 - 2024. All rights reserved.