我如何通过一个 TForm(这个)一般?

How do I pass a TForm (this) generically?

本文关键字:TForm 这个 一个 一般 何通过      更新时间:2023-10-16

>我有两个几乎相同的表单(Form4 和 Form5),它们有几个共同的项目,但处理不同的数据。 我正在尝试编写一个将采用这两种形式之一的辅助函数。

这两种形式都是动态创建的。

到目前为止,我能够编写处理来自 Form4 [Process(TForm4 *F)] 的数据的函数。我无法从 Form5 执行相同的操作,因为帮助程序函数特定于 TForm4。

从表格4

Edit1Exit(Tobject *Sender){     
Process(this);
}

从表单5

Edit1Exit(Tobject *Sender){     
Process(this);
}
Process(TForm4 *F){
// Do something like F->BitBtn1->Visible=false;
}

问题是Process()是为TForm4编写的,所以它不接受TForm5。

如何声明 Process() 以便它采用任一形式。

一般来说,您将有三个选择:

  1. 为每个版本编写显式重载,并复制代码。 即,
void Process(TForm4* F) {
/// do things
}
void Process(TForm5* F) {
/// do things
}
  1. 派生自声明虚拟接口的公共基类,即
class TFormBase {
// common virtual interface, and a virtual destructor
};
class TForm4 : public TFormBase {
// implementation of the interface + data members
};
class TForm5 : public TFormBase {
// implementation of the interface + data members
};
void Process(TFormBase* F) {
// interact with F via the virtual interface
}
    使用
  1. 模板(但在这种情况下,函数的实现必须在使用它的地方可访问;通常这意味着它必须位于头文件或可以直接包含的文件中),即
template<typename T>
void Process(T* F) {
// interact with the classes; assumes a common interface
}

为简单起见,我省略了很多细节,但这应该可以帮助您入门。