我如何在 DELPHI 中的任何单元的初始化块中调用任何过程或函数

Question

我正在尝试在我的单元的初始化块中调用一个过程，因为我希望该过程在应用程序启动时先于其他任何事情执行。编译器显示此错误：

[dcc32 Error] Unit2.pas(152): E2076 This form of method call only allowed for class methods or constructor

这是我的程序的样子

procedure TForm2.initilize()   ;
      begin
  ListBox2.Items.Add('Mohit');
  ListBox2.Items.Add('Raghav');
  ListBox2.Items.Add('Maninder');
  ListBox2.Items.Add('Tanya');
      end;

这是初始化时调用的地方

initialization
begin
     TForm2.initilize();
end;

Answer 1

我更喜欢经典的构造函数。优点是你甚至可以对框架使用相同的方法，因为框架没有 OnCreate。

interface
...
type
TForm2 = class(TForm)
private
  procedure initialize;
  ...
public
  constructor Create(AOwner: TComponent); override;
  ...
end;

implementation

constructor TForm2.Create(AOwner: TComponent);
begin
  inherited;
  initialize;
end;

我如何在 DELPHI 中的任何单元的初始化块中调用任何过程或函数

How do i call any procedure or function inside initialization block of any unit in DELPHI

delphi

pascal

initialization